Hallo,
in der Access Version 2010 benutzte ich die Windowsfunktion GetOpenFileNameA zum Öffnen des Dateidialogs. Dies funktionierte problemlos. Nun benutze ich die Access Version 2013 und die Funktion gibt NULL zurück, obwohl ich die Deklaration um PtrSafe erweitert habe. Die comdlg.dll ist auf dem Rechner auch vorhanden.
Kann mir vielleicht jemand helfen?
Gruß
compinaut
aus der Win32API_PtrSafe.txt
Type OPENFILENAME
lStructSize As Long
hwndOwner As LongPtr
hInstance As LongPtr
lpstrFilter As String
lpstrCustomFilter As String
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As LongPtr
lpfnHook As LongPtr
lpTemplateName As String
'#if (_WIN32_WINNT >= 0x0500)
pvReserved As LongPtr
dwReserved As Long
FlagsEx As Long
'#endif // (_WIN32_WINNT >= 0x0500)
End Type
Declare PtrSafe Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long