📄 bulletin_publish.asp
字号:
<%@ Language=VBScript %>
<!--#include file= "../dbase.asp"-->
<!--#include file= "../function.asp"-->
<!--#include file= "../department/department_function.asp"-->
<html>
<head>
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
<meta name="GENERATOR" Content="Microsoft Visual Studio.NET 7.0">
<link href="../mstyle.css" rel="stylesheet" type="text/css">
</head>
<body onLoad="MM_preloadImages('images/uparrow.gif')" bgcolor="#f1f1f1">
<form action="bulletin_deal.asp?way=AddNew" method="post" name="form1">
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="60%" height="35" align="center" valign="top"><IMG border="0" src="images/navigation.gif"><b><font size="+1" face="楷体_GB2312, 宋体, 隶书, 黑体">公
告 中 心</font></b></td>
</tr>
<tr>
<td height="22" align="center"><input type="text" name="BTitle" style="width: 100%; font-size: 9pt; " maxlength="50"></td>
</tr>
<tr>
<td height="23" align="center"><textarea name="BContent" wrap="soft" style="width: 100%; height: 200px; font-size: 9pt; "></textarea></td>
</tr>
<tr>
<td height="10" align="center"><label id="Hide" style="display: none" language="javascript" onClick="Show_Hide_AdvancedSet(this);" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('UpOrDown','','images/UpArrowOver.gif',1)"><img src="images/UpArrowOrign.gif" alt="隐藏高级设定" name="UpOrDown" width="50" height="8" border="0"></label>
<label id="Show" language="javascript" onClick="Show_Hide_AdvancedSet(this);" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('DownOrUp','','images/DownArrowOver.gif',1)">
<img src="images/DownArrowOrign.gif" alt="显示高级设定" name="DownOrUp" width="50" height="8" border="0"></label></td>
</tr>
<tr>
<td align="center"><table id="AdvancedSet" style="display: none" width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="111111">
<tr bgcolor="#00FFFF">
<td width="25%" height="24"><li>公告类别</li></td>
<%
if request("UserID")="" then
UserID=Session("UID")
else
UserID=request("UserID")
end if
BulletinKindTemp=userRight("t_BulletinKind",UserID)%>
<td width="25%" height="24" bgcolor="#CCCCCC"><select name="BKind" style="width: 100%">
<%if not isnull(BulletinKindTemp) then
BulletinKind=split(BulletinKindTemp(0,0),",")
for i= 0 to ubound(bulletinkind)
Response.Write("<option value='"&bulletinkind(i)&"' >"&bulletinkind(i)&"</option>")
next
end if
%>
</select></td>
<td width="25%" rowspan="2"> <li> 查收部门</li>
<li>Ctrl+左键鼠标 多选</li>
<li>默认为所在部门</li></td>
<td width="25%" rowspan="3" bgcolor="#CCCCCC"> <select name="BReceive" id="BReceive" style="width: 100%;" size="5" multiple>
<%
DepartmentRight=userRight("t_Department",Session("UID"))'得到用户的管理部门数组，调用函数在../function.asp
DRstr="'"&replace(DepartmentRight(0,0),",","','")&"'"
abc=inspectDepartment(DRstr)'得到所能统计的部门数组,该函数调用../department/department_function.asp
if not isnull(abc) then
for i= 0 to ubound(abc,2)
response.Write ("<option value='"& abc(1,i) &"' "& abc(5,i) &">")
s=string(len(abc(0,i))/2-1," ")
response.Write (s & "┣" & abc(1,i))
response.Write ("</option>")
next
end if
%>
</select> </td>
</tr>
<tr bgcolor="#00FFFF">
<td width="25%" height="24"><li>显示发布人</li></td>
<td width="25%" height="24" bgcolor="#CCCCCC"><input id="ShowOfferManY" name="ShowOfferMan" type="radio" value="y" checked>
<label for="ShowOfferManY">是</label> <input type="radio" id="ShowOfferManN" name="ShowOfferMan" value="n">
<label for="ShowOfferManN">否</label> </td>
</tr>
<tr bgcolor="#00FFFF">
<td width="25%" height="24"><li>粘贴附件</li></td>
<td height="24" colspan="2" bgcolor="#CCCCCC"><INPUT type="text" ID="Accessories" NAME="Accessories" style="width:200px" readonly><INPUT type="button" value="选" onclick="MM_openBrWindow('fj.asp','fj','width=450,height=300')"><INPUT type="button" value="清" onclick="Accessories.value='';"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="30" align="center"><input type="submit" value=" 发 布 "> <input type="reset" value=" 重 置 "></td>
</tr>
</table>
</form>
</body>
</html>
<script language="JavaScript" type="text/JavaScript">
<!--
function Show_Hide_AdvancedSet(tag) {
if (tag == Show) {
tag.style.display='none';
Hide.style.display='';
AdvancedSet.style.display='';
}
if (tag == Hide) {
tag.style.display='none';
Show.style.display='';
AdvancedSet.style.display='none';
}
}
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -