String ls_url,ls_data,ls_response
string s_appsecret,s_nonce,s_curtime,s_checksum,ls_content
long l_time
SELECT datediff(ss,'1970-01-01 0:00:00',GETDATE()) as aaa into:l_time from mytable;
s_appsecret="e3fe41f22243"
s_nonce="123456"
s_curtime=string(l_time)
ls_content = space(128)
//计算验证码串,采用网上“pbfunc.dll”的SHA1计算
if SHA1(s_appsecret+s_nonce+s_curtime,ls_content)=1 then
s_checksum=lower(ls_content)
else
s_checksum=""
return
end if
OleObject lole_tenyear //声明ole
ls_url = 'https://api.netease.im/sms/sendtemplate.action'
lole_tenyear = CREATE oleobject
lole_tenyear.ConnectToNewObject("Microsoft.XMLHttp")
lole_tenyear.open ("POST",ls_url, false)
lole_tenyear.setRequestHeader ("Cont