?? 6-09.asp
字號:
<HTML> <BODY>
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
set cmd = Server.CreateObject("ADODB.Command")
cmd.ActiveConnection = conn
sql = "SELECT * FROM grade WHERE 數學 < 200"
cmd.CommandText = sql
set rs = cmd.Execute()
rstotab(rs)
%>
<%
Function rstotab(rs)
Response.write ("<TABLE BORDER=1>")
Response.write ("<TR>")
' Part I?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -