| |
|
|
| | Имеется [Таблица1]: ID, ФИО, Адрес, Телефон... Имеется форма с полями Поле0, Поле1, Поле2, соответствующие ФИО, Адрес, Телефон.... в форме имеется кнопка которая должна добавлять данные в таблицу из полей. Как в VBA задать правильно обработчик кнопки? помогите. | |
| |
| |
| |
|
|
| | А что, форма в качестве источника данных не имеет таблицу [Таблица1]?
Если нет, то, либо запросом на вставку, либо через Recordset. | |
| |
| |
| |
|
|
| | через Recordset? это как, просто сильно не шарю только начал осваивать Access.
Форма в качестве источника данных не имеет таблицу. Мне надо что бы значения введенные в поля формы вставлялись в таблицу после нажатия кнопки Добавить. А как сделать не знаю. | |
| |
| |
| |
 9 Кб. |
|
| | Не связывайся с рекордсетом, коли начинающий. Сделай проще. | |
| |
| |
| |
12 Кб. |
|
| | На примере библиотеки DAO:
Private Sub btnInsert_Click()
With CurrentDb.OpenRecordset("SELECT * FROM Таблица1 WHERE False")
.AddNew
'три варианта обращения к полям Recordset-а
.Fields(1) = Me.Поле0 '"ФИО"
.Fields![Адрес] = Me.Поле1
.Fields("Телефон") = Me.Поле2
.Update
.Close
End With
MsgBox "Запись добавлена в таблицу"
'Очистим поля для следующего ввода
With Me
.Поле0 = vbNullString
.Поле1 = vbNullString
.Поле2 = vbNullString
End With
End Sub
|
| |
| |
| |
| |
|
|
| | Спасиб Огромное, сейчас буду пробовать =) | |
| |
| |
|
|
| |
|
|
| | вот еще вариант - заносим только существующие поля с одинаковыми названиями.
For i = 1 To Рекодрсет_Отправитель.Fields.Count
Рекодрсет_Получатель(Рекодрсет_Отправитель(i).Name) = Рекодрсет_Отправитель(Рекодрсет_Отправитель(i).Name)
E_Net_: Next
Net_:
Resume E_Net_
|
| |
| |
| |
Блин! Лукас, где вы раньше были с этим примером. 
