| 产品展示 |
| |
<%
db="pic/Database/DataShop.mdb" '数据库文件位置
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sqlBigClass="select * from BigClass order by BigClassID"
Set rsBigClass= Server.CreateObject("ADODB.Recordset")
rsBigClass.open sqlBigClass,conn,1,1
rsBigClass.movefirst
do while not rsBigClass.eof
%>
| |
|
<%
sqlClass="select * from SmallClass where BigClassName='" & rsBigClass("BigClassName") & "' Order by SmallClassID"
Set rsClass= Server.CreateObject("ADODB.Recordset")
rsClass.open sqlClass,conn,1,1
do while not rsClass.eof
%>
 |
胡萝卜浓缩汁 |
|
芦笋汁 |
|
草莓浓缩汁 |
|
草莓浆 |
|
苹果汁 |
|
|
|
洋葱汁 |
|
梨 浆 |
|
|
<%
rsClass.movenext
loop
%>
|
<%
rsBigClass.movenext
loop
%>
|
|
|
