我想把Byte数据上传到服务器.然后更新服务器上的数据.注意:不是文件形式上传.
比如:用户修改密码后.只需将这个新密码值上传到服务器.更新原来的旧密码值.
不是将新密码存入一个文件后,在将这个文件上传.

解决方案 »

  1.   

    Dim strUrl As String
    Dim strHead As String
    Dim isbusy  As Boolean
    Dim NewPassword() As Byte   '用户新密码
             InetHTTP.Protocol = icHTTP
            InetHTTP.RemotePort = 80
            strUrl = "http://www.xxxxx.com/vbtest/pw.txt"'www.xxxxx.com为公司服务器.略去了.
            strHead = "Content-Type: application/x-www-form-urlencoded" & vbCrLf
            NewPassword = Text2.Text
            InetHTTP.Execute strUrl, "post ", NewPassword, strHead        isbusy = InetHTTP.StillExecuting '等待请求,       
            Do While isbusy
            isbusy = InetHTTP.StillExecuting
              DoEvents
            Loop
            MsgBox "用户密码修改完成", vbInformation, "系统信息"
            InetHTTP.Execute , "close"
    为什么执行后没有修改成功?有谁做过的哟.谢谢了