用ASP写的显示ACCESS数据cim.mdb中表ld02内容的脚本程序：
< table border="1" >
< tr >
< td >Code< /td >< td >Lot< /td >< td >Qty< /td >
< /tr >
<%
set cim= Server.CreateObject("ADODB.Connection")
cim.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("cim.mdb")
set rs = cim.execute("ld02")
while not rs.eof
response.write "< tr >"
for i=0 to rs.fields.count-1
response.write "< td >" & rs.fields(i).value & "< /td >"
next
response.write "< /tr >"
rs.movenext
wend
%>
< /table >
