?? gx.asp
字號:
<!--#include file="conn.asp"-->
<html>
<head>
<title>億人供需</title>
<script language="javascript">
function check(gjz)
{if(gjz=="")
return false;}
</script>
<link rel="stylesheet" href="style.css" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<%gjz=request.form("gjz")
zt=request.form("zt")
lb=request.QueryString("lb")
if gjz<>"" then gjz=trim(gjz)
set rs=server.createobject("adodb.recordset")%>
<body>
<!--#include file="gx_wjt.asp"-->
<table width="778" height="400" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#E3E9F1">
<tr><td valign="top" background="images/bg.gif">
<table border="0" cellpadding="1" cellspacing="2" width="100%" bgcolor="#E3E9F1">
<Tr height="25"><td align="center" bgcolor="#CCD8E6">供需排行</td></Tr>
<%exec="select top 10 * from gx order by id desc"
rs.open exec,conn,1,1
do while not rs.eof
xx = xszh(rs("xx"))
xx = replace(xx,"<br>","")
if len(xx) > 10 then xx = left(xx,10)+"..."%>
<tr height="18"><td align="center"><a href=# onClick="window.open('gx_xx.asp?id=<%=rs("id")%>','信息','width=360,height=150');"><%=xx%></a></td></tr>
<%rs.movenext
loop%>
<Tr height="25"><td align="center" bgcolor="#CCD8E6">查找</td></Tr>
</table>
<form name="dd" method="post" action="gx.asp">
<input type="text" size="20" name="gjz" value="<%=gjz%>">
<select name="zt">
<option value=""></option>
<option value="賣出">賣出</option>
<option value="買入">買入</option>
<option value="轉讓">轉讓</option>
<option value="尋找">尋找</option>
<option value="合作">合作</option>
<option value="其它">其它</option>
</select>
<input type="submit" value="確 定" onClick="javascript:return check(gjz.value);">
</form>
</td><td valign="top" background="images/bg.gif">
<table align="center" width="600" bgcolor="#E3E9F1">
<tr height="25"><td align="center">
<%cz=request.querystring("cz")
if cz="exit" then
session("gxyhm")=""
session("gxpass")=""
session("gxjb")=""
response.redirect "gx.asp"
end if
sql="select * from type order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof%>
<a href="gx.asp?lb=<%=rs("lb")%>&gjz=<%=gjz%>">
<%if lb=rs("lb") then response.write "<b>"
set rs1=server.createobject("adodb.recordset")
sql="select count(*) as ooo from gx where zt like '%"+zt+"%' and xx like '%"+gjz+"%' and lb='"+rs("lb")+"'"
rs1.open sql,conn,1,1
ppp=rs1("ooo")
response.write rs("lb")
if ppp>0 then%>
(<font color="#FF0000"><%=ppp%></font>)
<%end if
if lb=rs("lb") then response.write "</b>"%>
</a>
<%rs.movenext
loop
rs.close%>
</td></tr>
</table>
<%exec="select * from gx where xx like '%"+gjz+"%' and lb like '%"+lb+"%' and zt like '%"+zt+"%' order by id desc"
rs.open exec,conn,1,1
j=1
h=1
page = int(request.querystring("page"))
rs.PageSize =30
If page < 1 Then page = 1
If page > rs.PageCount Then page = rs.PageCount
if not rs.eof then rs.AbsolutePage =page
for j=1 to rs.pagesize
if rs.eof then exit for%>
<table width="600" bgcolor="#E3E9F1" border="0" cellpadding="0" cellspacing="1" align="center">
<tr height="25" bgcolor="#CCD8E6">
<%For i = 1 To 2
If rs.EOF Then Exit For
xx = xszh(rs("xx"))
xxx = xx
xx = replace(xx,"<br>","")
lxfs = rs("lxfs")
zt = rs("zt")
if len(xx) > 17 then xx = left(xx,17)+"..."%>
<td width="40%">
<%=rs.pagesize*(page-1)+h%>
<a href=# onClick="window.open('gx_xx.asp?id=<%=rs("id")%>','信息','width=360,height=170');"><%=xx%></a>
</td>
<td align="center" width="100"><%=rs("sj")%></td>
<%j=j+1
h=h+1
rs.movenext
next%>
</tr></table>
<%next%>
<center>
共有<font color="#FF0000"><%=rs.recordcount%></font>條記錄
<br>
第<%for j=1 to rs.PageCount%>
<a href="gx.asp?lb=<%=lb%>&gjz=<%=gjz%>&page=<%=j%>">
<%if j=page then
response.write j
else
response.write "["+cstr(j)+"]"
end if%></a>
<%next%>頁
</center>
<%conn.close
set conn=nothing%>
</td></tr></table>
<table width="778" border="0" cellspacing="1" cellpadding="0" align="center">
<tr height="25" bgcolor="#95ADD2" >
<td height="25" align="center"><%=bq()%><%=jszc%>
<script language="JavaScript" type="text/javascript" src="http://www.guochan.com/lltj/count.asp?id=692006322"></script>
</td></tr>
</table>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -