📄 show.asp
字号:
<%@ Language=VBScript%>
<!--#Include file="Conn.asp"-->
<?xml version="1.0"?>
<root>
<%
'Set Cnn=Server.CreateObject("ADODB.Connection")
'Cnn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\m-trade\asp\store.mdb")
'Cnn.Open
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.CursorType = adOpenstatic
objRS.Open "stock", Conn, , , adCmdTable
While Not objRS.EOF
%>
<out_brand><%response.write (objRS("brand"))%></out_brand>
<out_quan><%response.write (objRS("quantity"))%></out_quan>
<out_price><%response.write (objRS("price"))%></out_price>
<%
objRS.MoveNext
Wend
objRS.close
%>
</root>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -