Редактирование значения одного поля при использование 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д