📄 info_zt.asp
字号:
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="22">
<tr>
<%'dim i
i=0
set rs=server.CreateObject("adodb.recordset")
rs.open "select Top 8 * from zhuanti order by newsid desc",conn,1,1
if rs.eof and rs.bof then
response.write "目前还没有购物指南!"
else
do while not rs.eof
i=i+1%>
<td width="7%" height="22"> <img src="img/xiao/blackspot.gif" width="5" height="5"> </td>
<td width="93%">
<%if len(trim(rs("title")))>13 then
response.write "<a href='listzt.asp?id="&rs("newsid")&"'>"&left(trim(rs("title")),13)&"."&"</a><br>"
else
response.write "<a href='listzt.asp?id="&rs("newsid")&"'>"&trim(rs("title"))&" </a><br>"
end if
if i>=10 then exit do%>
</td>
</tr><%rs.movenext
loop
end if
rs.close
set rs=nothing%>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -