📄 8_6.asp
字号:
<HTML><HEAD><TITLE>8_6.asp ：动态查询指定姓名的记录</TITLE></HEAD>
<BODY>
<Form Method=Post>
姓名：<Input Name="Name"><Input type=submit Value="查询">
</Form>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "txl"
Name=Request("Name")
SqlStr="Select * from Userlist where 姓名 LIKE '%" & Name & "%'"
Set Rs = Conn.Execute(SqlStr) '执行SQL查询语句，并把返回的记录集赋值给Rs
Response.Write "查询结果：<HR>"
Do while not rs.eof
Response.write Rs("姓名").Value & "<BR>"
Rs.MoveNext
Loop
Rs.Close:Set Rs = Nothing
Conn.Close:Set Conn = Nothing
%>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -