On-screen guidance at the moment of need enables you & your employees to focus on the core, you can now boost your adoption rates swiftly and simply with one easy tool.
Public Function gfni_getFile() Dim gfni As adh_accOfficeGetFileNameInfo With gfni .hwndOwner = Application.hWndAccessApp .strAppName = "Select Location of File for Import" .strDlgTitle = "Select Location of File For Import" .strOpenTitle = "Select" .strfile = "*.mdb" .strInitialDir = "\\server\directory\folder" .strFilter = "Access Database (*.mdb)|All Files (*.*)|Excel Spreadsheet (*.xls)" .lngFilterIndex = 1 .lngView = adhcGfniViewList .lngFlags = adhcGfniNoChangeDir Or adhcGfniInitializeView End With If adhOfficeGetFileName(gfni, True) = adhcAccErrSuccess Then gfni_getMTOE = Trim(gfni.strfile) End If End Function
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.