CoXMLHTTP30在哪个单元文件里？oReq := CoXMLHTTP30.Create; 这句为什么老出错？

CoXMLHTTP30在哪个单元文件里？oReq := CoXMLHTTP30.Create; 这句为什么老出错？ Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiBase/html/delphi_20061206214636252.html
我有一段代码：  
  procedure       TFrmZhGs.cmdUpLoadClick(Sender:       TObject);        
      var        
                      pXML:       WideString;        
                      strXML:       WideString;        
                      oReq:       IXMLHTTPRequest;        
                      reMsg       :String;        
                      root:       IXMLDOMDocument;        
                      node:       IXMLDOMNode;        
                      iLength:       Integer;        
      begin        
                      strXML       :=       txtXML.Text;        
                      If       strXML       =       ''       Then        
                                      Exit;        
                      addLog('上传数据');        
                      pXML       :=       'xml='           +       strXML;        
                      pXML       :=       URLEncoding(pXML);        
                      try        
                                      oReq       :=       CoXMLHTTP30.Create;        
                                      oReq.Open('POST',       POST_URL       +       'zhgs.asp',       False,varNull,varNull);        
                                      iLength       :=       Length(pXML);        
                                      oReq.setRequestHeader('Content-Length',       IntToStr(iLength));        
                                      oReq.setRequestHeader('CONTENT-TYPE',       'application/x-www-form-urlencoded');        
                                      oReq.send(pXML);        
                             
  end;        
   
   
      oReq       :=       CoXMLHTTP30.Create;   这句老实执行不过去，大虾救救。  
 

自顶。  
 

try        
                                      oReq       :=       CoXMLHTTP30.Create;        
                                      oReq.Open('POST',       POST_URL       +       'zhgs.asp',       False,varNull,varNull);        
                                      iLength       :=       Length(pXML);        
                                      oReq.setRequestHeader('Content-Length',       IntToStr(iLength));        
                                      oReq.setRequestHeader('CONTENT-TYPE',       'application/x-www-form-urlencoded');        
                                      oReq.send(pXML);        
                             
  end;        
   
  ================================  
   
  不是那句执行不过去    
  而是你try了   后面又没跟进异常保护模块   怎么不会出错    
  你这样写    
                      oReq       :=       CoXMLHTTP30.Create;        
                      try          
                                      oReq.Open('POST',       POST_URL       +       'zhgs.asp',       False,varNull,varNull);        
                                      iLength       :=       Length(pXML);        
                                      oReq.setRequestHeader('Content-Length',       IntToStr(iLength));        
                                      oReq.setRequestHeader('CONTENT-TYPE',       'application/x-www-form-urlencoded');        
                                      oReq.send(pXML);    
                      finally  
                                      oReq.free;  
                      end;                      
                             
  end;        
 

转载于:https://www.cnblogs.com/delphi2007/archive/2009/04/22/1441102.html