Make Your Microsoft Dynamics Investment Count & Drastically Decrease Training Time by Providing Intuitive Step-By-Step WalkThru Tutorials.
intResult = Application.FileDialog(msoFileDialogFolderPicker).Show
Option Compare Database Option Explicit Private Sub cmdSelectFolder_Click() Dim intResult As Integer Dim strPath As String 'the dialog is displayed to the user intResult = Application.FileDialog(msoFileDialogFolderPicker).Show 'checks if user has cancled the dialog If intResult <> 0 Then 'dispaly message box 'Call MsgBox(Application.FileDialog(msoFileDialogFolderPicker _ ).SelectedItems(1), vbInformation, "Selected Folder") strPath = Application.FileDialog(msoFileDialogFolderPicker _ ).SelectedItems(1) Folder = strPath & "\" 'Folder is a textbox on my form End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|How can I check if a field is null and whether it is or not, still run the code||40||73|
|print previewing the record showing on the form||4||51|
|Database (Access Table) Security Access||8||60|
|Access 2010 Report Not Reading Data||19||23|
Join the community of 500,000 technology professionals and ask your questions.