>>billy145533($_$) >>文件上传一般采用采用FTP较多,而HTTP用的较少,因为既慢又麻烦。 >>用http可以参见 >><<使用 HttpSendRequestEx 进行大型 POST 请求>> >>http://support.microsoft.com/?kbid=177188我下载下来试了一下,里面的asp程序有点小错误,大家用的时候注意 <%@ LANGUAGE="VBSCRIPT" %> <% 'Increase Script Timeout to 10 hours Server.ScriptTimeout = 36000 'Get size of POST data PostSize = Request.TotalBytes Response.Write PostSize 'Read POST data in 1K chunks BytesRead = 0 For i = 1 to (PostSize/1024) ReadSize=1024 PostData = Request.BinaryRead(ReadSize) BytesRead = BytesRead + ReadSize Next
'Read remaining fraction of 1K ReadSize=TotalBytes- BytesRead If ReadSize <> 0 Then PostData = Request.BinaryRead(ReadSize) BytesRead = BytesRead + ReadSize End If ' Send results back to client Response.Write BytesRead Response.Write " bytes were read."%>这里: 'Read remaining fraction of 1K ReadSize=TotalBytes- BytesRead TotalBytes 应该为PostSize晕 例子程序居然会弄错........
用http可以参见
<<使用 HttpSendRequestEx 进行大型 POST 请求>>
http://support.microsoft.com/?kbid=177188
[email protected]
[email protected]
源代码谢谢
[email protected]
[email protected]
3qu
[email protected]
[email protected]
谢谢
>>文件上传一般采用采用FTP较多,而HTTP用的较少,因为既慢又麻烦。
>>用http可以参见
>><<使用 HttpSendRequestEx 进行大型 POST 请求>>
>>http://support.microsoft.com/?kbid=177188我下载下来试了一下,里面的asp程序有点小错误,大家用的时候注意
<%@ LANGUAGE="VBSCRIPT" %>
<%
'Increase Script Timeout to 10 hours
Server.ScriptTimeout = 36000 'Get size of POST data
PostSize = Request.TotalBytes Response.Write PostSize 'Read POST data in 1K chunks
BytesRead = 0
For i = 1 to (PostSize/1024)
ReadSize=1024
PostData = Request.BinaryRead(ReadSize)
BytesRead = BytesRead + ReadSize
Next
'Read remaining fraction of 1K
ReadSize=TotalBytes- BytesRead
If ReadSize <> 0 Then
PostData = Request.BinaryRead(ReadSize)
BytesRead = BytesRead + ReadSize
End If ' Send results back to client
Response.Write BytesRead
Response.Write " bytes were read."%>这里: 'Read remaining fraction of 1K
ReadSize=TotalBytes- BytesRead
TotalBytes 应该为PostSize晕 例子程序居然会弄错........
看看这个能否帮你