Я не правильно поставил вопрос…
Почему следующий код вызывает ошибку:
Microsoft OLE DB Provider for SQL Server (0x80040E29)
Набор строк не поддерживает прокрутку данных в обратном направлении.
/tst/test.asp, line 31
<%@language="VBScript"%>
<%response.buffer=true%>
<%Response.Expires=-1%>
<%session.codepage=1251%>
<!--METADATA TYPE="typelib" uuid="00000205-0000-0010-8000-00AA006D2EA4" -->
<%
Dim Con, Rs
Set Con=Server.CreateObject("ADODB.Connection")
Set Rs=Server.CreateObject("ADODB.Recordset")
Con.ConnectionString="provider=sqloledb;server=(local);uid=sa;password=ring;database=Learn"
Con.Open
'Вот если это разкомментировать, то работает
'что и понятно
Rs.Open "SELECT * FROM checkes order by VarName", Con ', adOpenStatic, adLockReadOnly
'Проходим по всем ячейкам вперёд пару раз, без пролем
for i = 0 to 1
Rs.MoveFirst
do while not Rs.eof
response.Write( Rs("VarName") & " ")
Rs.MoveNext
loop
response.Write "<br>"
next
for i = 0 to 10
Rs.MoveFirst 'Если заккоментировать эту строчку тоже всё работает
Str = "g" & i
Rs.Find "Varname = '" & Str &"'" , 0, adSearchForward
if not Rs.eof then
Str = Str + " - Find<br>"
else
Str = Str + " - NotFind<br>"
end if
response.Write(Str)
next
Rs.Close
Set Rs = Nothing
%>