站内搜索
本站连接代码
请先做好本站链接 【 <%=site%> → 服务条款】
<%=site%>只收录精品个人网站，个人独立_个人资料。
本站连接代码：（任选其一）
<a href=http://www.saogegood.com/test/mulu target=_blank>个人网站目录</a>
<a href=http://www.saogegood.com/ target=_blank>saogegood_个人资料</a>
| " Response.Write "网站升级中，暂时停止新站登陆，请稍后再来....由此给您带来的不便，我们深表歉意！" Response.Write " |
网址站首页 → 新站登录 →
<%
'统计
Set ClassCount=Server.CreateObject("Adodb.Recordset")
Sql= "Select * from feilei order by classid"
ClassCount.open Sql,conn,1,1
Set QCount=Server.CreateObject("Adodb.Recordset")
Q_Sql="Select * from detail"
QCount.open Q_Sql,conn,1,1
Set WebCount=Server.CreateObject("Adodb.Recordset")
Web_Sql="Select * from detail where verity=1"
WebCount.open Web_Sql,conn,1,1
Set FCount=Server.CreateObject("Adodb.Recordset")
F_Sql="Select * from detail where verity=0"
FCount.open F_Sql,conn,1,1
Set HCount=Server.CreateObject("Adodb.Recordset")
H_Sql="Select * from detail where hei=1"
HCount.open H_Sql,conn,1,1
%>
分类总数:(<%=ClassCount.RecordCount%>)个 / 网站总数:(<%=QCount.RecordCount%>)个 / 已审网站:(<%=WebCount.RecordCount%>)个 / 未审网站:(<%=FCount.RecordCount%>)个/ 拉黑网站:(<%=HCount.RecordCount%>)个
<%
ClassCount.close
Set ClassCount = Nothing
QCount.close
Set QCount = Nothing
WebCount.close
Set WebCount = Nothing
FCount.close
Set FCount = Nothing
HCount.close
Set HCount = Nothing '统计结束
%>