如何在VBScript中使用ADODB结果集？ [关闭]

Posted 2021-05-04

我正在使用ADODB开发VBScript，一旦你执行了这样的事情，我很难找到关于你应该如何访问结果集信息的明确信息：

Dim cmd
Dim resultSet

Set cmd = Server.CreateObject("ADODB.Command")
Set cmd.ActiveConnection =  '--connection object you've configured
cmd.CommandText = "SELECT * FROM USER"
cmd.CommandType = adCmdText

set resultSet = cmd.Execute

我的resultSet是否为每个ROW都有一个字段，或者每个值都有一个字段（ROW_NUMBER * COLUMNS_PER_ROW）？

答案

您可以使用ADODB.Recordset对象

set objRecordset=Server.CreateObject("ADODB.recordset")

像这样，或者我使用Open以及其中的变体（例如，请注意我在下面的代码中重复了一些函数）：

Dim cn as new ADODB.Connection
Dim rs as new ADODB.Recordset
...
rs = cmd.Execute
...
rs.Open "SELECT * FROM Table", cn    

While Not rs.EOF
  somevalue = rs("Field")
  ...
  rs.MoveNext
Wend
rs.Close

为了回答你的问题，Recordset一次为你提供一组记录，一条记录（一行）