为什么 小弟我用 IdHTTP post 上传 文件 出错 ? 急
为什么 我用 IdHTTP post 上传 文件 出错 ???? 急!!!!!!!!!!!!!
为什么 我用 IdHTTP1 post 上传 文件 会出错 ???? 急!!!!!!!!!!!!!
我先 uses IdMultipartFormData ;
下面是上传的代码
var
mp: TIdMultiPartFormDataStream ;
begin
mp:= TIdMultiPartFormDataStream.Create ;
mp.AddFormField( 'aa ', 'lfdkgfdfsdfdsf ');
mp.AddFile( 'i:\a.xls ', 'a.xls ', 'application ');
IdHTTP1.Post( 'http://127.0.0.1/RequsetForm/WebForm1.aspx ', mp);
我用的是 indy 9.0.14 ,但上传 时出现错, 提示 : http/1.1 500 internal server error
我的apsx 页面 代码如下:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'在此处放置初始化页的用户代码
Dim i, cc As Integer
For i = 0 To Request.Form.Count - 1
Response.Write(Request.Form.GetKey(i) & " = " & Request.Form(i).ToString() & vbCrLf)
Next
For i = 0 To Request.Files.Count - 1
Request.Files.Item(i).SaveAs( "c:\ " & Request.Files.Item(i).FileName)
Next
End Sub
------解决方案--------------------
500是服务器错误,有上传页面吗?先用页面尝试成功再用delphi做
而且你上传里面要把页面里面的参数给满
为什么 我用 IdHTTP1 post 上传 文件 会出错 ???? 急!!!!!!!!!!!!!
我先 uses IdMultipartFormData ;
下面是上传的代码
var
mp: TIdMultiPartFormDataStream ;
begin
mp:= TIdMultiPartFormDataStream.Create ;
mp.AddFormField( 'aa ', 'lfdkgfdfsdfdsf ');
mp.AddFile( 'i:\a.xls ', 'a.xls ', 'application ');
IdHTTP1.Post( 'http://127.0.0.1/RequsetForm/WebForm1.aspx ', mp);
我用的是 indy 9.0.14 ,但上传 时出现错, 提示 : http/1.1 500 internal server error
我的apsx 页面 代码如下:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'在此处放置初始化页的用户代码
Dim i, cc As Integer
For i = 0 To Request.Form.Count - 1
Response.Write(Request.Form.GetKey(i) & " = " & Request.Form(i).ToString() & vbCrLf)
Next
For i = 0 To Request.Files.Count - 1
Request.Files.Item(i).SaveAs( "c:\ " & Request.Files.Item(i).FileName)
Next
End Sub
------解决方案--------------------
500是服务器错误,有上传页面吗?先用页面尝试成功再用delphi做
而且你上传里面要把页面里面的参数给满