例6-20.asp

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料」· ASP 代码 · 共 20 行

ASP
20
字号
<!--#INCLUDE file="ADOVBS.inc"-->
<HEAD>
<TITLE> BackWard </TITLE>
</HEAD><BODY>
<%
Set Conn=Server.CreateObject ("ADODB.Connection")
Set RS=Server.CreateObject ("ADODB.RecordSet")
Conn.Open "MyData"
'打开记录集时,将指定游标的类型为adOpenStatic,可在记录集中前向或后向移动
RS.Open "SELECT * FROM sales",Conn,adOpenstatic
RS.MoveLast					'移向最后一个记录
While Not RS.BOF 
  Response.Write ("<BR>" & RS("GoodsName") )
  RS.MovePrevious				'移向前一记录
Wend	
RS.Close
Conn.Close
%>
</BODY>

⌨️ 快捷键说明

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