I have a Access program that I send out to different customers. In the an Access form I use the
Browse button on the form to locate files to import into the program.
This works well except for one customer that when they try to use the Browse button they get the
error code 438 - - Object donesn't support this property or method.
They can hand enter the path and it works for them but the button gives them the error.
Below is the code for the button.
On Error GoTo Err_BrowesBtn_Click
CmnDlg.initdir = ThisDir
CmnDlg.FileName = "*.txt"
If Len(CmnDlg.FileName) > 0 Then
[DataDirectory] = CmnDlg.FileName
If Err.Number = 32755 Then
MsgBox ("(Error Code: " & Err.Number & ") " & Err.Description)