📄 ad_djz.asp
字号:
<%
'OA 表单生成器1.0
'功能：查看户外广告登记表
'参数：request("id")=int #记录ID
%>
<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->
<%
'response.buffer=false
'------------------------------------------------设置参数
LoginID=trim(Session("LoginID")) : if LoginID="" then LoginID=0 '当前用户ID
pid=request("id") '记录ID
'------------------------------------------------
'------------------------------------------------取记录
'取要查看的记录 （返回rs对象）
table="tbioaAd" '表名
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from " & table & " where ID="&pid
rs.open sql,oConn,1,1
'------------------------------------------------
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/main.css" type=text/css>
<title>户外广告登记证</title>
</head>
<body topmargin="10" leftmargin="10">
<div class="noprint">
<table border="0" cellspacing='0' cellpadding='4' width="100%" class="noprint" style="border-bottom: 1 dotted #808080">
<tr>
<td nowrap>
<img src="../images/icon_title.gif" align="absMiddle"> <b>户外广告登记证</b>
</td>
<td width="85" nowrap>
<object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2" > </object>
<img src="../images/PageSetup.gif" align="absMiddle"> <a href="#" onClick="document.all.WebBrowser.ExecWB(8,1);return false">
页面设置</a>
</td>
<td width="85" nowrap>
<img src="../images/print.gif" align="absMiddle"> <a href="#" onClick="document.all.WebBrowser.ExecWB(7,1);return false">
打印预览</a>
</td>
<td width="85" nowrap>
<img src="../images/icon_close.gif" align="absMiddle"> <a href="javascript:window.close()">
关闭窗口</a>
</td>
</tr>
</table>
<br>
提交单位：<%=HtmlOut(GetTableValue("tbioaDepartment","Name","id",rs("area")))%>
发证人：<%=HtmlOut(GetUserName(rs("fzr")))%>
发证日期：<%=rs("fzrq")%>
<hr width="100%" size=1 color="#000000">
</div>
<table border="0" width="680" align="center" cellspacing="10" height="658">
<tr>
<td width="100%" align="center" style="font-size: 26pt; line-height: 100%; letter-spacing: 15" height="34"><B>户外广告登记证</B></td>
</tr>
<tr>
<td width="100%" align="right" height="40" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>登记证号：</b><%=HtmlOut(rs("djzbh"))%></td>
</tr>
<tr>
<td width="100%" height="40" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>发布单位名称：</b><%=HtmlOut(rs("fbdw"))%></td>
</tr>
<tr>
<td width="100%" height="100" valign="top" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>广告发布地点及具体位置：</b>
<blockquote>
<%=HtmlOut(rs("fbwz"))%>
</blockquote>
</td>
</tr>
<tr>
<td width="100%" height="40" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>发布期限：自</b> <%=formatdatetime(rs("fbqxs"),1)%>
<b>至</b> <%=formatdatetime(rs("fbqxe"),1)%> </td>
</tr>
<tr>
<td width="100%" height="100" valign="top" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>广告形式、数量及规格：</b><br>
<blockquote>
<%=HtmlOut(rs("ggxs"))%>
</blockquote>
</td>
</tr>
<tr>
<td width="100%" height="40" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>广告名称<%=HtmlOut(rs("ggmc"))%>：</b></td>
</tr>
<tr>
<td width="100%" valign="top" height="150" style="font-family: 黑体; font-size: 14pt; line-height: 100%"><b>广告样件编号：</b><%=HtmlOut(rs("yjbh"))%></td>
</tr>
<tr>
<td width="100%" align="right" height="40" style="font-family: 黑体; font-size: 14pt; line-height: 100%">
<blockquote>
<b>发证机关：</b>武胜县工商行政管理局
</blockquote>
</td>
</tr>
<tr>
<td width="100%" align="right" height="150" valign="top" style="font-family: 黑体; font-size: 14pt; line-height: 100%">
<blockquote>
<%=formatdatetime(date(),1)%>
</blockquote>
</td>
</tr>
<tr>
<td width="100%" height="42" style="font-family: 黑体; font-size: 14pt; line-height: 100%">附注：1．附广告样件（盖发证机关骑缝章有效）<br>
<%if rs("bzyq") then%>
2．□发布广告应标注本登记证号 ■同意不标注本登记证号
<%else%>
2．■发布广告应标注本登记证号 □同意不标注本登记证号
<%end if%>
</td>
</tr>
</table>
</body>
</html>
<%'释放对象变量
rs.close
oConn.close
%> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -