⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 price.asp

📁 又一套宾馆全站源码
💻 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 + -