📄 dynamic.asp
字号:
<%
Set rs=Server.CreateObject("ADODB.Recordset")
SQL = "select top 15 * from t_dynamic order by dynamic_date desc"
rs.Open sql, Application("Connect_String"),3,3
Response.Write "document.write(""<body bgcolor=#FFF8E0 text=#000000><div align=center><center><table border=0 width=100% cellpadding=0><tr><td valign=top></td></tr>"")" & vbnewline
' for a=1 to rs.recordcount
do while not rs.eof
str = "<tr>"
'i=1
title=rs("dynamic_title")
str = str & "<td valign=top>"
str = str & "◇ <a href=javascript:void(null) onclick=window.open('asp/disp_dynamic.asp?id="& rs("dynamic_id") &"','','scrollbars=yes,width=500,height=400');>"
str = str & title
str = str & "</a></td></tr>"
' i=i+1
str = str & "</tr>"
response.write "document.write(""" & str &""")" & vbnewline
rs.movenext
loop
Response.Write "document.write(""<tr><td colspan=2 width=100% valign=top></td></tr></table></center></div></body>"")" & vbnewline
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -