📄 fl.asp
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=http://www.59163.com/ -->
<HTML><HEAD><TITLE>非常视觉</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META http-equiv=Window-target content=_top>
<META content="大大鱼工作室，E天工作室，网站设计，徐州信息网，徐州114信息网，徐州房产" name=KEYWORDS>
<META content="home page" name=CATEGORY>
<META content=all name=ROBOTS>
<LINK href="images/style.css" type=text/css rel=stylesheet>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
<!--#include file="top.htm"-->
<table align=center border="0" width="760" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<p align="center"><IMG height=14
src="images/pic_top_01.gif" width=760
border=0></td>
</tr>
</table>
<DIV align=center>
<CENTER>
<TABLE id=AutoNumber8 style="BORDER-COLLAPSE: collapse" cellSpacing=0
cellPadding=0 width=760 border=0>
<TBODY>
<TR>
<TD vAlign=top width=1 background=images/space_01.gif><IMG height=1
src="images/space_01.gif" width=1 border=0></TD>
<TD vAlign=top width=10><IMG height=1 src="images/space.gif" width=10
border=0></TD>
<TD vAlign=top width=580>
<DIV align=center>
<CENTER>
<TABLE id=AutoNumber12 style="BORDER-COLLAPSE: collapse" height=103
cellSpacing=0 cellPadding=0 width=580 border=0>
<TBODY>
<TR>
<TD vAlign=top height=3 td <></TD>
<TR>
<TD vAlign=top height=100><a href="http://bbs.59163.com" target="_blank"><IMG alt=有奖注册黄龙论坛
src="images/ad_01.gif"
border=0 width="580" height="100"></a></TD></TR></TBODY></TABLE></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE id=AutoNumber11 style="BORDER-COLLAPSE: collapse" height=73
cellSpacing=0 cellPadding=0 width=580 border=0>
<TBODY>
<TR>
<TD vAlign=center background=images/bg_quick_search_01.gif
height=63>
<DIV align=center>
<CENTER>
<TABLE id=AutoNumber16 style="BORDER-COLLAPSE: collapse"
borderColor=#111111 height=50 cellSpacing=0 cellPadding=0 width=558
border=0>
<FORM name=searchform action=search.asp method=post>
<TBODY>
<TR>
<TD vAlign=bottom width=558 colSpan=8 height=8></TD></TR>
<TR>
<TD width=134 height=21><FONT class=b01>输入所需信息的关键字：</FONT></TD>
<TD width=140>
<p align="center"><input name="search" type="text" id="search" size="20"></p>
</TD>
<TD width=60><select name="lx">
<option value="不限" selected>不限</option>
<option value="供">供</option>
<option value="求">求</option>
</select></TD>
<TD vAlign=top width=37>
<P align=center><INPUT type=image height=36 width=37
src="images/button_go_01.gif"></P></TD>
<TD width=21> </TD>
<TD width=78>
<P><a href="info.asp"><IMG
height=39 src="images/button_advanced_search.gif" width=78
border=0 alt="查看全部信息"></a></P></TD>
<TD width=10> </TD>
<TD width=78><a href="addmesg.asp"><IMG alt=发布信息
src="images/button_match_01.gif" border=0 width="78" height="39"></a></TD></TR>
</FORM></TBODY></TABLE></CENTER></DIV></TD></TR>
<TR>
<TD vAlign=top height=10></TD></TR></TBODY></TABLE></CENTER></DIV>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="25">
<tr>
<td width="100%"> <strong><font color="#FF3300">·<font color="#FF9900">信息分类：</font>
<%if request("n")=1 then response.write "招商投资"
if request("n")=2 then response.write "生活服务"
if request("n")=3 then response.write "家电产品"
if request("n")=4 then response.write "旅游出行"
if request("n")=5 then response.write "招聘求职"
if request("n")=6 then response.write "房产家居"
if request("n")=7 then response.write "电脑网络"
if request("n")=8 then response.write "美容美发"
if request("n")=9 then response.write "美食天地"
if request("n")=10 then response.write "医疗保健"
if request("n")=11 then response.write "招生培训"
if request("n")=12 then response.write "出国留学"
if request("n")=13 then response.write "交友征婚"
if request("n")=14 then response.write "农业信息"
if request("n")=15 then response.write "商务服务"
if request("n")=16 then response.write "其他分类"%>
</font></strong></td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0" background="images/002.gif" height="25">
<tr>
<td width="100%">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="61%"><font color="#FFFFFF"> 信 息 主 题</font></td>
<td width="9%">
<p align="center"><font color="#FFFFFF">地 区</font></p>
</td>
<td width="21%">
<p align="center"><font color="#FFFFFF">发 布 时 间</font></p>
</td>
<td width="9%">
<p align="center"><font color="#FFFFFF">浏 览</font></p>
</td>
</tr>
</table>
</td>
</tr>
</table>
<DIV align=center>
<CENTER>
<TABLE borderColor=#111111 cellSpacing=0 cellPadding=0 width=100% bordercolordark="#FFFFFF" borderColorLight="#3986CE" border="1"><TBODY>
<TR>
<TD vAlign=top width=100%>
<table width="100%" height="22" border="0" cellpadding="0" cellspacing="0">
<%set com=server.createobject("adodb.connection")
com.open "DBQ="& Server.MapPath("data.asp") &";Driver={Microsoft Access Driver (*.mdb)}"
if request("ok")="ok" then response.write "hello"
set rs=com.execute("select*from msg where kin='"& request("n") &"' and edt>=#" & date & "# ORDER BY id DESC")
page=request("page")
newpage=0
if page="" then page=1
do while newpage<page*21-21
newpage=newpage+1
rs.movenext
loop
do while not rs.eof
i=i+1%>
<tr>
<td height="23" valign="top">
<table width="100%" height="20" border="0" cellpadding="4" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td width="1%" height="20" valign="middle">
<div align="center"><img border="0" src="images/arrow_01.gif"></div></td>
<td width="59%" class=F16><font color="#478B47">
<%response.write "[" & (rs(10)) & "]"%>
</font><a href="show.asp?n=<%response.write rs(0)%>" target="_blank" class=a01><%response.write rs(1)%></a></td>
<td width="9%">
<p align="center"><%response.write rs(7)%></td>
<td width="22%">
<p align="center"><%response.write rs(4)%></td>
<td width="8%"><div align="center">
<%response.write rs(9)%>
</div></td>
</tr>
</table>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3" cellpadding="0" height="1" background="images/dotline.gif">
<tr>
<td width="100%"></td>
</tr>
</table></td>
<%if i=20 then exit do
rs.movenext
loop%> </tr>
</table>
</CENTER></CENTER>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3" cellpadding="0" height="30">
<tr>
<td width="100%">
<p align="right"><%if page=1 then %>
上一页
<%else%>
<a href="fl.asp?n=<%=request("n")%>&page=<%=page-1%>"><font color="#0000FF">上一页</font></a>
<%end if%>
<%if i=20 and not rs.eof then %>
<a href="fl.asp?n=<%=request("n")%>&page=<%=page+1%>"><font color="#0000FF">下一页</font></a>
<%else%>
下一页 <%end if%></p>
</td>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE></DIV>
<table width="100%" cellspacing cellpadding>
<tr>
<td width="100%"></td>
</tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -