Opening File in Access?

[Phoenix22]

Hi,

I'm trying to automatically open a file in Access using:

Application.GetOpenFilename

However, it doesn't work; is there another VBA command I could use?

Thank you for your time.

 

[psemianonymous]

You can use this API to get the file dialog:

http://www.mvps.org/access/api/api0001.htm

You can also use the common dialog ActiveX control, embed it in a form, and use that. But that's problematic.

--
Find common answers using Google Groups:

http://groups.google.com/groups?group=comp.databases.ms-access

Corrupt MDBs FAQ

http://www.granite.ab.ca/access/corruptmdbs.htm

 

[GKProgrammer]

Hi Phoenix,

You should try using ShellExecute:


-------------------GLobal Declarations--------------
Public Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) _
As Long
-------------------GLobal Declarations--------------



-------------------Opening File--------------
Dim retval As Long

retval = ShellExecute(0, "open", "C:\filename.txt", "", "", 0)

-------------------Opening File--------------





Regards,
gkprogrammer