📄 equi_mtplan_print.asp.bak
字号:
<%
'************************************************************************
' 文件名: equi_mtplan_print.asp
' Copyright(c) 2001-2002 上海阿尔卡特网络支援系统有限公司
' 创建人 : 周秋舫
' 日 期 : 2002-11-21
' 修改历史 :
' ****年**月**日 ****** 修改内容:********************************************
' 功能描述 : 打印维保计划
' 版 本 :
'************************************************************************
option explicit
%>
<!-- #include file="../include/common.inc" -->
<html>
<head>
<title>上海信息大楼 Shanghai Information Tower</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<link rel="stylesheet" href="../include/common.css" type="text/css">
<style type="text/css" media=print>
.noprint {display:none; BORDER: 1PX SOLID #008800; FONT-SIZE: 9PT}
</style>
<style type="text/css" media=screen>
.noprint {display:block; BORDER: 1PX SOLID #008800; FONT-SIZE: 9PT}
</style>
<OBJECT id=WB classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2" height=0 width=0></OBJECT>
<script language="JavaScript">
function doPrint() { WB.ExecWB(6,1) } // 打印
function doPrintSetup() { WB.ExecWB(8,1) } // 打印设置
function doPrintPreview(){ WB.ExecWB(7,1) } // 打印预览
</script>
</html>
<%
dim conn
dim pYear, pDeptId
dim sDepartment
pYear = GetParam("year")
pDeptId = GetParam("dept_id")
if IsEmpty(pDeptId) then pDeptId = -1
if CStr(pDeptId) <> "-1"then
set conn = DBConnection
sDepartment = DLookUp(conn, "select node_desp from t_node where node_id =" & ToSQL(pDeptId, "Number"))
Disconnect(conn)
end if
'' 负责部门
if sDepartment <> "" then
Response.write "<br><div style=""text-align:left;font-size:11pt;font-weight:400;"">负责部门: " & sDepartment & "</div>"
end if
'' 主体
Response.write Request.Form("IdOfPlanlist")
'' 打印和打印预览的按钮
Response.write "<br>" & vbLF & _
"<table border=0 width=""100%"">" & _
"<tr>" & _
"<td align=right>" & _
"<img src=""../images/button/preview.gif"" class=""noprint"" onclick=""javascript:doPrintPreview();"">" & _
"</td>" & _
"<td width=20></td>" & _
"<td align=left>" & _
"<img src=""../images/button/print.gif"" class=""noprint"" onclick=""javascript:doPrint();"">" & _
"</td>" & _
"</tr>" & _
"</table>" & vbLF
' "</div>" & vbLF
' " " & vbLF & _
%>
<script language="javascript">
// 设置列名一栏的信息
document.all.HeaderCol1.innerText = "序号";
document.all.HeaderCol2.innerText = "系统/设备";
document.all.HeaderCol3.innerText = "内容";
document.all.HeaderCol4.innerText = "计划安排 ( 月份 )";
document.all.HeaderCol5.innerText = "周期";
document.all.HeaderCol6.innerText = "负责部门";
// 设置表头的Style
document.all.PlanlistTitle.innerText = "<%=pYear%>年度维保计划";
document.all.PlanlistTitle.style.fontSize = "14pt";
document.all.PlanlistTitle.style.backgroundColor = "white";
document.all.PlanlistTitle.style.color = "black";
document.all.PlanlistTitle.style.height = "30px";
</script>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -