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

📄 duiwfw_cx.asp

📁 一套asp办公小软件
💻 ASP
字号:
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>对外发文</title>
</head>
<link rel="stylesheet" type="text/css" href="../tourism/Admin_Style.css">

 <LINK href="../tourism/images/css.css" type=text/css rel=stylesheet>
<!--#include file="Global.asp" -->

 <body topmargin="3" style="background-color: #4D4D4D">
  
	 <form action="duiwfw_cxjm.asp?sj1=1" method="post" name="form1" target="_self">      
          <table BORDER=1 cellspacing=0  cellpadding=0   bordercolordark=#FFFFFF  width="100%" class=12Font height="165" bgcolor="#EAEAEA" >
          
            <tr>
              <td height="35" align="right" colspan="2" background="images/topBar_bg.gif" >
				<p align="center"><b><font size="3">对外发文查询</font></b></td>
              </tr>
	<tr> 
      <td width="20%" align="right"><strong>题名:</strong></td>
      <td> 
        <input name="Title" size="30" id="Title" value="">
        <select  size="1" name="sele1">
        <option value="1"></option>
       <%sql="select * from duiwfw order by tim"
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
      while not rs.eof%>
      <option value=<%=rs("tim")%>><%=rs("tim")%></option>
      <%rs.movenext
        wend%>
      </select>

      </td>
    </tr>
    
    <tr > 
      <td align="right"><strong>主题词:</strong></td>
      <td> 
        <input type="text" name="Title1" size="30" id="Title1" value="">
        <select  size="1" name="sele2">
        <option value="1"></option>
       <%sql="select * from duiwfw where zhutc<>'' order by zhutc"
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
       while not rs.eof%>
      <option value=<%=rs("zhutc")%>><%=rs("zhutc")%></option>
      <%rs.movenext
        wend%>
      </select>

        </td>
    </tr>
    <tr > 
      <td align="right"><strong>文号:</strong></td>
      <td> 
        <input type="text" name="Title6" size="30" id="Title6" value="">
        <select  size="1" name="sele3">
        <option value="1"></option>
       <%sql="select * from duiwfw where wenjwh<>'' order by wenjwh"
       'response.write(sql)
       'response.end
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
       while not rs.eof%>
      <option value=<%=rs("wenjwh")%>><%=rs("wenjwh")%></option>
      <%rs.movenext
        wend%>
      </select>

        </td>
    </tr>
<tr> 
      <td align="right"><strong>收文单位:</strong></td>
      <td> 
        <input type="text" name="Title11" size="30" id="Title11" value="">
        <select  size="1" name="sele11">
        <option value="1"></option>
       <%sql="select * from duiwfw where shouwdw<>'' order by shouwdw"
       'response.write(sql)
       'response.end
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
       while not rs.eof%>
      <option value=<%=rs("shouwdw")%>><%=rs("shouwdw")%></option>
      <%rs.movenext
        wend%>
      </select>

        </td>
    </tr>

    <tr> 
      <td align="right"><strong>电子文件名:</strong></td>
      <td> 
        <input type="text" name="Title2" size="30" id="Title2" value="">
        <select  size="1" name="sele4">
        <option value="1"></option>
       <%sql="select * from duiwfw where dianzwjm<>'' order by dianzwjm"
       'response.write(sql)
       'response.end
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
       while not rs.eof%>
      <option value=<%=rs("dianzwjm")%>><%=rs("dianzwjm")%></option>
      <%rs.movenext
        wend%>
      </select>

        </td>
    </tr>
    <tr > 
      <td align="right"><strong>责任者:</strong></td>
      <td> 
        <input type="text" name="Title3" size="30" id="Title3" value="">
        <select  size="1" name="sele5">
        <option value="1"></option>
       <%sql="select distinct(zerz) as zer from duiwfw where zerz<>'' order by zerz"
       'response.write(sql)
       'response.end
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
       while not rs.eof%>
      <option value=<%=rs("zer")%>><%=rs("zer")%></option>
      <%rs.movenext
        wend%>
      </select>

        </td>
    </tr>
    <tr > 
      <td width="20%" align="right"><strong>成文日期:</strong></td>
      <td width="80%"> 
       >= <input type="text" name="Title4" size="27" id="Title4" value=""> and <= <input type="text" name="Title41" size="20" id="Title41" value="">
      </td>
    </tr>
    <tr > 
      <td width="20%" align="right"><strong>分类号:</strong></td>
      <td width="80%"> 
        <input type="text" name="Title5" size="30" id="Title5" value="">
         <select  size="1" name="sele6">
        <option value="1"></option>
       <%sql="select distinct(fenlh) as fen from duiwfw where fenlh<>'' order by fenlh"
       'response.write(sql)
       'response.end
       set rs=server.createobject("adodb.recordset")
	   rs.open sql,conn,1,1
      
       while not rs.eof%>
      <option value=<%=rs("fen")%>><%=rs("fen")%></option>
      <%rs.movenext
        wend%>
      </select>
</td>
    </tr>
    
   
               
			<tr>
              <td valign="top" > </td>
              <td valign="top" height="25" >
				<input name="Save" type="image" id="Save" value="提交"  src=images/save.gif  height="21" width="72" > 
                <a href="../../qunjlsgl/yewu/yewGONGNENG.asp">
				<img src="images/return.gif"  height="21" border="0" width="72"></a> 
              </td>
            </tr>
           
          </table>
        </form>
</body>
</html>
	

⌨️ 快捷键说明

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