Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: jorgelin95 en 8 Septiembre 2010, 15:33 pm



Título: [Ayuda] MkDir
Publicado por: jorgelin95 en 8 Septiembre 2010, 15:33 pm
Bueno miren, necesito hacer un MkDir que ya se como se utiliza pero cuando cierras el programa quiero que esta carpeta creada con el MkDir se elimine ¿se puede? ¿cómo? y otra cosa ¿todos tenemos un disco duro llamado :C\? Gracias.


Título: Re: [Ayuda] MkDir
Publicado por: BlackZeroX en 8 Septiembre 2010, 17:15 pm
si con rmdir() en el evento correspondiente

y no, No todos tenemos un disco C:\

Ducles Lunas¡!.


Título: Re: [Ayuda] MkDir
Publicado por: Petro_Boca en 8 Septiembre 2010, 17:37 pm
Bueno miren, necesito hacer un MkDir que ya se como se utiliza pero cuando cierras el programa quiero que esta carpeta creada con el MkDir se elimine ¿se puede? ¿cómo? y otra cosa ¿todos tenemos un disco duro llamado :C\? Gracias.

para q se elimine cuando cierre el programa...

1- sacale los bordes al programa...


2- usa este codigo en un boton "Salir"

Código
  1.  
  2. Dim H As String
  3. H = "DIRECCION DE LA CARPETA"
  4. Kill H
  5. End


Título: Re: [Ayuda] MkDir
Publicado por: Petro_Boca en 8 Septiembre 2010, 17:41 pm
¿todos tenemos un disco duro llamado :C\? Gracias.

emm... podrias crearla en X:\windows

seria asi:

esto te devuelve el "X:\windows"

Código
  1.  
  2. Dim WIN As String
  3. WIN = Environ("WINDIR")
  4.  
  5.  

entonces al mkdir le pones en la ruta WIN y listo.


Título: Re: [Ayuda] MkDir
Publicado por: BlackZeroX en 8 Septiembre 2010, 18:55 pm

kill() es para archivo!¡.

Dulces Lunas!¡.


Título: Re: [Ayuda] MkDir
Publicado por: agus0 en 8 Septiembre 2010, 21:00 pm
¿todos tenemos un disco duro llamado :C\? Gracias.

emm... podrias crearla en X:\windows

seria asi:

esto te devuelve el "X:\windows"

Código
  1.  
  2. Dim WIN As String
  3. WIN = Environ("WINDIR")
  4.  
  5.  

entonces al mkdir le pones en la ruta WIN y listo.

Si Preferis hacerlo en la unidad que esta instalado el sistema operativo pero no usar la carpeta "Windows" podes hacer

Código
  1. Option Explicit
  2. Dim Path as String
  3.     Path = Left(Environ("WinDir"), 3)
  4.  

En el ejemplo mio la Ruta "Path" Seria "C:\" si el S.O estuviera instalado en el Disco Local C o, por ejemplo "X:\" si el S.O Estuviera instalado en el disco local X


Título: Re: [Ayuda] MkDir
Publicado por: jorgelin95 en 13 Septiembre 2010, 03:42 am
No entendi y como uso este code con mkedir

Option Explicit
Dim Path as String
     Path = Left(Environ("WinDir"), 3)

MkDir("Path")

?


Título: Re: [Ayuda] MkDir
Publicado por: BlackZeroX en 13 Septiembre 2010, 07:10 am
sin las comillas

Código
  1.  
  2. 'Mal
  3. MkDir("Path")
  4. 'Bien
  5. MkDir(Path)
  6.  
  7.  

aunque tambien prodria ser asi:

Código
  1.    call mkdir(Left(Environ("WinDir"), 3) & "Holaaaa xD")
  2.  

Sagrado Infierno Lunar!¡.