Dim url As String Dim http As Object url = "http://118.145.18.236:9999/smsGBK.aspx?action=send&userid=xxxx&account=xxxx&password=xxxx&mobile=12345678&content=【中心】测试测试&sendTime=&extno=" http = CreateObject("MSXML2.XMLHTTP") http.Open("post", url, False)