⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 writesmsbumen.asp

📁 绿叶oa系统办公自动化 2008.工作日志管理,文件管理
💻 ASP
字号:

<!--#include file="../../Connections/oavbsconn.asp" -->
<!--#include file="../../Connections/ifr/ifrasp.asp" -->
<%
' *** Restrict Access To Page: Grant or deny access to this page
MM_authorizedUsers=""
MM_authFailedURL="/../index.asp"
MM_grantAccess=false
If Session("userssdfgfhtrh") <> "" Then
  If (true Or CStr(Session("MM_UserAuthorization"))="") Or _
         (InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1) Then
    MM_grantAccess = true
  End If
End If
If Not MM_grantAccess Then
  MM_qsChar = "?"
  If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&"
  MM_referrer = Request.ServerVariables("URL")
  if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" & Request.QueryString()
  MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" & Server.URLEncode(MM_referrer)
  Response.Redirect(MM_authFailedURL)
End If
%>

<%

Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_oavbsconn_STRING
Recordset1.Source = "SELECT * FROM usertertggbng ORDER BY 排序 ASC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
%>
<%
function DbCombox() 
Dim Recordset3
Dim Recordset3_numRows

Set Recordset3 = Server.CreateObject("ADODB.Recordset")
Recordset3.ActiveConnection = MM_oavbsconn_STRING
Recordset3.Source = "SELECT 部门  FROM sms部门表  WHERE 部门<>'对所有人群发' and 开关='开'  ORDER BY 排序 asc"
Recordset3.CursorType = 0
Recordset3.CursorLocation = 2
Recordset3.LockType = 1
Recordset3.Open()
while not Recordset3.eof 
msg = msg & "<option value=""" &Recordset3("部门") & """>" & Recordset3("部门") & "</option>" 
Recordset3.movenext 
wend 
Recordset3.close 
set Recordset3 = nothing 
DbCombox = msg 
End function 

Recordset3_numRows = 0
%>



<html>
<head>


<script language="JavaScript">
<!--
function check() {
if (document.form1.userdept.value=="请选择部门") {
window.alert ("请选择部门!")
document.form1.userdept.focus()
return false
}


if (document.form1.标题.value=="") {
window.alert ("请您输入标题!")
document.form1.标题.focus()
return false
}
 

   
     if(!confirm('您确定要对部门群发消息吗,服务器通信将迅疾处理?'))
 {
return false
} 
else 
document.form1.submit
}


//-->
</SCRIPT>


<script Language="JavaScript">
function form_check()
{
	if(document.form1.接收人.value.length<1)
	{
		window.alert("请选择发送目标");
		document.form1.City.focus();
		return (false);
	}
}
function addsendtouser()
{
	var sendtouserstr,sendtouserstr1;
	sendtouserstr='|'+document.form1.userdept.value+':'+document.form1.City.value;
	sendtouserstr1='|'+document.form1.userdept.value+':所有人';
	if (document.form1.sendto.value.indexOf(sendtouserstr)==-1)
	{
		if (document.form1.City.value=="所有人") 
		{	document.form1.sendto.value=document.form1.sendto.value+'|'+document.form1.userdept.value+':'+document.form1.City.value;
		document.form1.sendto.value=document.form1.sendto.value;
		}
		else if (document.form1.City.value!="所有人" && document.form1.sendto.value.indexOf(sendtouserstr1)==-1)
		{
document.form1.sendto.value=document.form1.sendto.value+'|'+document.form1.City.value;
		document.form1.sendto.value=document.form1.sendto.value;
		}
		else
		{
			alert("该发送目标已包含在所有人中!");
		}
	}
	else
	{
		alert("该发送目标已经存在!");
	}
}
</script>




<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>短消息发送</title>
<style type="text/css">
<!--
.style2 {color: #FF0000}
.style5 {color: 12; font-size: 12px; }
.style1 {color: #FFFFFF}
.style37 {font-size: 12px}
.style39 {
	font-size: 14px;
	font-weight: bold;
}
-->
</style>
</head>

<body>
<div align="center">
  <table width="760" border="0" cellpadding="0" cellspacing="0">
    <tr>
      <td width="814" height="20"><table width="760" height="21" border="0" cellpadding="0" cellspacing="0" background="../../img/bw/line.gif">
          <tr>
            <td><div align="center" class="style1"> <span class="style39">对 部 门 群 发</span></div></td>
          </tr>
      </table></td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="1" bgcolor="#5AAE18">
    <tr>
      <td bgcolor="#FFFFFF"><table width="99%" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td><form action="writepostbumen.asp" method="post" name="form1" onsubmit="return check()">
              <table width="99%" border="0" cellpadding="3" cellspacing="0">
                <tr bgcolor="#FFFFFF">
                  <td height="10" colspan="2"></td>
                  </tr>
                <tr bgcolor="#FFFFFF">
                  <td width="92"><div align="left" class="style5">选择接收人:</div></td>
                  <td width="639"><div align="left">
                      <select name="userdept" >
                        <option value="请选择部门" selected>请选择部门</option>
                        <%=DbCombox()%>
                      </select>
                      <input type="button" name="Submit" value="选择群组" onClick="javascript:document.location.href='../sms/qun/myqun.asp'">
                      <input name="city" type="hidden" id="city" value="对所有人群发">
                  </div></td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td><div align="left" class="style5">标题:</div></td>
                  <td><input name="标题" type="text" id="标题" size="30" maxlength="50"></td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td><p align="center"><img src="../../toall/gw/img/gif/pic4.gif" width="43" height="50"><br>
                  </p></td>
                  <td><input name="content" type="hidden" id="content">
                      <iframe ID="content" src="/toall/htmledit/ewebeditor.asp?id=content&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"> </iframe>
                  </td>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <td height="10" colspan="2"></td>
                  </tr>
                <tr bgcolor="#FFFFFF">
                  <td><input name="信息属性" type="hidden" id="信息属性" value="短消息">
                      <input name="发送人帐号" type="hidden" id="发送人帐号" value="<%= Session("userssdfgfhtrh") %>">
                      <input name="发送人姓名" type="hidden" id="发送人姓名" value="<%= Session("names") %>">
                      <input name="datas" type="hidden" id="datas" value="<%=date%>"></td>
                  <td><span class="style37"><span class="bg"><span class="bg style2"><STRONG><FONT color=#ffffff><strong><font color=#ffffff><STRONG><FONT color=#ffffff><STRONG><FONT color=#ffffff><strong><font color=#ffffff><strong><font color=#ffffff><strong><font color=#ffffff><strong><font color=#ffffff><STRONG><FONT color=#ffffff><strong><font color=#ffffff><STRONG><FONT color=#ffffff><strong><font color=#ffffff>
                  <input name="提交" type=submit style="FONT-SIZE: 12px; HEIGHT: 27px"  value=" 发 送 "  >
                  </font></strong></FONT></STRONG></font></strong></FONT></STRONG>  </font></strong></font></strong></font></strong> </font></strong></FONT></STRONG> </FONT></STRONG> <STRONG><FONT color=#ffffff> <strong><font color=#ffffff>
                  <input name="按钮" type=button style="FONT-SIZE: 12px; HEIGHT: 27px"   onClick="javascript:history.go(-1)" value= " 取 消 " >
                  </font></strong></FONT></STRONG></font></strong></FONT></STRONG></span></span></span></td>
                </tr>
              </table>
          </form></td>
        </tr>
      </table></td>
    </tr>
  </table>
  <p>&nbsp;</p>
</div>
</body>
</html>


⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -