PB9阿里大于发短信



String ls_url,ls_data,ls_response,s_checksum,ls_content
string l_time,s_sendunm,sms_free_sign_name,sms_param
string sms_param_name,sms_param_value,sms_template_code,app_secret,app_key
//用SQL取时间
SELECT CONVERT(VARCHAR(19),GETDATE(),120) as aaa into:l_time from mytable;
//声明ole
OleObject lole_tenyear  

//ls_url = 'http://gw.api.taobao.com/router/rest'
ls_url = 'https://eco.taobao.com/router/rest'
lole_tenyear = CREATE oleobject
lole_tenyear.ConnectToNewObject("Microsoft.XMLHttp")
lole_tenyear.open ("POST",ls_url, false)
lole_tenyear.setRequestHeader ("Content-type","application/x-www-form-urlencoded")
lole_tenyear.setRequestHeader ("charset","utf-8")

//变量区
app_key="12345678"
app_secret="99594d31332f1f64416df852abf805ab"

s_sendu