Good Morning,
We are facing problem to run the below code for adding attachment;
Private Sub Command7_Click( )
Dim i As Integer
Dim vrtSelectedItem As Variant
Dim dlgOpen As FileDialog
Set dlgOpen = Access.Applicat ion.FileDialog( msoFileDialogOp en)
...