Come visualizzare e utilizzare la finestra di dialogo file in Microsoft Access

In questo articolo viene illustrato come utilizzare il nuovo metodo FileDialog in Microsoft Access per visualizzare la finestra di dialogo file incorporata e per determinare i file selezionato dall'utente.

Nota Il metodo FileDialog funziona solo nella versione finale completa di Microsoft Access. Questo metodo non funziona in un'applicazione run-time di Microsoft Access.

Nelle versioni precedenti di Microsoft Access, è possibile visualizzare la finestra di dialogo dei file utilizzando sia il controllo ActiveX di Microsoft Common Dialog oppure effettuare chiamate all'API di Windows.

Utilizzando il metodo di FileDialog in Microsoft Office Access 2003, è possibile visualizzare la finestra di dialogo file utilizzato da Microsoft Access e per determinare i file che l'utente seleziona. L'insieme SelectedItems dell'oggetto FileDialog contiene i percorsi ai file che sono selezionati dall'utente. Utilizzando una Per ogni ciclo, è possibile enumerare questo insieme e quindi visualizzare ciascun file. Questo esempio scorre l'insieme ItemsSelected e quindi Visualizza file nella casella di riepilogo.

Microsoft fornisce esempi di programmazione a scopo puramente illustrativo, senza alcuna garanzia espressa o implicita. Questo include, ma non è limitato a, le garanzie implicite di commerciabilità o idoneità per uno scopo specifico. Questo articolo si presuppone che conosca il linguaggio di programmazione in questione e gli strumenti utilizzati per creare ed eseguire il debug di procedure. Tecnici del supporto Microsoft possono spiegare la funzionalità di una particolare procedura, ma in nessun sono caso a modificare questi esempi per fornire funzionalità aggiuntive o creare procedure per soddisfare specifiche esigenze.

1. Avviare Microsoft Access.
2. Aprire il database di esempio Northwind.mdb.
3. Nella finestra database, fare clic su moduli dall'elenco oggetti .
4. Nel riquadro di destra, fare doppio clic su Crea una maschera in visualizzazione struttura .
5. Aggiungere i seguenti controlli alla maschera:
   

   	Command button
   	--------------------------
   	Name: cmdFileDialog
   	Caption: Add Files
   	OnClick: [Event Procedure]
   
   	List box
   	-------------------------
   	Name: FileList
   	RowSourceType: Value List
   

6. Dal menu Visualizza scegliere codice per aprire il modulo della maschera in Microsoft Visual Basic Editor.
7. Nel menu Strumenti , fare clic su riferimenti .
8. Fare clic per selezionare la casella di controllo Microsoft Office 11.0 Object Library nella finestra di dialogo riferimenti-DatabaseName e scegliere OK .
9. Aggiungere il codice riportato di seguito al modulo della maschera: cmdFileDialog_Click()

   Option Compare Database
   Option Explicit
         
   Private Sub cmdFileDialog_Click()
   
   ' This requires a reference to the Microsoft Office 11.0 Object Library.
   
      Dim fDialog As Office.FileDialog
      Dim varFile As Variant
   
      ' Clear the list box contents.
      Me.FileList.RowSource = ""
   
      ' Set up the File dialog box.
      Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
      With fDialog
         ' Allow the user to make multiple selections in the dialog box.
         .AllowMultiSelect = True
               
         ' Set the title of the dialog box.
         .Title = "Select One or More Files"
   
         ' Clear out the current filters, and then add your own.
         .Filters.Clear
         .Filters.Add "Access Databases", "*.MDB"
         .Filters.Add "Access Projects", "*.ADP"
         .Filters.Add "All Files", "*.*"
   
         ' Show the dialog box. If the .Show method returns True, the
         ' user picked at least one file. If the .Show method returns
         ' False, the user clicked Cancel.
         If .Show = True Then
            ' Loop through each file that is selected and then add it to the list box.
            For Each varFile In .SelectedItems
               Me.FileList.AddItem varFile
            Next
         Else
            MsgBox "You clicked Cancel in the file dialog box."
         End If
      End With
   End Sub
   			

10. Salvare la maschera come Form1 e chiuderlo.
11. Nella finestra del database selezionare Form1 e quindi scegliere Apri per aprire la maschera nella visualizzazione modulo.
12. Fare clic su Aggiungi file . Verrà visualizzata la finestra di dialogo Selezionare una o più file .
13. Selezionare uno o più file, quindi fare clic su OK oppure fare clic su Annulla .

Se si seleziona uno o più file, si noterà che i nomi dei file visualizzato nella casella elenco. Se si sceglie Annulla , potresti ricevere un messaggio che indica che si è scelto Annulla .

Per ulteriori informazioni sulle operazioni che è possibile eseguire con la finestra di dialogo file, in Visual Basic Editor scegliere Guida in linea di Visual Basic dal menu Guida , digitare oggetto filedialog nella casella Cerca del riquadro risorse e quindi fare clic su inizia la ricerca per visualizzare l'argomento.