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

📄 print.asp

📁 Lirong网络办公系统
💻 ASP
字号:

<HTML>
<HEAD>
<TITLE>打印档案内容</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">

<%	'定义变量
	dim Number,opFlag,rs
	on error resume next
	
	'获取输入参数:记录号和操作标志
	Number=request("Number")
	if Number="" then Number="0"
	Number=Cint(Number)
	opFlag=request("opFlag")
	
	'创建记录访问对象
	Set rs = Server.CreateObject("ADODB.Recordset")
	
	
	'打开记录源,并定位到输入参数决定的记录号
	rs.Open Session("SQL"),Session("conn"),1,3
	rs.move Number


%>
</HEAD>
<body   id=all>
<p align="center"><b><font size="5">企业大事记</font></b>
<p>
事件日期:<%=rs("vtime")%><br>
事件作者:<%=rs("vname")%><br>
事件标题:<%=rs("vtitle")%></p>

<hr size=1>
<%=rs("vtext")%>
<script language=javascript>
window.print();
</script>
<% '关闭记录源
   rs.close
   set rs=nothing
%>   
</body>
</html>

⌨️ 快捷键说明

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