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

📄 news_query.asp

📁 ASP程序实现的科技期刊系统
💻 ASP
字号:
<!--#include file="../Include/TimeOut.asp"-->
<%if session("IPno")="no" then Response.Redirect "../Messagebox/error.asp?info=您无浏览此页的权限!!"%>
<%modulecode="0301"%>
<!--#include file="../Include/ModuleUserCheck.asp"-->
<html>
<head>
<title>查询</title>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

</head>

<body bgcolor="#E7F6FD" text="#000000">
<div align="left">
  <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr> 
      <td bgcolor="#336699"><img src="../public/images/find.jpg" width="300" height="50"> 
        <font color="#00FFFF">   新闻查询</font></td>
    </tr>
  </table>
  <table width="100%" border="1" cellspacing="0" cellpadding="0" bordercolor="#336699" align="center">
    <tr> 
      <td> 
        <table style="font-size:9pt;" width="100%" border="0" cellspacing="0" cellpadding="0">
          <form name="form1" method="post" action="../news/news_EditList.asp?strsql=query&ListType=<%=request.querystring("ListType")%>">
            <tr bgcolor="#CAEAFF"> 
              <td width="19%">&nbsp;</td>
              <td width="1%">&nbsp;</td>
              <td width="80%">&nbsp;</td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td width="19%"> 
                <div align="right">标题</div>
              </td>
              <td width="1%">&nbsp;</td>
              <td width="80%"> 
                <input type="text" name="NewsTitle" maxlength="50" size="40">
              </td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td width="19%"> 
                <div align="right"></div>
              </td>
              <td width="1%">&nbsp;</td>
              <td width="80%">&nbsp;</td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td width="19%"> 
                <div align="right">发送类别</div>
              </td>
              <td width="1%">&nbsp;</td>
              <td width="80%"> 
                <input type="radio" name="NewsType" value="全体">
                全体 
                <input type="radio" name="NewsType" value="部门">
                部门 
                <input type="radio" name="NewsType" value="个人">
                个人 </td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td width="19%"> 
                <div align="right"></div>
              </td>
              <td width="1%">&nbsp;</td>
              <td width="80%">&nbsp; </td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td align="right" width="19%">发布日期</td>
              <td width="1%">&nbsp;</td>
              <td width="80%"> 
                <input type="checkbox" name="CheckSendDate" value="sendckecked">
                <input name="FromSendyear"maxlength=4 size="4" value="<%=year(date)%>">
                <select name="FromSendMonth">
                  <%for i=1 to 12%>
                  <option value="<%=i%>"<%if month(date)=i then response.write "selected" end if %>> 
                  <%=i%></option>
                  <%next %>
                </select>
                <select name="FromSendDay">
                  <%for i=1 to 31%>
                  <option value="<%=i%>"<%if day(date)=i then response.write "selected" end if %>> 
                  <%=i%></option>
                  <%next %>
                </select>
                日 至 
                <input name="ToSendyear"maxlength=4 size="4" value="<%=year(date)%>">
                <select name="ToSendMonth">
                  <%for i=1 to 12%>
                  <option value="<%=i%>"<%if month(date)=i then response.write "selected" end if %>> 
                  <%=i%></option>
                  <%next %>
                </select>
                <select name="ToSendDay">
                  <%for i=1 to 31%>
                  <option value="<%=i%>"<%if day(date)=i then response.write "selected" end if %>> 
                  <%=i%></option>
                  <%next %>
                </select>
                日</td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td width="19%">&nbsp;</td>
              <td width="1%">&nbsp;</td>
              <td width="80%">&nbsp;</td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td colspan="3">&nbsp;</td>
            </tr>
            <tr bgcolor="#CAEAFF"> 
              <td width="19%">&nbsp;</td>
              <td width="1%">&nbsp;</td>
              <td width="80%" bgcolor="#CAEAFF">&nbsp;</td>
            </tr>
            <tr bgcolor="#336699"> 
              <td width="19%" height="22" bgcolor="#336699"> 
                <div align="right"> 
                  <input type="checkbox" name="checkbox" value="checkbox">
                  <font color="#FF0000"> <font color="#FFFFFF">模糊查询</font></font></div>
              </td>
              <td width="1%" height="22">&nbsp; </td>
              <td width="80%" bgcolor="#336699" height="22"> 
                <div valign="center"> 
                  <div align="right"> 
                    <input class="button" type="submit" name="Submit" value="查询">
                    <input class="button" type="reset" name="Submit2" value="重填">
                    <% if Request.QueryString("query")="query" then %>
                    <input class="button" type="button" name="Submit3" value="返回"onclick="back()">
                    <% end if%>
                  </div>
                </div>
              </td>
            </tr>
          </form>
        </table>
      </td>
    </tr>
  </table>
</div>
</body>
</html>
<script language="vbscript">
function back()
history.back 
end function
</script>

⌨️ 快捷键说明

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