Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Scratz en 9 Septiembre 2006, 17:15 pm



Título: Crear carpeta desde VB
Publicado por: Scratz en 9 Septiembre 2006, 17:15 pm
Uso
Código:
MkDir ("C:\Hola\Quetal")
para crear una carpeta, pero cuando esta ya está creada me da error. ¿Cómo evito el error y que no me cree una nueva carpeta vacía? Gracias.


Título: Re: Crear carpeta desde VB
Publicado por: Impersecuto en 9 Septiembre 2006, 17:21 pm
Segun entiendo deberias primero posicionarte en la unidad o directorio que contendra la carpeta a crear con ChDir y luego solo creas la carpeta con MkDir Quetal.

La carpeta se creara dentro de la unidad o carpeta donde previamente te hayas posesionado.

Espero no equivocarme.

Saludos


Título: Re: Crear carpeta desde VB
Publicado por: Hendrix en 9 Septiembre 2006, 17:23 pm
kon un On Error Resume Next va que chuta..... ;) ;)

Salu2



Título: Re: Crear carpeta desde VB
Publicado por: Scratz en 9 Septiembre 2006, 17:25 pm
Ok, gracias a los 2.


Título: Re: Crear carpeta desde VB
Publicado por: Dayak en 12 Septiembre 2006, 02:14 am
kon un On Error Resume Next va que chuta..... ;) ;)

Salu2


Soy noob, me gustaria saber como se tiene que acer para introducir en codigo: On Error Resume Next

en el VB6?? es que e visto muchos codigos como estos, i no se donde poner-los.

Ayuda plzz gracias.


Título: Re: Crear carpeta desde VB
Publicado por: Mr.Chispa en 12 Septiembre 2006, 04:20 am
por ejemplo:
Código:
Private Sub Form_Load()
On Error Resume Next
    Open "archivo.txt" For Input As #1
    if err.Number = (yo q c) then solucionar()
End Sub
lo q hace el "On Error Resume Next" es q le dice al compilador q cuando encuentre un error en este sub lo omita, cuando ocurre un error lo guarda en Err, asi podes chequear si ocurrio un error,
tambien podes hacer esto q es algo mas ordenado:
Código:
Private Sub Form_Load()
On Error GoTo solucion
    Open "archivo.txt" For Input As #1
solucion:
    id err.Number=(yo q c) then solucion()
End Sub
con este cuando ocurre algun error salta automaticamente a solucion y arregla el problema.
en este ejemplo por si no entendes intenta abrir un archivo, si no lo encuentra salta error, pero como le dijimos q omita los errores sigue a la proxima linea donde nos fijamos si ocurrio tal error (le tenemos q indicar el numbero de error q no lo puse por q no c  ;D), si ocurrio lo q podriamos hacer es indicar al usuario q no existe el archivo, y lito.
saludos.
PD: tambien lo podes poner en el encabezado del codigo para q abarque todo el form


Título: Re: Crear carpeta desde VB
Publicado por: Gorky en 12 Septiembre 2006, 10:04 am
kon un On Error Resume Next va que chuta..... ;) ;)

Yo eso lo veo un poco cutre pero para gustos los colores.

Tal vez sea que soy un maniaco de las Api's. Tienes a tu disposicion una muy bonita que se llama CreateDirectory. Con esta funcion no vas a recibir errores sino que cuando se cree el directorio de forma satisfactoria te va a devolver un valor distinto de 0 y cuando no se haya podido crear (bien porque ya existiera o por cualquier otro motivo) te va a devolver 0.

Las cosas bien hechas estan bien hechas. ;)