6-15.asp

来自「ASP+SQL Server动态网站开发从基础到实践教程」· ASP 代码 · 共 42 行

ASP
42
字号
<html>

<head>

<title>GetRows方法应用</title>
</head>

<body>

<%

Dim ConnStr,myConn,mySQL,myRec
ConnStr="Provider=SQLOLEDB;data source=(local);initial catalog=northwind;user id=sa;password=;"  '参照表6-2的连接字符串

set myRec=Server.CreateObject ("ADODB.RecordSet")
myRec.ActiveConnection=ConnStr
myRec.open "select * from customers where customerid like 'a%'",,1,3  '打开记录集

dim CustomerIDArray
'其中第1个参数表示获取的记录数,这里省略
'第2个参数为空表示从当前记录开始获取,这里是从第1条开始
'或者可以设置为书签
'第3个参数是字段名称,省略后表示所有的字段
myRec.MoveFirst
CustomerIDArray=myRec.GetRows(,,"customerid")

'输出数组中的记录,注意GetRows将获到的记录保存在一个二维数组中
'response.write CustomerIDArray(0,1)
for i=0 to ubound(CustomerIDArray,2)
	response.write "CustomerIDArray(0," & i & "):" & CustomerIDArray(0,i) & "<br>"
next


myRec.close
set myRec=nothing

%>

</body>

</html>

⌨️ 快捷键说明

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