📄 send.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<%
dim sql
dim rs
dim rstype
dim typesql
dim typeid,typename,classname,classid,Nclassname,Nclassid
dim title
classid=request("classid")
if classid<>12 then response.Write("<div align=center><font size=2><br><br>此条信息属于点播业务，点播业务在用户发短信到中国移<br><br>动后，会自动随机选择发送给用户！只有定制业务需要手动发送！</font></div>"):response.End()
set rs=server.createobject("adodb.recordset")
sql="update articles set hits=hits+1 where articleID="&request("id")
rs.open sql,conn,1,3
sql="select Aclass.class,ANclass.Nclass,articles.title,articles.classid,articles.Nclassid from articles,Aclass,ANclass where articles.classid=Aclass.classid and articles.Nclassid=ANclass.Nclassid and articles.articleID="&request("id")
rs.open sql,conn,1,1
if not rs.eof then
title=rs("title")
classid=rs("classid")
Nclassid=rs("Nclassid")
classname=rs("class")
Nclassname=rs("Nclass")
end if
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];
//alert(addtext);
//alert(addvalue);
sbset.add(new Option(text=addtext,value=addvalue));
}
}
//sbset.option[1].selected=true;
//alert(Ar[1][1]);
}
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;
}
// End -->
</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> <%
dim key
sql="select * from articles where articleid="&request("id")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "没有找到相关数据。"
response.end
end if
if rs("Nkey")<>"" then
key=rs("Nkey")
else
key="None News"
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">
<%conn.close
Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/duanxin.mdb")
set rsp=conn.execute("select * from user_dz where not can")
if rsp.eof then
response.Write("定制用户库目前为空！")
else
%>
<select name="SenderNumber" id="SenderNumber">
<%while not rsp.eof%>
<option value="<%=rsp("mobile")%>"><%=rsp("mobile")%></option>
<%rsp.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><%=title%></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 + -