怎样才能给手机发短信？急！急！！急！！！

Question

引用Micoroft Internet ControlsDim strData As New Inet
'参数:?User = 自己手机号&; pwd = 密码&; rcv = 接收方手机号码&; msg = 经过url编码的内容
strData.Protocol = icHTTP
strData.RequestTimeout = 10
    Info = "http://sms.sina.com.cn/cgi-bin/ccgi/esina?user=" & Rst!MobilePhone & "&pwd=" & Rst!NPassWord & "&rcv=" & 手机号码 & "&msg=" & Server.HTMLEncode(信息)
    If BackInfo = "" Or IsNumeric(Left(BackInfo, 2)) = False Then BackInfo = "信息发送失败"
End If
这是是用新浪的手机发送端信：
1、要有自己注册过的手机密码和账号
2、必须要对信息Server.HTMLEncode编码；[引用Micoroft Webclass Library]

Answer 1

在信息后边缺了发送，抱歉
BackInfo = strData.OpenURL(Info, 0)
If BackInfo = "" Or IsNumeric(Left(BackInfo, 2)) = False Then BackInfo = "信息发送失败"

Answer 2

你提供的方法真好，很简便，
但以下代码具体如何使用我不清楚：
Info = "http://sms.sina.com.cn/cgi-bin/ccgi/esina?user=" & Rst!MobilePhone & "&pwd=" & Rst!NPassWord & "&rcv=" & 手机号码 & "&msg=" & Server.HTMLEncode(信息)其中Rst!MobilePhone和Rst!NPassWord是什么意思？是变量吗？是我自己注册过的手机密码和账号？

Answer 3

这个是客户端的发送代码。请问服务器端的程序如何写？
http://sms.sina.com.cn/cgi-bin/ccgi/esina？这个程序应该自己写还是可以从smsgateway那里得到信息？