📄 index_mb.asp
字号:
<%
if MDBpath="" then
MDBpath="admin/"
end if
set rs_type=server.CreateObject("ADODB.RecordSet")
set rs=server.CreateObject("ADODB.RecordSet")
%>
<!--#include file="admin/mdb_path_down.asp"-->
<%
db="data/#info19827.asp"
Set conn1 = Server.CreateObject("ADODB.Connection")
connstr1="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn1.Open connstr1
thisfile="index"
''''分隔游戏娱乐
YXid=9 '游戏娱乐ID号
rs.open ("select id from downtype where ts like '"&YXid&",%'"),conn,1,1
if not rs.eof then
do while not rs.eof
NoYXid=NoYXid&""&rs("id")&", "
rs.MoveNext
loop
end if
rs.close
''''分隔游戏娱乐
''''分隔电子书库
SKid=11 '电子书库ID号
rs.open ("select id from downtype where ts like '"&SKid&",%'"),conn,1,1
if not rs.eof then
do while not rs.eof
NoSKid=NoSKid&""&rs("id")&", "
rs.MoveNext
loop
end if
rs.close
''''分隔电子书库
%>
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>金梅ASP源码下载中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="asp源码,php源码,jsp源码,.net源码,网站素材,破解软件,网页模板,字体下载,站长站,金梅">
<meta name="description" content="asp源码,php源码,jsp源码,.net源码,网站素材,破解软件,网页模板,字体下载,站长站,金梅">
<meta http-equiv="Content-Language" content="zh-cn">
<link href="style.css" rel="stylesheet">
</head>
<body>
<center>
<script language="javascript" src="head2.js"></script>
<table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FFFFFF">
<tr>
<td width="770" height="4"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="770">
<tr>
<td width="770" height="1" bgcolor="#E6E6E6"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="770">
<tr>
<td width="250" height="24" bgcolor="#F4F4F4"> 您的位置: 下载首页 >></td>
<td width="520" height="24" bgcolor="#F4F4F4" align="right"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="770">
<tr>
<td width="770" height="1" bgcolor="#E6E6E6"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FFFFFF">
<tr>
<td width="770" height="4"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FFFFFF" height="29">
<tr>
<td bgcolor="#FFFFFF" rowspan="5" width="2" height="263">
<img src="images/c.gif" width="2" height="1"></td>
<td valign="top" bgcolor="#FFFFFF" rowspan="5" height="263" width="189">
<table border="0" cellpadding="0" cellspacing="0" width="188">
<tr>
<td height="30">
<img border="0" src="images/1.gif" width="189" height="33"></td>
</tr>
</table>
<table border="0" cellpadding="0" width="188" bgcolor="#F7F7F7" cellspacing="1" height="75">
<tr>
<td width="100%" height="2"></td>
</tr>
<tr>
<td width="100%" height="70" align="center">
<table border="0" cellpadding="0" cellspacing="0" width="180" height="177">
<tr>
<td height="177" valign="top">
<p align="left">
注意：下载小偷程序和远程控制类程序会被一些杀毒软件认为是病毒，其实这不是病毒，大家可以放心使用，本站所有软件都经过正版瑞星扫描过绝无任何病毒。<br>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" height="1" bgcolor="#FFFFFF"></td>
</tr>
</table>
<table border="0" cellspacing="0" width="188" bgcolor="#F7F7F7">
<tr>
<td width="100%" height="30"><img border="0" src="images/2.gif"></td>
</tr>
<tr>
<td width="100%" height="4" bgcolor="#F7F7F7"></td>
</tr>
<tr>
<td width="100%" height="17">·本日更新软件：<font color="red"><%
shu=0
sql="select count(*) from down where year(date)&month(date)&day(date)=year(date())&month(date())&day(date())"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·本站软件总数：<font color="red"><%
shu=0
sql="select count(*) from down"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·<span style="letter-spacing: 3">ASP</span>源码总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='ASP源码'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·<span style="letter-spacing: 3">PHP</span>源码总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='PHP源码'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·<span style="letter-spacing: 3">JHP</span>源码总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='JSP源码'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·.NET源码总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='.NET源码'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="9">·服务器类总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='服务器类'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="8">·破解软件总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='破解软件'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·网页模版总数：<font color="red"><%
shu=0
sql="select count(*) from down where cd='网页模板'"
rs2=conn.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
<tr>
<td width="100%" height="17">·网络学校总数：<font color="red"><%
shu=0
sql="select count(*) from info"
rs2=conn1.execute(sql)
shu=rs2(0)%><b><%=shu%></b></font></td>
</tr>
</table>
</td>
<td width="4" rowspan="5" height="263">
<img src="images/c.gif" width="4" height="1"></td>
</tr>
<tr>
<td width="156" valign="top" height="20" valign="top" align="center"><img border="0" src="images/tools.gif" width="572" height="27"></td>
</tr>
<tr>
<td width="100%" valign="top" valign="top" align="center">
<table border="0" width="100%" cellspacing="1" cellpadding="1"><tr><%sql="select top 4 cxn,cxv,id,tid,pic from down where show=1 order by date desc"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof%><td width="25%">
<p align="center"><img border="0" src="<%=rs("pic")%>" width="120" height="80"><br><a target="_blank" title="<%=rs("cxn")%>" href="soft/<%=rs("id")%>.htm"><%=rs("cxn")%></a></td><%rs.movenext
loop
end if
rs.close
%></table></td>
</tr>
<tr>
<td width="644" valign="top" height="264" valign="top">
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" rowspan="2" width="284">
<table border="0" cellspacing="0" width="100%" cellpadding="0">
<tr>
<td class="menu" width="100%" height="22">
<map name="FPMap2">
<area target="_blank" coords="240, 13, 277, 28" shape="rect" href="sort/1_1.htm">
</map>
<img border="0" src="images/asp.gif" usemap="#FPMap2"></td>
</tr>
<tr>
<td width="100%" height="30" align="center">
<table style="TABLE-LAYOUT: fixed; BORDER-COLLAPSE: collapse" border="0" cellspacing="0" width="98%" cellpadding="0">
<%
i=0
sql="select top 11 cxn,cxv,id,tid,date from down where cd='ASP源码' order by date desc"
rs.open sql,conn,1,1
if rs.eof then%>
<tr>
<td width="100%" height="30" align="center">还没有软件</td>
</tr>
<%
else
do while not rs.eof
%><tr>
<td width="100%" height="3"></td>
</tr>
<tr>
<td height="18" nowrap>·<a target="_blank" title="<%=rs("cxn")%>" href="soft/<%=rs("id")%>.htm"><%=rs("cxn")%></a><%if (month(rs("date"))&"/"&day(rs("date")))=(month(date())&"/"&day(date())) then response.write"<font color=""#ff0000"">("&month(rs("date"))&"/"&day(rs("date"))&")</font>" else response.write"<font color=""#bbbbbb"">("&month(rs("date"))&"/"&day(rs("date"))&")</font>" end if%></td>
</tr>
<tr>
<td width="100%" height="1" background="images/bg_dot.gif">
</td>
</tr>
<%
i=i+1
if i>10 then exit do
rs.movenext
loop
end if
rs.close
%></table>
</td>
</tr>
<tr>
<td width="100%" height="4" bgcolor="#FFF4EE"></td>
</tr>
</table>
</td>
<td width="4"><img src="images/c.gif" width="4" height="1"></td>
<td width="284" valign="top">
<table border="0" cellspacing="0" width="100%" cellpadding="0">
<tr>
<td class="menu" width="100%" height="22">
<img src="images/c.gif" width="1" height="3"><map name="FPMap3"><area target="_blank" href="sort/3_1.htm" shape="rect" coords="242, 15, 277, 28"></map><img border="0" src="images/php.gif" usemap="#FPMap3"></td>
</tr>
<tr>
<td width="100%" height="30" align="center">
<table border="0" style="TABLE-LAYOUT: fixed; BORDER-COLLAPSE: collapse" cellspacing="0" width="98%" cellpadding="0">
<%
i=0
sql="select top 11 cxn,cxv,id,tid,date from down where cd='PHP源码' order by date desc"
rs.open sql,conn,1,1
if rs.eof then%>
<tr>
<td width="100%" height="30" align="center">还没有软件</td>
</tr>
<%
else
do while not rs.eof
%><tr>
<td width="100%" height="3"></td>
</tr>
<tr>
<td height="18" nowrap>·<a target="_blank" title="<%=rs("cxn")%>" href="soft/<%=rs("id")%>.htm"><%=rs("cxn")%></a><%if (month(rs("date"))&"/"&day(rs("date")))=(month(date())&"/"&day(date())) then response.write"<font color=""#ff0000"">("&month(rs("date"))&"/"&day(rs("date"))&")</font>" else response.write"<font color=""#bbbbbb"">("&month(rs("date"))&"/"&day(rs("date"))&")</font>" end if%></td>
</tr>
<tr>
<td width="100%" height="1" background="images/bg_dot.gif">
</td>
</tr>
<%
i=i+1
if i>10 then exit do
rs.movenext
loop
end if
rs.close
%></table>
</td>
</tr>
<tr>
<td width="100%" height="4" bgcolor="#EEF8FD"></td>
</tr>
</table>
</td>
<td width="4"><img src="images/c.gif" width="4" height="1"></td>
</tr>
</table>
</td>
</tr>
</table>
<center>
<table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FFFFFF">
<tr>
<td width="100%" height="3"></td>
</tr>
</table>
</center><center>
</center><center>
<table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FFFFFF">
<tr>
<td height="3"></td>
</tr>
</table>
</center>
<table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FFFFFF" height="299">
<tr>
<td bgcolor="#FFFFFF" width="2" height="299" rowspan="2">
<img src="images/c.gif" width="2" height="1"></td>
<td valign="top" bgcolor="#F7F7F7" rowspan="2">
<table border="0" cellpadding="0" cellspacing="0" width="188">
<tr>
<td bgcolor="#FFFFFF" height="30"><img border="0" src="images/3.gif"></td>
</tr>
<tr>
<td align="center">
<script language="javascript" src="ads/ads_left_186215.js"></script>
</td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="188" bgcolor="#F7F7F7">
<tr>
<td height="30"><img border="0" src="images/4.gif"></td>
</tr>
<tr>
<td height="3"></td>
</tr>
<%
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -