HI experts,
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
Call getThisDir
CmnDlg.initdir = ThisDir
CmnDlg.FileName = "*.txt"
CmnDlg.ShowOpen
If Len(CmnDlg.FileName) > 0 Then
[DataDirectory] = CmnDlg.FileName
End If
Exit_BrowesBtn_Click:
Exit Sub
Err_BrowesBtn_Click:
If Err.Number = 32755 Then
'msgBox Err.Description
Resume Exit_BrowesBtn_Click
Else
MsgBox ("(Error Code: " & Err.Number & ") " & Err.Description)
Resume Exit_BrowesBtn_Click
End If
End Sub
ASKER
the .ShowOpen command is not working on the clients they do not get a Browse window when they select the Browse button.
The ComDlg.ocx file may be the problem. The install program updates that file and the Browse
option worked on this computer last year.
I'm thinking that registry may be corrupt. They may not have utilities the fix the registry