Private Sub Command6_Click()
Set oXmlHttp = CreateObject("msxml2.XMLHTTP")Dim sPostString     As String, sRespText    As String
  sPostString = "blog_title=2222&frmid=0"       '需要提交的数据
  oXmlHttp.open "POST", "http://control.xxx.cn/article_insert.php", False   'url为处理提交数据的asp页面
  oXmlHttp.setRequestHeader "content-type", "application/x-www-form-urlencoded"
  oXmlHttp.send sPostString                                                                                〈〈〈〈〈〈〈〈问题出现在这里!
  Text2.Text = oXmlHttp.responseText       '得到处理后response回来的数据
  Set oXmlHttp = Nothing
End Sub
为什么运行到  oXmlHttp.send sPostString 会出现“参数不正确”的提示啊?我想做个用msxml2.XMLHTTP发post数据的,为什么不能成功啊?高手来个例子好吗?