📄 send.asp
字号:
<!--#include file="conn.asp"-->
<%
dim rs,sql
'记录集对象
set rs=server.createobject("adodb.recordset")
set rs2=server.createobject("adodb.recordset")
'获得所选择信息的记录
sql="select * from message where id="&request("id")
'执行查询
rs.open sql,conn,1,3
'更新点击信息
rs("hits") = rs("hits")+1
'提交更新
rs.update
'关闭记录集
rs.close
%>
<html>
<head>
<title>定制业务 发送短信给用户。。</title>
<SCRIPT language=javascript>
function addphone(gn)
{
var list=gn;
var s=new String(document.sms_form.phone.value);
newstr=list.options[list.selectedIndex].value
if (newstr==0)
return false;
if (s.length!=0)
{ document.sms_form.phone.value=s+"\n"+newstr;
}
else
document.sms_form.phone.value=newstr;
return true;
}
function window_onload_modify(superset,subset){
loadsupset(Ar,superset);
exponent_onchange(Br,superset,subset);
}
function loadsupset(arra,spset){
var opt;
clearremark(spset);
if(arra[1][1]==null)
spset.add(new Option(text='请选择组别',value='0'));
for (j=1;j<arra.length;j++){
addtext=arra[j][2];
addvalue=arra[j][1];
spset.add(new Option(text=addtext,value=addvalue));
}
spset.options[0].selected=true;
}
function addsubset(arra,spset,sbset){
var i=spset.value; //selectedIndex;]
var addtext,addvalue;
sbset.add(new Option(text='请选择内容',value='0'));
if (i>0){
for (j=1;j<arra[i].length;j++){
addtext=arra[i][j][2];
addvalue=arra[i][j][1];
sbset.add(new Option(text=addtext,value=addvalue));
}
}
}
function clearremark(Sbset){
var SbsetLen=Sbset.length;
for (i=0;i<SbsetLen;i++){
Sbset.remove(0);
}
}
function exponent_onchange(arr,superset,subset){
clearremark(subset);
addsubset(arr,superset,subset);
}
function check(){
if(document.sms_form.phone.value=="")
{
alert("接收人手机号未填写");
return false;
}
else if(document.sms_form.content.value=="")
{
alert("内容未填写");
return false;
}
else return true;
}
</SCRIPT>
<meta content="text/html; charset=gb2312" http-equiv=Content-Type>
<style type=text/css>
<!--
.menu1 {color:#000066; font-family:宋体; font-size: 9pt; font-weight: bold; line-height:140%}
.menu1 a:link {color:#000066; font-weight: bold; text-decoration: none}
.menu1 a:visited {color:#000066; font-weight: bold; text-decoration: none}
.menu1 a:hover {color:#000066; font-weight: bold; text-decoration: none}
.text0 {font-size:1pt}
.text1 {font-size:9pt;font-family:宋体;line-height:130%}
.text2 {font-size:14.8px;font-family:宋体;line-height:130%}
.form1 {height: 20px; font-size: 9pt; color: #000000; background-color: #ffffff;
border-left: #000D6B 1px solid; border-right: #000D6B 1px solid;
border-top: #000D6B 1px solid; border-bottom: #000D6B 1px solid;}
.form2 {height: 20px; font-size: 9pt; color: #ffffff; background-color: #7FCA4D;
border-left: #AAF078 1px solid; border-right: #58AA21 1px solid;
border-top: #AAF078 1px solid; border-bottom: #58AA21 1px solid;}
a {color: #5168ca; text-decoration: underline}
a:hover {color: #74c351; text-decoration: underline}
a:active {color: #74c351; text-decoration: underline}
.nlink {color: #ffffff; text-decoration: none}
.nlink:hover {color: #5168ca; text-decoration: none}
.nlink:active {color: #ffffff; text-decoration: none}
-->
</style>
<SCRIPT language=javascript>
<!--
function mOvr(src,clrOver) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
src.bgColor = clrOver;
}
}
function mOut(src,clrIn) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
src.bgColor = clrIn;
}
}
function mClk(src) {
if(event.srcElement.tagName=='TD'){
src.children.tags('A')[0].click();
}
}
// -->
</SCRIPT>
<SCRIPT language=JavaScript>
<!-- Begin
function textCounter(field, countfield, maxlimit) {
if (field.value.length > maxlimit)
field.value = field.value.substring(0,maxlimit);
else
countfield.value = maxlimit - field.value.length;
}
function sampleTextCounter(field, maxlimit) {
if (field.value.length > maxlimit)
field.value = field.value.substring(0,maxlimit);
}
// End -->
</SCRIPT>
<style type="text/css">
<!--
td {
font-size: 12px;
color: #666666;
}
-->
</style>
</head>
<body bgcolor=white text=black link=#5168ca vlink=#74c351 alink=#74c351
topmargin=0 leftmargin=0 marginwidth=0 marginheight=0>
<table border=0 cellpadding=0 cellspacing=0 width=622 align=center>
<tr>
<td height="554" bgcolor=#ffffff valign=top
width=1> </td>
<td bgcolor=#ffffff valign=top width=621 height="554"> <table border=0 cellpadding=2 cellspacing=0 width=100% height="106">
<tr>
<td height=104 class=text2>
<%
'查询该条信息的记录
sql="select * from message where id="&request("id")
'执行查询
rs.open sql,conn,1,1
'如果记录集为空,说明记录不存在
if rs.eof and rs.bof Then
'提示用户
response.write "没有找到相关数据。"
'终止程序
response.end
end if
%>
<p><br>
<table width=440 height="137" border="1" align="center" cellspacing="1" bordercolor="#CCCCCC">
<form method="POST" name="sms" action="SmartSms.asp">
<font face=arial size=2> </font>
<tr align="center">
<td height="25" colspan="2"><font class=t6><b>发送短消息 提交：
<%
if not isnull(rs("writer")) Then
%>
<%=rs("writer")%>
<%
Else
%>
不详
<%
end If
%>
来 源：
<%
if not isnull(rs("writefrom")) Then
%>
<%=rs("writefrom")%>
<%
Else
%>
不详
<%
end If
%>
</b></font></td>
</tr>
<tr>
<td height="25"> <p align="right"><b>手机号码： </b> </td>
<td height="25">
<%
'查询所有用户信息
sql = "select * from [user]"
'执行查询
rs2.open sql,conn,1,1
'没有用户信息
if rs2.eof then
response.Write("定制用户库目前为空！")
else
%>
<select name="SenderNumber" id="SenderNumber">
<%
'循环显示每个用户
while not rs2.eof
%>
<option value="<%=rs2("mobile")%>"><%=rs2("mobile")%></option>
<%
'移至下一条记录
rs2.movenext
wend
end If
%>
</select>
(请从定制用户中选择) </td>
</tr>
<tr>
<td height="25"> <p align="center"><b>消息内容</b></p>
<p align="right"><b>（中文40/英文120）</b></p></td>
<td height="25"> <textarea name="Message" cols=40 rows=6><%=rs("content")%></textarea>
</td>
</tr>
<tr align="center">
<td height="27" colspan="2">
<p align="right">
<input name="submit" type="submit" value="短消息发送">
<input class=f2 type=reset value=" 重填 " name="reset2">
</p></td>
</tr>
</form>
</table></td>
</tr>
<tr>
<td height="2" align="center" valign=top class=text2> </td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -