请问如何发送RAR压缩文件到另一台服务器,服务器如何接收呢???

请高手帮忙,,我的代码是不是有错误,文件头不对嘛???在另一台服务器上,用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"