📄 smartsms.asp
字号:
<HTML><title>发送成功！</title>
<BODY BGCOLOR="white">
<h1><i><u>WEB</u></i><font face="宋体" size="5">短消息：短消息发送</font></h1>
<HR>
<%
On error resume next
Dim MySmartMessage
Set MySmartMessage = Server.CreateObject("sms_message.sms")
' Server de Send Message
' set series number
' ***************
MySmartMessage.comp =3
' sending Smart Message
' ***************
' set Phone Number
' ***************
MySmartMessage.Number = Request("ToSenderNumber")
' Select Language
' *******
MySmartMessage.en = Request("language")
' Write Message
MySmartMessage.Message = Request("SenderName") &vbcrlf & Request("SenderNumber") &vbcrlf & Request("Message")
MySmartMessage.Sendpro
' To Return Message
' ************
if MySmartMessage.Ok = true then
response.write "您的消息已经成功发出,谢谢您的使用！"
else
response.write "您的消息没有发出，请您仔细检查你的设置."
end if
set mySmartMessage = nothing
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -