6-01.asp
来自「asp开发 asp开发 asp开发 asp开发」· ASP 代码 · 共 15 行
ASP
15 行
<HTML> <BODY>
<UL>
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
set rs = conn.Execute( "SELECT * FROM grade" )
For I = 0 to rs.Fields.Count - 1
Response.Write("<LI>" & rs(I).Name)
Next
conn.close()
%>
</UL>
</BODY> </HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?