|
网站首页
|
行业信息
|
行业信息
|
行业信息
|
行业信息
|
行业信息
|
行业信息
|
行业信息
|
本站留言
|
标题
作者
请选择栏目
所有栏目
<% 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
你的姓名
电子邮件
标 题
栏 目
请选择
├ 国内新闻(2级)
├ 国际新闻(2级)
├ 卫生新闻(3级)