[Χρήστος]

Καλησπέρα στην Κοινότητα.
Ζητώ την βοήθειά σας στο εξής:
Σε μια Φόρμα, βασισμένη σε Πίνακα, έχουμε το πεδίο ΕΠΩΝΥΜΟ.
Σ' ένα κουμπί, με το ΚΛΙΚ, θέλω να δημιουργώ τον φάκελο: C\Orders\ΕΠΩΝΥΜΟ
(1. δηλαδή θέλω να δημιουργώ φάκελο και υποφάκελο και 2. ο φάκελος ΕΠΩΝΥΜΟ να παίρνει την τρέχουσα τιμή του πεδίου ΕΠΩΝΥΜΟ)

Με το παρακάτω δημιουργώ τον φάκελο Orders αλλά ...ΟΧΙ τον υποφάκελο....

If Dir("C:\Orders", vbDirectory) = "" Then
MkDir ("C:\Orders")
Else
'do nothing ... the directory already exists
End If