📄 economiclaw_sp_show.asp

📁 OFFICE办公自动化
💻 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="tbioaEconomicLaw_lxa" '表名
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from " & table & " where ID="&pid
rs.open sql,oConn,1,1
'--------------------------------------------取记录
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from " & table & " where ID="&pid
rs.open sql,oConn,1,1
'------------------------------------------------
function showvalue(field)
	if rs.eof then
		showvalue=""
	else
		if (isnull(rs(field))) then showvalue="" else showvalue=Server.HTMLEncode(rs(field))
	end if
end function
%>

<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">
  <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")))%> &nbsp;
    提交人：<%=HtmlOut(GetUserName(rs("userid")))%> &nbsp;
    提交时间：<%=rs("sdate")%> &nbsp;
    状态：<%=GetEconoLxaMod(rs("smod"))%> </DIV>
</DIV>
<DIV align="center">
<P ALIGN="center" STYLE="font-size: 16px; line-height: 30px"><B>四川省工商行政管理机关<BR>行政处罚案件有关事项审批表</B></P>
  <TABLE WIDTH="612" BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0">
  <TD HEIGHT="28">填表单位:<%=GetTableValue("tbioaDepartment","Name","id",rs("area"))%></TD>
      <TD ALIGN="right">编号:<%=showvalue("bh")%> </TD>
  </TR>
  <TR>
    <TD COLSPAN="2"><TABLE WIDTH="100%" BORDER="0" CELLPADDING="1" CELLSPACING="1" BORDERCOLOR="#FFFFFF" BGCOLOR="#999999">
      <TR>
        <TD WIDTH="12%" ALIGN="center" BGCOLOR="#FFFFFF">案件名称</TD>
        <TD HEIGHT="33" BGCOLOR="#FFFFFF">&nbsp;<%=showvalue("ajmc")%></TD>
      </TR>
      <TR>
        <TD ALIGN="center" BGCOLOR="#FFFFFF"><P>当事人姓名<BR>
          或&nbsp; 名&nbsp; 称</P></TD>
        <TD WIDTH="88%" HEIGHT="48" BGCOLOR="#FFFFFF">&nbsp;<%=HtmlOut(rs("dsrxm"))%></TD>
      </TR>
      <TR>
        <TD ALIGN="center" BGCOLOR="#FFFFFF">审批事项</TD>
        <TD HEIGHT="39" BGCOLOR="#FFFFFF">&nbsp;<%=showvalue("spsx")%></TD>
      </TR>
      <TR>
        <TD ALIGN="center" BGCOLOR="#FFFFFF">提请审批<BR>
          的理由及<BR>
          依&nbsp;&nbsp;&nbsp; 据</TD>
        <TD BGCOLOR="#FFFFFF"><%=showvalue("sply")%>
              <DIV ALIGN="right"> &nbsp;<BR>
                承办人：<%=showvalue("spcbr")%> &nbsp;办理日期：<%=showvalue("spcbrq")%></DIV></TD>
      </TR>
      <TR>
        <TD ALIGN="center" BGCOLOR="#FFFFFF">承办<BR>
          机构<BR>
          意见</TD>
        <TD HEIGHT="143" BGCOLOR="#FFFFFF"><%=showvalue("spcbjgyj")%>
              <DIV ALIGN="right"><BR>
                &nbsp;办理日期：<%=showvalue("spcbjgrq")%></DIV></TD>
      </TR>
      <TR>
        <TD ALIGN="center" BGCOLOR="#FFFFFF">局领导<BR>
          意&nbsp; 见</TD>
        <TD HEIGHT="148" BGCOLOR="#FFFFFF">&nbsp;<%=showvalue("spjldyj")%>
              <DIV ALIGN="right"><BR>
                &nbsp; 办理日期：<%=showvalue("spjldrq")%> </DIV></TD>
      </TR>
    </TABLE></TD>
  </TR>
  </TABLE>
</DIV>
</BODY>

</HTML>

<%'释放对象变量
rs.close
oConn.close
%>
⌨️ 快捷键说明

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