?? xshjgg.asp
字號:
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="60%" height="22">
<%
set rs=server.createobject("adodb.recordset")
sql="select top 9 lx,id,ggtitle,dateandtime from gg order by id desc"
rs.open sql,conn,1,1
if rs.eof or bof then
response.write""
else
%>
<table border="0" cellpadding="0" cellspacing="1" width="100%">
<tr>
<td width="60%" height="20" bgcolor="#FF9900" colspan="2">¤ 世紀影院公告</td>
</tr>
<% do while not rs.eof or bof
%>
<tr>
<td width="14%" height="20" bgcolor="#FFFFFF" valign="middle" align="center">『<%=rs("lx")%>』</td>
<td width="86%" height="20" bgcolor="#FFFFFF" valign="middle" align="left">
<%
ggtitle=rs("ggtitle")
if len(ggtitle)>18 then
ggtitle=left(ggtitle,18)&"..."
end if
response.write " <a href=gglistlook.asp?id="&rs("id")&">"&ggtitle&"</a>"
response.write" ["&rs("dateandtime")&"]"
%>
</td>
</tr>
<%
rs.movenext
loop
end if
rs.close
%>
<tr>
<td width="100%" height="20" bgcolor="#FFFFFF"colspan="2" valign="middle" align="right" colspan="2"><a href=gglist.asp>更多的公告內容(More)》》》</a></td>
</tr>
</table>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -