Ver Mensaje Individual
  #1 (permalink)  
Antiguo 16/11/2011, 10:36
pauly_0090
 
Fecha de Ingreso: noviembre-2011
Ubicación: Veracuz, México
Mensajes: 3
Antigüedad: 12 años, 6 meses
Puntos: 0
Pregunta Creacion de directorios

Hola que tal yo de nuevo. Ahora tngo otro error en mi codigo

If Dir("\\SISTEMAS4\Facturas\" & aiio & "", vbDirectory) = "" Then
My.Computer.FileSystem.CreateDirectory("\\SISTEMAS 4\Facturas\" & aiio & "") 'MkDir("\\SISTEMAS4\Facturas\" & aiio & "")
Else
Dim des1 As String = "\\SISTEMAS4\Facturas\"
If Dir("" & des1 & "\" & mes & "", vbDirectory) = "" Then _
My.Computer.FileSystem.CreateDirectory("" & des1 & "\" & mes & "")


en el primer if cuando se crea la carpeta me sale un mensaje de error que dice que no tengo acceso a la carpeta.

y en el segundo if no me crea la carpeta, podrian decirme que estoy poniendo mal???
por favor alguien me puede ayudar???