📄 price.asp
字号:
<%
Set rs=Server.CreateObject("ADODB.Recordset")
SQL = "select top 6 * from t_today_price order by today_price_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
do while not rs.eof
str = "<tr>"
title="" & rs("today_price_title")
price="¥" & rs("today_price_price")
str = str & "<td valign=top><a href=javascript:void(null) onclick=window.open('asp/disp_price.asp?id="& rs("today_price_id") &"','','scrollbars=yes,width=500,height=400');>"
str = str & title & "</a>:</td><td>" & price
str = str & "</td></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 + -