Αναγν. άρθρου: 824272 - Τελευταία αναθεώρηση: Σάββατο, 17 Σεπτεμβρίου 2011 - Αναθεώρηση: 5.0

Πώς μπορείτε να εμφανίσετε και να χρησιμοποιήσετε το παράθυρο διαλόγου αρχείου της Microsoft Access

Παράλληλη προβολήΠροβολή του πρωτότυπου αγγλικού άρθρου και της ελληνικής μετάφρασης αντικριστά
Μηχανικά μεταφρασμένοΠΡΟΕΙΔΟΠΟΙΗΣΗ: ΑΥΤΟ ΤΟ ΑΡΘΡΟ ΜΕΤΑΦΡΑΣΤΗΚΕ ΜΕ ΜΗΧΑΝΙΚΗ ΜΕΤΑΦΡΑΣΗ
Δείτε τα προϊόντα στα οποία αναφέρεται το συγκεκριμένο άρθρο.
Συμβουλή συστήματοςΑυτό το άρθρο ισχύει για διαφορετικό λειτουργικό σύστημα από αυτό που χρησιμοποιείτε. Το περιεχόμενο του άρθρου που ενδέχεται να μην σας αφορά έχει απενεργοποιηθεί.
Αυτό το άρθρο ισχύει για μια βάση δεδομένων Microsoft Access (.mdb) και ένα Microsoft Access (.adp) για το έργο.

Για προχωρημένους: Απαιτεί ειδικό κωδικοποίησης, διαλειτουργικότητας και ικανότητες πολλών χρηστών.
Για την έκδοση αυτού του άρθρου Microsoft Access 2002, ανατρέξτε στο θέμα279508  (http://support.microsoft.com/kb/279508/ ) .
Ανάπτυξη όλων | Σύμπτυξη όλων

Περίληψη

Αυτό το άρθρο περιγράφει τον τρόπο χρήσης του νέουFileDialogη μέθοδος στη Microsoft Access για να εμφανίσετε το ενσωματωμένοFILEπαράθυρο διαλόγου και για να προσδιορίσετε τα αρχεία που επιλέγει ο χρήστης.

ΣΗΜΕΙΩΣΗΓια ναFileDialogη μέθοδος λειτουργεί μόνο σε πλήρη τελική έκδοση της Microsoft Access. Η μέθοδος αυτή δεν λειτουργεί σε μια εφαρμογή χρόνου εκτέλεσης της Microsoft Access.
Επιστροφή στην αρχή

Περισσότερες πληροφορίες

Σε παλαιότερες εκδόσεις της Microsoft Access, μπορείτε να εμφανίσετε το παράθυρο διαλόγου αρχείου χρησιμοποιώντας το MicrosoftΚοινό παράθυρο διαλόγουΣτοιχείο ελέγχου ActiveX ή πραγματοποιώντας κλήσεις προς το API των Windows.

Χρησιμοποιώντας τοFileDialogη μέθοδος στη Microsoft Office Access 2003, μπορείτε να εμφανίσετε τοFILEπαράθυρο διαλόγου που χρησιμοποιούνται από τη Microsoft Access και για τον καθορισμό των αρχείων που επιλέγει ο χρήστης. Για ναSelectedItemsσυλλογή από τοFileDialogτο αντικείμενο περιέχει τις διαδρομές για τα αρχεία που έχουν επιλεγεί από το χρήστη. Χρησιμοποιώντας έναΓια-κάθεΕπανάληψη, μπορείτε να απαριθμήσει αυτήν τη συλλογή και στη συνέχεια να εμφανίσετε κάθε αρχείο. Το ακόλουθο παράδειγμα διέρχεται μέσω τουItemsSelectedσυλλογή και στη συνέχεια εμφανίζει αρχεία στο πλαίσιο λίστας.

Η Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για λόγους επεξήγησης, χωρίς να παρέχει καμία εγγύηση, σιωπηρή ή ρητή. Σε αυτά περιλαμβάνονται, ενδεικτικά, οι σιωπηρές εγγυήσεις εμπορευσιμότητας ή/και καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που παρουσιάζεται, καθώς και με τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και τον εντοπισμό σφαλμάτων κώδικα διαδικασιών. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας εξηγήσουν τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας, αλλά δεν θα τροποποιήσουν αυτά τα παραδείγματα, για να παράσχουν πρόσθετες λειτουργίες, ούτε θα δημιουργήσουν διαδικασίες, για να καλύψουν τις συγκεκριμένες απαιτήσεις σας.
  1. Ξεκινήστε τη Microsoft Access.
  2. Ανοίξτε το δείγμα βάσης δεδομένων Northwind.mdb.
  3. Στο παράθυρο "βάση δεδομένων", κάντε κλικ στο κουμπίΦόρμεςunderδύο διαστάσεων.
  4. Στο δεξιό τμήμα του παραθύρου, κάντε διπλό κλικΔημιουργία φόρμας σε προβολή σχεδίασης.
  5. Προσθέστε τα ακόλουθα στοιχεία ελέγχου στη φόρμα:
    	Command button
	--------------------------
	Name: cmdFileDialog
	Caption: Add Files
	OnClick: [Event Procedure]

	List box
	-------------------------
	Name: FileList
	RowSourceType: Value List
  6. Στο διακομιστήViewμενού, κάντε κλικ στο κουμπίΚωδικόςΓια να ανοίξετε τη λειτουργική μονάδα της φόρμας στην Microsoft Visual Basic.
  7. Στο διακομιστήΕργαλείαμενού, κάντε κλικ στο κουμπίΑναφορές.
  8. ΣτοΑναφορές-Όνομα βάσης δεδομένωνπαράθυρο διαλόγου, κάντε κλικ για να επιλέξετε τοΒιβλιοθήκη αντικειμένων Microsoft Office 11.0πλαίσιο ελέγχου και, στη συνέχεια, κάντε κλικ στο κουμπίOk.
  9. Προσθέστε τον ακόλουθο κώδικα στη λειτουργική μονάδα της φόρμας:
    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. Αποθηκεύστε τη φόρμα ωςΦόρμα1, και κατόπιν κλείστε το.
  11. Στο παράθυρο της βάσης δεδομένων, επιλέξτεΦόρμα1, και στη συνέχεια κάντε κλικ στο κουμπίOpenΓια να ανοίξετε τη φόρμα στην προβολή φόρμας.
  12. Κάντε κλικΠροσθήκη αρχείων. Για ναΕπιλέξτε ένα ή περισσότερα αρχείαεμφανίζεται το παράθυρο διαλόγου.
  13. Επιλέξτε ένα ή περισσότερα αρχεία και στη συνέχεια κάντε κλικ στο κουμπίOk, ή κάντε κλικ στο κουμπίΆκυρο (Cancel).
Εάν επιλέξετε ένα ή περισσότερα αρχεία, ενδέχεται να παρατηρήσετε ότι τα ονόματα των αρχείων που εμφανίζονται στο πλαίσιο λίστας. Εάν κάνετε κλικ στο κουμπίΆκυρο (Cancel), ενδέχεται να εμφανιστεί ένα μήνυμα που δηλώνει ότι κάνατε κλικΆκυρο (Cancel).
Επιστροφή στην αρχή

Αναφορές

Για περισσότερες πληροφορίες σχετικά με το τι μπορείτε να κάνετε με το πλαίσιο διαλόγου αρχείο στο πρόγραμμα επεξεργασίας της Visual Basic, κάντε κλικ στο κουμπίΒοήθεια της Microsoft Visual BasicΣτο διακομιστήΒοήθεια (Help)μενού, πληκτρολογήστεαντικείμενο FileDialogΣτοΑναζήτηση γιαστο παράθυρο της Βοήθειας και στη συνέχεια κάντε κλικ στο κουμπίΈναρξη αναζήτησηςΓια να προβάλετε το θέμα.
Επιστροφή στην αρχή
Οι πληροφορίες σε αυτό το άρθρο ισχύουν για:
  • Microsoft Office Access 2003
Επιστροφή στην αρχή
Λέξεις-κλειδιά: 
kbprogramming kbfile kbcode kbusage kbhowto kbmt KB824272 KbMtel
Επιστροφή στην αρχή
Μηχανικά μεταφρασμένοΜηχανικά μεταφρασμένο
ΣΗΜΑΝΤΙΚΟ: Αυτό το άρθρο είναι προϊόν λογισμικού μηχανικής μετάφρασης της Microsoft και όχι ανθρώπινης μετάφρασης. Η Microsoft σάς προσφέρει άρθρα που είναι προϊόντα ανθρώπινης αλλά και μηχανικής μετάφρασης έτσι ώστε να έχετε πρόσβαση σε όλα τα άρθρα της Γνωσιακής Βάσης μας στη δική σας γλώσσα. Ωστόσο, ένα άρθρο που έχει προκύψει από μηχανική μετάφραση δεν είναι πάντα άριστης ποιότητας. Ενδέχεται να περιέχει λεξιλογικά, συντακτικά ή γραμματικά λάθη, όπως ακριβώς τα λάθη που θα έκανε ένας μη φυσικός ομιλητής επιχειρώντας να μιλήσει τη γλώσσα σας. Η Microsoft δεν φέρει καμία ευθύνη για τυχόν ανακρίβειες, σφάλματα ή ζημίες που προκύψουν λόγω τυχόν παρερμηνειών στη μετάφραση του περιεχομένου ή χρήσης του από τους πελάτες της. Επίσης, η Microsoft πραγματοποιεί συχνά ενημερώσεις στο λογισμικό μηχανικής μετάφρασης.
Η αγγλική έκδοση αυτού του άρθρου είναι η ακόλουθη:824272  (http://support.microsoft.com/kb/824272/en-us/ )
Επιστροφή στην αρχή