I am running Access 2002 on Windows XP and am having great difficulty in allowing the user to select multiple files that can be transfered to another folder. Any pointers would be greatly appreciated. The code I am using at present is:
Private Sub cmdBrowseFrom_Click()
Dim strFile As String
With Me.cdlgOpen
.CancelError = True
On Error GoTo ErrHand
.Filter = "All Files (*.*)¦*.*¦"
.ShowOpen
strFile = .FileName
txtNetworkFrom = strFile
End With
ErrHandler:
'User pressed the Cancel button
Exit Sub
End Sub
If it looks wrong and doesn't work then its probably wrong !!
Private Sub cmdBrowseFrom_Click()
Dim strFile As String
With Me.cdlgOpen
.CancelError = True
On Error GoTo ErrHand
.Filter = "All Files (*.*)¦*.*¦"
.ShowOpen
strFile = .FileName
txtNetworkFrom = strFile
End With
ErrHandler:
'User pressed the Cancel button
Exit Sub
End Sub
If it looks wrong and doesn't work then its probably wrong !!