Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: час
Помогите пончть-разобраться.
Начинается всё вот так

         Dim сn as new ADODB.Connection ()
         cnn.ConnectionString = StringConnectToBDAccess("Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database ", "", "", "C:\DB\RMK.arm", "ReadWrite|Share Deny None")
         cn.Open ()

         Dim RS As New ADODB.Recordset ()
         rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
         rs.CursorType = ADODB.CursorTypeEnum.adOpenStatic
         rs.LockType = ADODB.LockTypeEnum.adLockBatchOptimistic
         rs.Open ("SELECT * FROM продуктов", сn)
         rs.ActiveConnection = Nothing
         cn.Close ()


Затем идёт работа с набором записей (rs)
затем надо этому (rs ) - присвоить новый набор записе на основании той же таблицы, так как прошло время и там может чё изменилось.
Как правильно это сделать.
Повторно весь код запускать - ругань несусветная.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.