today_dish.asp

来自「又一套宾馆全站源码」· ASP 代码 · 共 14 行

ASP
14
字号
<%
	set rs = server.Createobject("ADODB.recordset")
	rs.open "Select top 1 * from t_dish order by dish_date desc",Application("Connect_String"),3,2
	
	str="<div align=center><center>"
	do while not rs.eof
	str=str & "<table border=0>"
	str=str & "<tr><td width='100%' align=center><a href=javascript:void(null) onclick=window.open('asp/disp_dish.asp?id="& rs("dish_id") &"','','scrollbars=yes,width=500,height=450');>"& rs("dish_title") &"</a></td></tr></table>"
	rs.movenext
	loop
	str=str & "</center></div>"
	response.write "document.write(""" & str &""")" & vbnewline

%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?