| Pregunta: | 4480 - COMO CREAR UNA CARPETA DESDE VISUAL BASIC 4.0 |
| Autor: | Rodin Fadul |
| Estoy haciendo un programa instalador y deseo saber como crear una carpeta (en un path especíco) desde visual basic, trate de hacerlo con el shell y el md pero esta instruccion no recibe como parametros un path sino solo un nombre. Cualquier ayuda seria muy apreciada y bien agradecida | |
| Respuesta: | Daniel Morin |
| Mi estimado Rodin Fadul olvidate del shell y has lo siguiente:
1.-Agrega a tu proyecto la referencia "Microsoft Scripting Runtime" y ecribe el siguiente codigo en tu formulario: Dim RutaOrigen Dim RutaDestino RutaOrigen="C:La ubicacion del archivo a copiar" RutaDestino="C:La ubicacion a donde se copiara el archivo" Dim File_Fso as FileSystemObject Set File_Fso = New FileSystemObject File_Fso.CopyFile RutaOrigen, RutaDestino Si deceas saber si el archivo existe en la ruta destino entonces despues de la instruccion Set escribe lo siguiente: if (File_Fso.FileExist(RutaDestino)=True) then Respuesta =msgbox( "El archivo ya existe ¿Desea sobre escribirlo?",vbQuestion + vbYesNo, "Archivo Existente") if respuesta = 6 then File_Fso.CopyFile RutaOrigen, RutaDestino, True else exit sub end if else File_Fso.CopyFile RutaOrigen, RutaDestino end if Espero te sirva, si reuieres de un ejemplo completo mandame un mail. | |
| Respuesta: | Xavi |
| Para crear un nuevo directorio, tienes que utilizar la instruccion MkDir. MkDir curdir() & "\hola" Esta instruccion te crea el directorio hola en el directorio donde se esta ejecutando el programa. MkDir "c:\hola" Esta instruccion te crea el directorio en C:\ | |