请问如何发送RAR压缩文件到另一台服务器,服务器如何接收呢???
tgc99 2006-12-26 01:29:06 请高手帮忙,,我的代码是不是有错误,文件头不对嘛???在另一台服务器上,用Request接收不到数据..
Dim bt() As Byte
Dim bl As Boolean
f = FreeFile
Open RARFile For Binary As #f
ReDim bt(LOF(1) - 1)
Get #f, , bt()
Close #f
Inet1.Execute MYURL, "POST", bt(), "Content-Type: application/x-rar-compressed" & vbCrLf & "SOAPAction: http://tempuri.org/GetTime"