 |
| |
| |
<%set rs1=server.CreateObject("adodb.recordset")
sql="select * from class where parentid=0 order by num"
rs1.open sql,conn,1,1
bid=cint(request("bid"))
if not rs1.eof then
do while not rs1.eof
%>
| );" class="menu" onMouseOver="this.style.backgroundColor='#00172C'"
onmouseout="this.style.backgroundColor='#F27E37'"> ·<%if rs1("child")<>0 then%>"><%=rs1("fname")%><%else%>&bid=<%=rs1("id")%>"><%=rs1("fname")%><%end if%> |
|
|
<%rs1.movenext
loop
end if%>
|
| |
客服热线：
电话:0576-85670183
手机:13867616188
传真:0576-85696966
www.china-dingli.com
Email:A001@139.COM |
|
| |
| |
| |
|
|
<%if request("p")="" then
curr_page=1
else
curr_page=cint(request("p"))
end if
sql="select * from article order by articleid desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.Write("暂无新闻信息！")
end if
if not rs.eof then
rs.pagesize=2
rs.absolutepage=curr_page
end if
for i=1 to rs.pagesize
if rs.eof then exit for%>
"><%=rs("title")%> |
<%=formatdatetime(rs("updatetime"),2)%> |
| |
<%rs.movenext
next%>
|
共 <%=rs.recordcount%> 条记录，共 <%=rs.pagecount%> 页
<%call mpage(rs.recordcount, rs.pagesize,rs.pagecount, curr_page,"","news.asp")%>
|
|
