📄 display.asp
字号:
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>查看购物蓝</TITLE>
</HEAD>
<BODY text=MediumSlateBlue>
<table width=70% align=center>
<tr><td><font size=+2><STRONG><U>查看购物蓝</U></STRONG></font></td></tr>
<%
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("mydb.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from shop"
rs.open sql,conn,1,1
if rs.EOF or rs.BOF then
response.write "<script language=JavaScript>" & chr(13) & "alert('你的购物蓝是空的！');" & "history.back()" & "</script>"
Else
%>
<tr bgcolor=LawnGreen><td>你购买的图书</td><td>图书的价格</td><td>购买的时间</td></tr>
<%
do while not rs.EOF or rs.BOF
%>
<tr bgcolor=Aquamarine><td><%=rs("name")%></td>
<td><%=rs("price")%>元</td>
<td><%=rs("addtime")%></td>
<%
rs.movenext
loop
end if
set rs=nothing
set conn=nothing
%>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -