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

📄 showpolicy.asp

📁 this a program about talent web database used asp and VB.
💻 ASP
字号:
<!--#include file="tools.asp"-->
<HTML><HEAD><TITLE>法规内容</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="images/zzz.css" type=text/css rel=stylesheet>
<SCRIPT language=JavaScript>
<!--
function SnR_MarkIE(theURL,theName,alertMsg) { //v3.0.3
var agt = navigator.userAgent.toLowerCase(); 
var is_win   = ((agt.indexOf("win")!= -1) || (agt.indexOf("16bit")!= -1));
var is_win95 = ((agt.indexOf("win95")!= -1) || (agt.indexOf("windows 95")!= -1));
var is_win16 = ((agt.indexOf("win16")!= -1) || (agt.indexOf("16bit")!= -1) || (agt.indexOf("windows 3.1")!= -1) || (agt.indexOf("windows 16-bit")!= -1) );
var is_win31 = ((agt.indexOf("windows 3.1")!= -1) || (agt.indexOf("win16")!= -1) || (agt.indexOf("windows 16-bit")!= -1));
var is_win98 = ((agt.indexOf("win98")!= -1) || (agt.indexOf("windows 98")!= -1));
var is_winnt = ((agt.indexOf("winnt")!= -1) || (agt.indexOf("windows nt")!= -1));
var is_win32 = (is_win95 || is_winnt || is_win98 || (agt.indexOf("win32")!= -1) || (agt.indexOf("32bit")!= -1));
//Error Causing Element from above line: ((is_major >= 4) && (navigator.platform == "Win32")) ||
var is_Mac = (agt.indexOf("mac") != -1);

	if (document.all && (is_win32)) { //IE Windows Only
		window.external.AddFavorite(theURL,theName);
		} 
	else { // all others 
		alert(alertMsg); 
		}

}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    obj.visibility=v; }
}
//-->
</SCRIPT>

</HEAD>
<BODY text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0 
onload="MM_preloadImages('images/kk2.gif')">
<!--#include file="title.asp"-->
<%set rsd=server.CreateObject("adodb.recordset")%>
<TABLE class=shuang cellSpacing=0 cellPadding=0 width=778 align=center 
background=images/bg4.gif border=0><!--整体的大表格-->
  <TBODY>
  <TR>
    <TD vAlign=bottom width=193 height=23>
      <TABLE height=19 cellSpacing=0 cellPadding=0 width=180 align=center 
      background=images/bg2.gif border=0>
        <TBODY>
        <TR>
          <TD width=60 height=11>&nbsp;</TD>
          <TD vAlign=center width=76 height=11>
            <DIV class=zzz align=center>法 规 搜 索</DIV></TD>
          <TD width=44 height=11>&nbsp;</TD></TR></TBODY></TABLE></TD>
    <TD vAlign=center width=13 rowSpan=5>&nbsp; </TD>
    <TD vAlign=bottom width=390 height=23 colspan=2>
      <TABLE height=19 cellSpacing=0 cellPadding=0 width=180 
      background=images/bg2.gif border=0>
        <TBODY>
        <TR>
          <TD width=61 height=12>&nbsp;</TD>
          <TD width=72 height=12>
            <DIV class=zzz align=center>政 策 法 规</DIV></TD>
          <TD width=47 height=12>&nbsp;</TD></TR></TBODY></TABLE></TD>
    
    
    </TR>
  <TR>
    <TD vAlign=top width=193 rowSpan=2>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD class=zzz height=32>
            <DIV align=center>
<form method="get" action="policy.asp" id="form1">
            <TABLE class=box1 height=40 cellSpacing=0 cellPadding=0 
            width=180 bgColor=#ffffff border=0 align="center">
              <TBODY>
              
              
              <TR>
                <TD width=180 bgColor=#000000 height=1><IMG height=1 src="" 
                  width=1></TD></TR>
              <TR>
                <TD width=180 background=images/bg3.gif height=26 class="zzz">
                  <DIV align=center><SPAN class=zzz></SPAN></DIV>
                
                
                  <TABLE class=box1 cellSpacing=0 cellPadding=0 width="95%" align=center border=0>
          <td width="35%" align="right">关键字:</td>
      <td width="65%">
      <input type="text" name="keyword" maxlength="50" size="15">
      <input type="hidden" name="a" value="s">
      </td>
    </tr>
     <tr>
      <td width="100%" colspan="2"><div align="right"><p><input class="box1" type="submit"
      value="搜 索" name="b1"></td>
    </tr>
  </table>
                  </TD></TR>
              </TBODY></TABLE>
                  </DIV>
                  
            <DIV align=center>&nbsp;</DIV></TD></TR>
        <TR>
          <TD>
</form>                
           </TD></TR>
      <TABLE class= cellSpacing=0 cellPadding=0 width=180 
      border=00 align="center">
        <TBODY>
  
  

        </TBODY></TABLE>
      </TD>
      
      

      
      
    <TD vAlign=top width=572 colspan=2>
<table class="box1" cellSpacing="0" cellPadding="2" width="550" border="0">
<TBODY>
  <tr>
    <td width="100%">
    <table class="zzz" cellSpacing="0" cellPadding="0" width="100%" bgColor="#E6F2FF" border="0">
<TBODY>
      <tr>
        <td class="zzz" width="70%" height=350 valign="top"><font color="#999999">


<table class="shuang" cellSpacing="0" cellPadding="0" width="550" align="center"
background="images/bg4.gif" border="0">
  <tr>
    <td vAlign="top" width="550"><table cellSpacing="0" cellPadding="1" width="550"
    bgColor="#666666" border="0">
<TBODY>
<%
pid=trim(Request.QueryString("pid"))
strsql="select pid,ptitle,convert(varchar(10),pdat,120) dat,content from tblpolicy where pid=" &pid & " order by pid desc"

set rsd=server.CreateObject("adodb.recordset")
        rsd.Open strsql,conn,adOpenStatic
        

%>
      <tr bgColor="#ffffff">
        <td class="zzz" width="100%" height="30" align="center"><img src="images/newslist.gif" border="0"><%=rsd("ptitle")%><br> <%=rsd("dat")%></td>
      </tr>
       <tr bgColor="#ffffff">
        <td class="zzz" width="100%" height="350" valign="top">&nbsp;&nbsp;&nbsp;&nbsp;
        <%=replace(rsd("content"),chr(10),"<br>&nbsp;&nbsp;&nbsp;&nbsp;")%>
        </td>
      </tr>
</TBODY>
    </table>
    </td>
  </tr>
</table>




        </td>
        </tr>
     </tr>
</TBODY>
    </table>
    </td>
  </tr>
</TBODY>
</table>
       </TD>
       
</TR>

</TBODY></TABLE></TD></TR></TBODY></TABLE>
<!--#include file="footer.asp"-->
</BODY></HTML>

⌨️ 快捷键说明

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