vba code to create a dir

[maxbre]

hi all



I need some hints in order to write some vba code I would like to attach to a button in a form

the button should perform the following operation:
create a directory which name is taken from a field of the same form and the new directory should be created in a specific given path (to be set)

is that all possible?
any help?

thanks

[RuralGuy]

Ask Help about MKDIR.

[maxbre]

thanks for your reply
Is there an alternative way to the brutality of my rough coding given below
(I'm referring in particular to the error control )

I've been trying with an if statement including "folderexists" but I was completely unsuccessful: any hint for this?

tank you


>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> >
Private Sub creadir_Click()
Dim FullPath As String
FullPath = "c:\documents and settings\massimo\desktop\" & Me.lista_dir.Value & "\"
On Error GoTo here
MkDir FullPath
Exit Sub
here:
MsgBox "dir already exists"
End Sub

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> >

[RuralGuy]

If Dir("ThisFile") <> vbNullString Then
   'Dir already exists.
Else
   'Create the dir
End If

...should do it here.

[maxbre]

with a slight variation your code worked fine

If Dir("theDir", vbDirectory) <> vbNullString Then
'Dir already exists.
Else
'Create the dir
End If

thanks

[RuralGuy]

Excellent! Glad you got it working.