Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 07-11-15, 17:22
kouk Ο χρήστης kouk δεν είναι συνδεδεμένος
Όνομα: Σωτήριος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-07-2012
Μηνύματα: 20
Προεπιλογή Άνοιγμα φακέλου

Καλησπέρα σε όλους...
έχω ένα πρόβλημα και θα ήθελα την βοήθειά σας. Έκανα μία βάση στην οποία ανοίγοντας μια φόρμα δημιουργεί έναν φάκελο σε μια διεύθυνση δίνοντάς τον ένα όνομα που καθόρισα...
Πώς είναι δυνατών να ανοίγω τον φάκελο αυτόν πατώντας ένα κουμπί της φόρμας όποτε την επισκέπτομαι???

Ευχαριστώ εκ των προτέρων....

Private Sub Form_Load()
Dim fso
Dim fol As String

fol = "c:\users\" & MemberID & "_" & Επίθετο & " " & Όνομα & ""
Set fso = CreateObject("Scripting.FileSystemObject")
If Not (fso.FolderExists(fol)) Then
fso.CreateFolder (fol)
MsgBox "Ο φάκελος δημιουργήθηκε!"
End If

End Sub
Απάντηση με παράθεση