Свойство VBscript RecordCount

Question

Я новичок в VBScript, и я столкнулся со следующей проблемой. Я хочу получить данные из sql server db и разрешить свойства RecordCount. Следующий код получает данные, но RecordCount отключен. Как включить эти свойства

Const DB_CONNECT_STRING = "Provider=SQLOLEDB.1;Data Source=BUG\SQLSERVER2005;Initial Catalog=test;user id ='sa';password='111111'" 
Set myConn = CreateObject("ADODB.Connection") 
Set myCommand = CreateObject("ADODB.Command") 
myConn.Open DB_CONNECT_STRING 
Set myCommand.ActiveConnection = myConn 
myCommand.CommandText = ("select * from klienci k where k.indeks = " & oferty(16)) 
Set klienci = myCommand.Execute 

Answer 1

AFAIK вы не можете изменить вид курсора при использовании Execute метод Command объекта, и вы не можете изменить тип курсора после извлекаться набор записей , Возможно, что-то подобное может работать:

Const DB_CONNECT_STRING = "Provider=SQLOLEDB.1;Data Source=BUG\SQLSERVER2005;Initial Catalog=test;user id ='sa';password='111111'" 

Set myConn = CreateObject("ADODB.Connection") 
myConn.Open DB_CONNECT_STRING 

query = "select * from klienci k where k.indeks = " & oferty(16) 

Set klienci = CreateObject("ADODB.Recordset") 
klienci.CursorLocation = 3 'adUseClient 
klienci.CursorType  = 3 'adOpenStatic 
klienci.LockType  = 1 'adLockReadOnly 

klienci.Open query, myConn 

Answer 2

Я не думаю, что это проблема VBScript, я думаю, что это проблема ADO.

Я думаю, что вы используете курсор только по умолчанию, который не будет работать с recordcount.

Думаю, вам стоит придерживаться cursortype = adOpenStatic, но у меня есть небольшая проблема с определением, если вы указываете объект набора записей - klienci?

Если так попробовать klienci.cursortype = adOpenStatic