8_2.asp

来自「《asp网页设计》作者沈才梁源代码,共十章」· ASP 代码 · 共 22 行

ASP
22
字号
<HTML><HEAD><TITLE>8_2.asp :查询【姓名】字段内容</TITLE></HEAD>
<BODY>
<% '第一步:建立数据库连接
Set Conn = Server.CreateObject("ADODB.Connection")      '创建一个连接对象实例Conn
Conn.open "txl"	      				         '用连接对象Conn打开ODBC数据源【txl】
'第二步:执行查询操作,并输出【姓名】字段内容
SqlStr = "Select 姓名 from userlist"      			      '设置SQL查询语句
Set Rs = Conn.Execute(SqlStr)          '执行SQL查询语句,并把返回的记录集赋值给Rs
Response.Write "【Userlist】表中的【姓名】字段内容如下:<HR>"
Do while not rs.eof		'如果记录指针没有超出记录集末尾,则循环打印【姓名】字段内容
  Response.write   Rs("姓名").Value & "<BR>"  
  Rs.MoveNext			                              	'记录指针移到下条记录
Loop 
'第三步:关闭记录集对象Rs和连接对象Conn,并释放占用的内存空间
Rs.Close					'关闭记录集对象Rs
Set Rs = Nothing			'释放记录集对象Rs占用的内存空间
Conn.Close				'关闭连接集对象Conn
Set Conn = Nothing		'释放连接对象Conn占用的内存空间
%>
</BODY>
</HTML>

⌨️ 快捷键说明

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