idhttp上传,一直搞不定,请大家帮忙了,不胜感激!

                            
procedure   TForm1.Button1Click(Sender:   TObject);   
  var  
  res   :   String;  
      mps   :   TMsMultiPartFormDataStream;  
  begin  
   
      try  
          mps   :=   TMsMultiPartFormDataStream.Create;  
          mps.AddFile('file1','c:\inetpub\capture.asf','');  
          res:=idhttp1.Post('http://ls/test.asp',mps);  
      finally  
          mps.Free;  
      end;  
  end;  
   
  <test.asp>采用左轻候的upfile  
   
  作者主页:http://www.wushuang.net(无双谱)  
  邮件地址:onekey@163.com  
   
  <%'  
  Set   upfile   =   Server.CreateObject("myobj.upfile")  
  upfile.filesaveas("c:\"+upfile.filename)  
  set   upfile   =   nothing  
  %>  
   
  上传时报错:http:/1.1/500   internal   server   error.  
   
    inty   采用9.0.18.  
   
  折腾到0:00,仍不行,请大家指点!!!!  
   
 

查看回复