📄 search.asp
字号:
<%
if request("addok")="" then
if request("k")="" then
response.write "请输入查找内容"
response.end
else
%>
<%MDBpath="../inc/"%>
<!--#include file="../inc/mdb_path_info.asp"-->
<%
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select id,title,date,hits,info from infodown where title like '%"&request("k")&"%' order by date desc",conn,1,1
if not rs.eof then
do while not rs.EOF
oldcx=oldcx&"<tr height=22><td width=""67%"">·<a href="&rs("id")&".asp><b>"&rs("title")&"</b></a></td><td width=""13%"" align=center>"&year(rs("date"))&"-"&month(rs("date"))&"-"&day(rs("date"))&"</td><td width=""10%"" align=center>免费</td><td width=""10%"" align=center>"&rs("hits")&"</td></tr><tr><td colspan=4 height=35 valign=top> <font color=ff0000>简介：</font>"&left(rs("info"),80)&"</td></tr><tr><td colspan=4 height=1 bgcolor=333333></td></tr>"
rs.MoveNext
loop
else
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "http://so.stock01.com/q/?k="&request("k")&"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="下载搜索">
<title>下载搜索</title>
</head>
<body topmargin="1" leftmargin="1">
<!--#include file="../inc/top.asp"-->
<table border=0 width=760 cellspacing=0 cellpadding=0 align=center bgcolor=ffffff style="border-collapse: collapse">
<form onsubmit="window.location=this.field.options[this.field.selectedIndex].value+this.k.value; return false;">
<tr>
<td height=30 colspan=5 align="center" bgcolor="#FFFFFF">
软件搜索: <input name="k" size="50" value='<%=request("k")%>' maxlength='60' onFocus='this.select();' />
<select name="field">
<option value="search.asp?k="&request("k")&"">下载中心</option>
<option value="../stock/search.asp?k="&request("k")&"">资讯中心</option>
<option value="../bbs/search.asp?k="&request("k")&"">BBS论坛</option>
</select>
<input type="submit" value="开始搜索" /></td></form></tr>
<tr><td width="100%" height="2" colspan=5 bgcolor="#e6e6e6"></td></tr>
<%if oldcx<>"" then%>
<tr>
<td width="100%" valign="top" height="2" align="left" align=center>
<table border="0" width="750" cellspacing=1 cellpadding="0" align=center>
<tr><td height=20 colspan=4> <a href="../">首 页</a> → <a href="1_1.asp">证券软件下载</a> → 搜索结果:名称简介 -<font color=ff0000><%=request("k")%></font> [注意:搜索软件请不要带版本]</td></tr>
<tr height=22 bgcolor=ffffff><td bgcolor=0064a8><font color=ffffff> 软件名称</font></td><td align=center bgcolor=0064a8><font color=ffffff>整理日期</font></td><td bgcolor=0064a8 align=center><font color=ffffff>授权</font></td><td bgcolor=0064a8 align=center><font color=ffffff>人气</font></td></tr>
<%=oldcx%>
<%end if%>
</table>
</td></tr></table>
<!--#include file="../inc/foot.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -