Редактирование значения одного поля при использование ADO - VB

Узнай цену своей работы

Формулировка задачи:

Мне необходимо изменить значение одного поля в одной записи. Используется соединение ADO, база Access. Строка подключения strCnn = 'driver={Microsoft Access Driver *.mdb)};dbq=e:/temp/db1.mdb' Пользователь просматривает записи и может изменять их. Можно ли это сделать не используя SQL запрос?

Решение задачи: «Редактирование значения одного поля при использование ADO»

textual
Листинг программы
  Dim cnn1 As ADODB.Connection
   Dim rstEmployees As ADODB.Recordset
   Dim strCnn As String
   Dim varDate As Variant
 
   ' Open connection.
      strCnn = 'Provider=sqloledb;' & _
      'Data Source=srv;Initial Catalog=pubs;User Id=sa;Password=; '
   Set cnn1 = New ADODB.Connection
   cnn1.Open strCnn
   
   ' Open employee table.
   Set rstEmployees = New ADODB.Recordset
   rstEmployees.CursorType = adOpenKeyset
   rstEmployees.LockType = adLockOptimistic
   ' Вот момент открытия таблицы
   rstEmployees.Open 'employee', cnn1, , , adCmdTable
 
   'присваиваем значение поля переменной.
   varDate = rstEmployees!hire_date
   'или наоборот
   rstEmployees!hire_date=date

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 4.286 из 5
Похожие ответы