Hinzufügen / Anzeigen von Anhängen mit MS Access VBA
Ich versuche, diese Funktionen zu verwenden, um eine Anhangstabelle zu verwalten, ohne die In-Access-Schnittstelle zu verwenden, damit Benutzer keine Daten löschen oder auflösen können. Es werden jedoch immer dann Fehler angezeigt, wenn ich versuche, eine dieser Funktionen aufzurufen.
im onclick-fall eines knopfes habe ich
Database.OpenRecordset tblAttach
Recordset.AddNew
Call AddAttachment
Recordset.Update
Ein weiteres Problem, das ich damit habe, ist, dass dieser Code nur zum Importieren aus einem direkten Pfad dient und ich wirklich eine Dateidialogmethode zur Dateiauswahl benötige, aber ich bin nicht sicher, was ich darüber hinaus setzen soll
Dim f As Object
Set f = Application.FileDialog(3)
f.AllowMultiSelect = False
'*** not sure how to get the path to f to insert it into the table
f.Show