标题
内容
作者
请选择栏目
所有栏目
<% sql = "select * from lm where lm<>'' order by id asc" Set rs = Server.CreateObject("ADODB.RecordSet") rs.Open sql,conn,1,1 while not rs.eof %>
><%=rs("lm")%>
<% sql2 = "select * from lm where lmid='"&rs("id")&"' order by id asc" Set rs2 = Server.CreateObject("ADODB.RecordSet") rs2.Open sql2,conn,1,1 while not rs2.eof %>
> ├<%=rs2("lm2")%>
<% Set rs33 = Server.CreateObject("ADODB.RecordSet") rs33.Open "select * from [lm] where lmid='"&rs2("id")&"' and LM3<>'' order by id desc",conn,1,1 while not rs33.eof %>
> ├<%=rs33("lm3")%>
<% rs33.movenext wend rs2.movenext wend rs.movenext wend rs.close set rs=nothing %>
年份
不限
2005
2006
2007
2008
2009
2010
月份
不限
1
2
3
4
5
6
7
8
9
10
11
12
About 366208.cn
-
本站地图
-
联系我们
-
友情链接
-
合作伙伴
-
客户服务
闽ICP备08011212号
友情链接：
