服务器无法通过http上传文件,用winsock通过http POST方式向服务器上传文件的有关问题...

当前位置:我的异常网» VB » 用winsock通过http POST方式向服务器上传文件的有关

用winsock通过http POST方式向服务器上传文件的有关问题

www.myexceptions.net  网友分享于：2015-08-26  浏览：284次

用winsock通过http POST方式向服务器上传文件的问题

传输到服务器上的文件会出错，服务器端提示org.apache.commons.fileupload.FileUploadBase$IOFileUploadException:   Processing   of   multipart/form-data   request   failed.   Stream   ended   unexpectedly

如果我把传输文件内容替换成文本文件，就没有这个错误了，因此我怀疑是不是我的文件读取程序处需要进行什么处理？？这一点我不太明白该怎么做，请赐教。

我的程序代码如下

[code]

Dim   strHttp   As   String

Dim   strBoundary   As   String

Dim   strBody   As   String

Dim   lngLength   As   Long

Dim   filename   as   string

filename   =   "d:\abc.zip "

'   create   a   boundary

strBoundary   =   "----adfasdf2342nasdfasdfasdf "

strBody   =   strBody   &   "-- "   &   strBoundary

strBody   =   strBody   &   vbCrLf

strBody   =   strBody   &   "Content-Disposition:   form-data;   name= " "id " " "

strBody   =   strBody   &   vbCrLf

strBody   =   strBody   &   vbCrLf

strBody   =   strBody   &   "0001 "

strBody   =   strBody   &   vbCrLf

strBody   =   strBody   &   "-- "   &   strBoundary   &   vbCrLf

strBody   =   strBody   &   "Content-Disposition:   form-data;   name= " "file " ";   filename= " " "   &   _

filename   &   " " " "   &   vbCrLf

strBody   =   strBody   &   "Content-Type:   application/zip "   &   vbCrLf

strBody   =   strBody   &   vbCrLf   &   getFileData(filename)

strBody   =   strBody   &   vbCrLf   &   "-- "   &   strBoundary   &   "-- "   &   vbCrLf

lngLength   =   Len(strBody)

strHttp   =   "POST   /upload.jsp   HTTP/1.0 "   &   vbCrLf

strHttp   =   strHttp   &   "Host:   server "   &   vbCrLf

strHttp   =   strHttp   &   "Content-Type:   multipart/form-data;   boundary= "   &   strBoundary   &   vbCrLf

strHttp   =   strHttp   &   "Content-Length:   "   &   lngLength   &   vbCrLf   &   vbCrLf

文章评论