mh.asp

来自「实验教学系统 很好用 有学生 老师 管理等模块 便于学校使用」· ASP 代码 · 共 19 行

ASP
19
字号
<HTML> <BODY>
<%
If Request("keywords") <>"" Then
	set conn = Server.CreateObject("ADODB.Connection")
	conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
		Server.MapPath("person.mdb"))
    Key = Request("keywords")
	SQL = "SELECT * FROM grade WHERE 姓名 LIKE '%" & Key & "%'"
	Response.Write(SQL)
	set rs = conn.Execute(SQL)
    rstotab(rs)
	conn.close()
End If
%>
<%
Function rstotab(rs)
	Response.write ("<TABLE BORDER=1>")
	Response.write ("<TR>")
	' Part I

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?