主题：[求助]将& http.responseText的内容写到表里

如题：我从服务器上读取信息，服务器返回信息，已知返回格式为 ：

 OID=23411&PHONE=13012345678&SP_NUMBER= 10655168826278&RECV_TIME= 20080225134241&MSG_CONT=信息内容

怎么样才能让返回的内容按照格式储存到表格里呢，对应列名（oid,phone,sp_number,recv_time,msg_cont)

Dim url As String
Dim http As Object
url = http://218.246.34.171/daredo/pushsms/mingxun_mo.jsp?CP_ID=155901&CP_PASSWORD=210739
http = CreateObject("MSXML2.XMLHTTP")
http.Open("post", url, False)
http.send()
MessageBox.Show ("返回消息:"& http.responseText)
Dim r As Row = Tables("表A").AddNew()
r("czr") = User.Name
r("czsj") = Date.Now

另外，针对这些问题，我应该去哪找教程，请高手指点！