|
| 我要上网乐 ＞＞友情链接 |
( 返回首页 | 新站登录 ) 帮助 |
本页更新日期：2005年2月14日 |
申请友情链接，请务必先将本站的链接放置在贵站的相应位置，然后写邮件通知我们，否则绝对不被收录，谢谢！
我要上网乐链接代码 |
| |
|
<%
rs.open "select * from detail where classid="&classid&" and verity=1",conn,1,3
jishu=1
while not rs.eof
if jishu=1 or jishu mod 4 = 1 then
response.write "| "&rs("title")&" | "
else
response.write ""&rs("title")&" | "
end if
if jishu mod 4 =0 then response.write " "
jishu=jishu+1
rs.movenext
wend
jishu=jishu-1
if jishu mod 4 <> 0 then
for i= 1 to 4-(jishu mod 4)
response.write " | "
if i = 4-(jishu mod 4) then response.write ""
next
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
|
