📄 print.asp
字号:
<!--#include file=function.asp-->
<!--#include file=conn.asp-->
<!--#include file=const.asp-->
<meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb2312">
<!--#include file=style.asp-->
<body leftmargin="0" topmargin="0">
<%
founderr=false
if request("id")="" then
founderr=true
errmsg=errmsg+"<li>请选择图片!</li>"
else
set rs = server.createobject("adodb.recordset")
id=request("id")
sql="select pic.hits,pic.no,pic.best,pic.key,pic.title,pic.size,pic.sign,pic.text,pic.creattime,pic.collecttime,pic.updatetime,pic.value1,pic.value2,pic.content,pic.images,pic.authorid,author.author from pic,author where pic.authorid=author.authorid and pic.id="&id
rs.open sql,conn,1,1
if rs.eof and rs.bof then
founderr=true
errmsg=errmsg+ "<li>没有找到相关图片,可能已经被管理员删除!</p>"
else
call showcontent()
end if
end if
if founderr=true then call error()
sub showcontent()%>
<table align=center border=0 cellpadding=2 cellspacing=1 width=298 height=215 bgcolor="<%=Tablebackcolor%>">
<tr>
<td align=center height=18 valign=top width=151 bgcolor="<%=Tablebodycolor%>"> <img src=<%=rs("images")%> width=151 onLoad="javascript:if(this.height>200)this.height=200;else if(this.width>150)this.width=150;" border="0" alt="点击查看原图片"></a></td>
<td height=18 valign=top width=147 bgcolor="<%=Tablebodycolor%>">
<div align=center><b><%=rs("title")%></b></div>
<b>编 号:</b><%=rs("no")%><br>
<b>作 者:</b><%=rs("author")%><br>
<b>尺 寸:</b><%=rs("size")%> <br>
<b>印 记:</b><%=rs("sign")%><br>
<b>纸 本:</b><%=rs("text")%><br>
<b>创作时间:</b><%=rs("creattime")%><br>
<b>内容简介:</b><%=rs("content")%><div align=center>时间: 签名:</div></td>
</tr>
</table>
<%end sub
set rs=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -