📄 catalog.txt
字号:
<html>
<body bgcolor="lightyellow">
<!-- #include file="adofunctions.asp"-->
<%
strSQL="select * from 产品类型"
set objrs=GetSQLRecordset(strSQL,"store.mdb","产品类型")
%>
<table border="0" align="center" width"90%">
<tr bgcolor="#baba76" height="30" align="center">
<%
'读取表的字段名称以作为表格的标题
for i=0 to objrs.fields.count-1
response.write "<td>" & objrs.fields(i).name & "</td>"
next
response.write "<td> 输入数量</td>"
response.write "<td> 进行订购</td>"
%>
</tr>
<%
'读取各个字段的数据并显示在表格内
do while not objrs.eof
data = "<tr height='30' bgcolor='#edeab1'>"
for i=0 to objrs.fields.count-1
data=data & "<td>" & objrs.fields(i).value & "</td>"
next
reponse.write data
respone.write"<td><from method=post target=bottom action='addtocar.asp?" &_
"book=" & objrs("书名")" & "&isbn=" & objrs("书号")" & "&price=" &_
objrs("定价") & "'><input type='text' name='quantity' size='5'>
</td>
respone.write"<td><input type=submit value='放入购物车'></td></form>
</tr>
objrs.movenext
loop
objrs.close
set objrs = nothing
objconn.colse
set objconn = nothing
%>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -