1 Attachment(s)
VBA for Access-->GetOpenFileMethod??? (HEEEEEELLLLP!)
Access XP:
I am trying to get the file open dialog box to work in this function.
Code:
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Opens the Open dialog box.
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Private Function MSA_GetOpenFileName(msaof As MSA_OPENFILENAME) As Integer
Dim of As OPENFILENAME
Dim intRet As Integer
MSAOF_to_OF msaof, of
intRet = GetOpenFileName(of)
intRet = 1
' intRet = GetFileName(of)
If intRet Then
OF_to_MSAOF of, msaof
End If
MSA_GetOpenFileName = intRet
End Function
The MSAOF_to_OF function call sets the variable of. These can be found in the screen shot I attached. Please any help would be appreciated.
This works on some puters but not others!?!?!?!
This code works on some computers but not others with the same Office Suite???? I'm testing this code at the same time on my laptop and my desktop. Laptop works...desktop doesn't. I have carefully checked my references and they match up. Is the only other possiblility a system problem?
What else could be going on?