📄 index.asp
字号:
<%@ language="vbscript" codepage="936" %>
<% option explicit %>
<!--#include file="const.asp"-->
<!--#include file="head.htm"-->
<%
dim pageno, groupid
if request.querystring("pageno") = "" then pageno = 1 else pageno = request.querystring("pageno")
groupid = request.querystring("groupid")
dim xml
set xml = server.createobject("microsoft.xmlhttp")
dim url
url = "index.xml.asp?pageno=" & pageno
if groupid <> "" then
url = url & "&groupid=" & groupid
dim qs
qs = "&groupid=" & groupid
end if
xml.open "get", thiefurl & url, false
xml.send
dim xmldom
set xmldom = server.createobject("microsoft.xmldom")
xmldom.async = false
xmldom.validateonparse = false
xmldom.load( xml.responsexml )
set xml = nothing
%>
<!doctype html public "-//w3c//dtd html 4.01 transitional//en" "http://www.w3c.org/tr/1999/rec-html401-19991224/loose.dtd">
<html>
<head>
<meta name="description" content="美女写真|网友自拍|好色妹妹|美女图片|偷拍走光|">
<meta name="author" content="美女写真馆">
<title>美女写真馆--网友自拍-美女写真-偷拍走光</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<link href="images/default.css" rel=stylesheet type=text/css>
</head>
<body bgcolor="#003f7f" topmargin="0">
<table width="776" height="5" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td></td>
</tr>
</table>
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td width="50"> </td>
<td width="776" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top"><table width="530" border="4" cellpadding="0" cellspacing="0" bordercolor="#004487">
<tr>
<td width="532" align="center" bgcolor="#2779cb">
<table width="500" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="510">
<marquee scrollamount=2 scrolldelay=10 >郑重声明：本站所有图片来均源于网络，图片经过严格审查筛选，绝不含任何色情成份，内容绝对健康！欢迎各位网友监督，如果您发现有任何色情及违法行为，请与管理员联系，我们将及时删除！管理员qq：556248</marquee>
</td>
</tr>
</table>
<table width="500" border="0" cellspacing="0" cellpadding="0" style="border-bottom:1px dotted #004487;">
<tr>
<td width="508" align="left">
<a href="index.asp"><strong>首页>></strong></a> 分类: <a href="index.asp?groupid=13">[性感美女]</a> <a href="index.asp?groupid=10">[美女自拍]</a> <a href="index.asp?groupid=16">[清纯靓丽]</a> <a href="index.asp?groupid=11">[丝袜美腿]</a> <a href="index.asp?groupid=17">[走光偷拍]</a> <a href="index.asp?groupid=12">[梦幻景色]</a></td>
</tr>
</table>
<table width="500" border="0" cellspacing="0" cellpadding="2">
<tr>
<td width="20"> </td>
<td align="center" width="60">分类</td>
<td align="center">标题</td>
<td width="50" align="center">浏览量</td>
<td width="60" align="center">更新时间</td>
</tr>
<%
dim item
set item = xmldom.getelementsbytagname("item")
dim i
for i = 0 to item.length - 1
%>
<tr>
<td align="center">></td>
<td align="center" width="60"><a href="index.asp?groupid=<% = item.item(i).getelementsbytagname("groupid").item(0).text %>">[<% = item.item(i).getelementsbytagname("group").item(0).text %>]</a></td>
<td align="left"><a href="disp.asp?id=<% = item.item(i).getelementsbytagname("id").item(0).text %>" target="_blank"><% = item.item(i).getelementsbytagname("title").item(0).text %></a></td>
<td align="center"><% = item.item(i).getelementsbytagname("clickcount").item(0).text %></td>
<td align="center"><% = formatdatetime( item.item(i).getelementsbytagname("addtime").item(0).text, 2 ) %></td>
</tr>
<%
next
%>
</table>
<table width="500" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<%
dim guide
set guide = xmldom.getelementsbytagname("guide")
dim daycount, recordcount, pagesize, xpageno, pagecount
daycount = guide.item(0).getelementsbytagname("daycount").item(0).text
recordcount = guide.item(0).getelementsbytagname("recordcount").item(0).text
pagesize = guide.item(0).getelementsbytagname("pagesize").item(0).text
xpageno = guide.item(0).getelementsbytagname("pageno").item(0).text
pagecount = guide.item(0).getelementsbytagname("pagecount").item(0).text
%>
更新<% = daycount %>，
共<% = recordcount %>帖，
每页<% = pagesize %>帖，
当前<% = xpageno %>/<% = pagecount %>页。
<a href="?pageno=1<% = qs %>">首页</a>
<a href="?pageno=<% = xpageno - 1%><% = qs %>">上页</a>
<a href="?pageno=<% = xpageno + 1%><% = qs %>">下页</a>
<a href="?pageno=<% = guide.item(0).getelementsbytagname("pagecount").item(0).text%><% = qs %>">尾页</a>
<input name="pageno" type="text" size="3" value="<% = xpageno %>" style="text-align:right" onclick="this.value='';">
<input type="button" name="submit" value="跳转" onclick="jumppage()">
<script language="javascript">
<!--
function jumppage()
{
if(!isnan(pageno.value))
{
location.href='?pageno=' + pageno.value + '<% = qs %>'
}
}
//-->
</script>
</td>
</tr>
</table></td>
</tr>
</table>
<br></td>
<td width="218" valign="top"><table width="218" height="40" border="0" cellpadding="0" cellspacing="0">
<tr>
<td background="images/img_ttt.gif"><font color="#ffffff"> 网站公告</font></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"> 如果您感到本站收集的美媚不错的话，请记下网址告之您的朋友~谢谢！ 站长精彩推介，爱情手册：<a target="_blank" href="http://www.meigui8.cn/aiqing.asp">http://www.meigui8.cn/aiqing.asp</a>
请记住本站的永久域名：<br />
<a target="_blank" href="http://www.meigui8.cn">http://www.meigui8.cn</a></td>
</tr>
</table>
<table width="218" height="40" border="0" cellpadding="0" cellspacing="0">
<tr>
<td background="images/img_ttt.gif"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">
·用心打造·每日精品·
<br>
·实时收集·天下美眉·<br>
打造中国网络最专业的美女写真馆 </td>
</tr>
</table>
<table width="218" height="40" border="0" cellpadding="0" cellspacing="0">
<tr>
<td background="images/img_ttt.gif"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">
<iframe width="160" height="298" src="http://code.95le.com/m3//160x298.aspx?style=1&uid=10220" frameborder="no" border="0" marginwidth="0" marginheight="0" scrolling="no"></iframe> </table><br>
</td>
</tr>
</table></td>
<td width="50"> </td>
</tr>
</table>
<br>
<!--#include file="footer.htm"-->
<br>
</body>
</html>
<% set xmldom = nothing %>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -