Muss man wissen in VBA und ACCESS, wenn man mit dll's umgeht.
Option Compare Database
Option Explicit
Declare PtrSafe Sub MyCoolFunction Lib "dll_eins_win64.dll" ()
Sub test()
MsgBox CurDir
ChDrive Left(CurrentDb.Name, 1)
ChDir Left(CurrentDb.Name, InStrRev(CurrentDb.Name, "\") - 1)
MyCoolFunction
MsgBox CurDir
End Sub
Wieder schlauer geworden
#
VBA #
Access
