Через несколько лет вылезла ошибка...

[deepslam]

В общем писал два года назад прогу для работы с базой данных . Вот кусок кода из неё:

Код: Выделить всё

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & CurDir
sSQL = "SELECT * FROM GoodsInfo"
rs.Open sSQL, conn, adOpenKeyset, adLockOptimistic
rs.MoveFirst
Do While Not rs.EOF
  rs.Fields("status") = 2
  rs.MoveNext
Loop
rs.Close

на 7 строке выдает ошибку:
"Превышено число блокировок файлов общего доступа. Увеличьте значение параметра реестра MaxLocksPerFile"
Я конечно понимаю что можно все это просто увеличить в реестре, но может быть можно и через Access, т.е. через код?
Заранее спасиба!

[Sedge]

Код: Выделить всё

conn.Execute("UPDATE GoodsInfo SET status=2")

SQL - он рулит...

[deepslam]

согласен =)))
блин правда че та не додумал малёк =)))