hola maestros tengo un problema estoy tratando de crear una carpeta pero me marca un error
"error de acceso a ruta o archivo"
Private Sub Form_Load()
Dim carpeta
carpeta = Dir("c:\fautos", vbDirectory) /*comprueba si ya existe la carpeta "fautos" */
Text1.Text = carpeta
If carpera = "" Then
crear
MsgBox "creamos la carpeta 'fautos'"
End If
End Sub
Private Sub crear()
Dim ruta As String
ruta = "c:\fautos"
MkDir ruta /*aqui me marca el error */
End Sub
gracias de ante mano
