Hi_all!У меня проблемы с моим банком данных для Windows 10 / MS Access 2013 - я пишу программу в файл (много копий) радиолюбительских контактов, которые следует сохранять при каждой новой записи в новой записи ...
Проблема в том, что у меня есть «Прогрессивный поиск (тот, который динамически ищет каждую букву нового вызова, вводится в текстовое поле)», и, когда мне показывают, что я уже работал с этой станцией, я отмечаю станцию вызовав списке и нажмите «GetData», чтобы получить все общие данные в новую форму в файл, чтобы добавить больше свежей информации.Мой доступ сохраняется в новом файле!ТОЛЬКО буквы, которые я набрал в «Прогрессивном поиске», и после этого, когда я нажимаю кнопку «ВСТАВИТЬ», он сохраняет в последующем файле все данные, которые я получил от последнего контакта + конкретные данные текущего контакта!Это код ...
только для иллюстрации:
Private Sub btnGetData_Click() ' Btn "GetData"
Dim rst As Object
Set rst = Me.RecordsetClone
rst.FindFirst "[ID] = " & Me.lstStaff.Value
If Not rst.EOF Then Me.Bookmark = rst.Bookmark
With Me.lstStaff
If IsNull(.Value) Then .Value = .ItemData([ID])
Me.Call.Value = .Column(1)
Me.QRA.Value = .Column(2)
Me.QTH.Value = .Column(3)
End With
End Sub
Private Sub btnInsert_Click() ' Btn "INSERT"
Dim SQL
SQL = "INSERT INTO tblStaff (Call,QRA,QTH,RST,QRG,TimeStart,TimeEnd)" & _
"VALUES (Call,QRA,QTH,RST,QRG,TimeStart,TimeEnd)" & "CurrentDb.Execute SQL"
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
End Sub
Что нужно сделать, чтобы предотвратить поискнабранные буквы 'нужно сохранить ... а в отдельный файл?