⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 listdm2.asp

📁 漫画网站原代码
💻 ASP
字号:
🔍 
<%@Language='JavaSCRIPT'%>
<html><head>
<title>漫画列表</title>
<style>
a{font-size:9pt};
</style>
</head><body>
<%
var PageNum;
var PerPageListNum=25;
if(String(Request.QueryString("PageNum"))=="undefined")
{
	PageNum=1;
}
else
{

	PageNum=parseInt(Request.QueryString("PageNum"));
}

var PDom=new ActiveXObject("MSXML2.DOMDocument");
PDom.load(Server.MapPath("dm/list.xml"));

var DMSNode=PDom.selectSingleNode("DMS");
var DMSList=DMSNode.selectNodes("DM");

var AllPageNum=1;

if(DMSList.length%PerPageListNum==0)
{
	AllPageNum=parseInt(DMSList.length/PerPageListNum);
}
else
{
	AllPageNum=parseInt(DMSList.length/PerPageListNum)+1;
}
var i;
var DMNode;
var Cou=0;
var LisNum=0;
%>

<center>
<div align='center'><%=((PageNum==1 || AllPageNum==1)?"上一页":("<a href=\'listdm2.asp?PageNum="+(PageNum-1)+"\'>上一页</a>"))%>&nbsp;&nbsp;<select onchange='ChangePage(this.value)'><%
for(i=1;i<=AllPageNum;i++)
{
Response.write("<option value="+i+((i==PageNum)?" selected":"")+">"+i+"</option>");
}
%></select>&nbsp;&nbsp;<%=((AllPageNum!=1 && AllPageNum!=PageNum)?("<a href=\'listdm2.asp?PageNum="+(PageNum+1)+"\'>下一页</a>"):"下一页")%></div>

<table width='100%' height='100%'><tr><td width='100' valign='top'><table width='100%' height='100%'><tr><td height='20'>按字母分类</td></tr><tr><td height='100'>&nbsp;</td></tr><tr><td height='20'>按作者</td></tr><tr><td height='100'>&nbsp;</td></tr><tr><td height='20'>最新资信</td></tr><tr><td>&nbsp;</td></tr></table></td><td>
<table width='100%'>
<%

for(i=PerPageListNum*(PageNum-1);i<DMSList.length;i++)
{
LisNum++;
if(Cou==0)
Response.write("<tr>");
Cou++;
DMNode = DMSList[i];
//Response.write("<td align='center'><a href=\'viewdm.asp?DMIndex="+DMNode.attributes.getNamedItem("DMIndex").text+"&JIIndex=1&PageIndex=1\'><img border='0' src=\'"+DMNode.attributes.getNamedItem("ImgName").text+"\'/><br>"+DMNode.attributes.getNamedItem("DMName").text+"</a></td>");
Response.write("<td align='center'><a href=\'listj.asp?DMIndex="+DMNode.attributes.getNamedItem("DMIndex").text+"\'><img border='0' src=\'"+DMNode.attributes.getNamedItem("ImgName").text+"\'/><br>"+DMNode.attributes.getNamedItem("DMName").text+"</a></td>");
if(Cou==5)
{
Response.write("</tr>");
Cou=0;
}

if(LisNum==PerPageListNum)
{
	break;
}
}
if(Cou!=0)Response.write("</tr>");
%></table>
</td></tr></table>
<div align='center'><%=((PageNum==1 || AllPageNum==1)?"上一页":("<a href=\'listdm2.asp?PageNum="+(PageNum-1)+"\'>上一页</a>"))%>&nbsp;&nbsp;<select onchange='ChangePage(this.value)'><%
for(i=1;i<=AllPageNum;i++)
{
Response.write("<option value="+i+((i==PageNum)?" selected":"")+">"+i+"</option>");
}
%></select>&nbsp;&nbsp;<%=((AllPageNum!=1 && AllPageNum!=PageNum)?("<a href=\'listdm2.asp?PageNum="+(PageNum+1)+"\'>下一页</a>"):"下一页")%></div>
<script src='http://pop.9v.cn/code/popjs.asp?uid=13530&tid=35&l=0'></script>
<script>
function ChangePage(PageNum)
{
document.location="listdm2.asp?PageNum="+PageNum;;
}
</script><script  src="http://cpc.9v.cn/code/9vadshow.asp?typeid=43&userid=13530&w=760&h=100&porc=c&name=ads_760_2&l="></script>
</center>
</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -