使用ASP发送飞信的免费短信
使用ASP发送飞信的免费短信
要实现在asp网站上发送飞信,要求是中国移动的手机用户,并且开通移动飞信功能。
使用以下asp代码,修改参数为你的手机号及飞信密码,就可以实现在网站发免费短信功能。
fsend.asp文件源代码如下:
<%
Dim fno,fp,tofno,rurl
fno="138xxxxxxxx" '手机号
fp="xxxxxxxx" '飞信密码
tofno="137xxxxxxxx" '发送目标手机号(要求是自己的号码或飞信好友)
rurl="" '提交后转移到的目标地址(留空将不转移)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>请留下你的联系信息</title>
</head>
<body style="font-size: 10pt; font-family: 宋体">
<%if (Request("msg")="") then%>
<form method="POST" action="fsend.asp">
<br>请留下你的联系信息<br>
<hr>
联系信息:<br><textarea rows="5" name="msg" cols="27"></textarea><br>
<p><input type="submit" value="提交" name="B1"></p>
</form>
<%
else
Dim returnString
Dim msg
msg=Request("msg")
returnString=sendf(fno,fp,tofno,msg)
if rurl="" then
Response.Write returnString&"<br><a href='fsend.asp'>返回</a>"
else
Response.Redirect rurl
end if
end if
%>
</body>
</html>
<%
function sendf(fno,fp,tofno,msg)
'函数参数说明:fno=登录手机号,fp=登录密码,tofno=目标手机号,msg=要发送的信息
Dim
相关文档:
<div class="scrollImgList1" id="scrollImgList1">
<div class="LeftBotton" onmousedown="ISL_GoUp_1()" onmouseup="ISL_StopUp_1()" onmouseout="ISL_StopUp_1()"></div>
<div class="Cont" id="ISL_Cont_1">
<div class="ScrCont">
<d ......
ASP.NET Web 部件是一组集成控件,用于创建网站使最终用户可以直接从浏览器修改网页的内容、外观和行为。这些修改可以应用于网站上的所有用户或个别用户。当用户修改页和控件时,可以保存这些设置以便跨以后的各浏览器会话保留用户的个人首选项,这种功能称为个性化设置。这些 Web 部件功 ......
编写过程
过程是一组能执行指定任务且具有返回值的脚本命令。您可以定义自己的过程,然后在脚本中反复调用它们。
您可以将过程定义放在调用过程的 .asp 文件中,也可以将通用过程放在一个共享的 .asp 文件中,然后用 SSI #include 指令将其包含进其他调用其过程的 .asp 文件中。您还可选择另一种方法,即把这些功能打包 ......