日期:2014-05-19  浏览次数:20770 次

经理让我在asp.net的程序里嵌套rtx的sdk的消息提醒发送示例,但我不知道怎么弄
经理让我在asp.net的程序里嵌套rtx的sdk的消息提醒发送示例,但我不知道怎么弄
我用了vb的脚本。
<script       language= 'vbscript '>      
    sub   test
dim   RTXObj
dim   RTXParams  
dim   RTXResult
Set   RTXObj   =   CreateObject( "rtxserver.rtxobj ")  
Set   RTXParams   =   CreateObject( "rtxserver.collection ")
RTXParams.Add   "USERNAME ",   "1004 "   '消息提醒接收者
RTXParams.Add   "MSGINFO ",   "测试消息   http://rtx.tencent.com   [腾讯   |   http://rtx.tencent.com] "
RTXParams.Add   "TITLE ",   "test "
On   error   resume   next
RTXResult   =   RTXobj.Call2(   &H2100,   RTXParams)  
if(   err.number   <   0)   then
msgbox   err.Description  
exit   sub
end   if
msgbox   "发送成功 "
end   sub    
    </script>
但RTXParams.Add   "USERNAME ",   "1004 "   '消息提醒接收者,这段代码我想把1004换成变量,怎么换呢?

------解决方案--------------------
uup
------解决方案--------------------