| Pregunta: | 3240 - COMPARTIR CARPETA EN VISUAL BASIC 5.0 |
| Autor: | Mauricio Rodriguez |
| Hola como estan, quisiera que me ayudaran, no se como crear una carpeta y compartila con alguna instruccion de visual basic 5.0, les agradeceria mucho si me pudieran dar respuesta a mi pregunta, ya que la utilizare, para mi proyecto de practica profesional. Agradeciendoles de ante mano, muchas gacias por cualquier ayuda. | |
| Respuesta: | Daniel Morin |
| Hola respecto a como crear una carpeta con visual basic se puede hacer de dos formas: PRIMERA: Utilizando comandos del MS-DOS a través de la instruccion shell por ejemplo: Shell(md RutaFolderNuevo). Esta opción hace un poco mas lento el programa pues se invoca por completo al emulador del MS-DOS, te recomiendo la segunda opción. SEGUNDA: Utilizando el objeto virtual fileSystemObject el cual requiere la siguiente referencia: Microsoft Scripting Runtime, este no solamente te creara una carpeta sino que permite verificar su existencia, copiar archivos, sobre escribirlos y otras cosas mas es muy completo, ve el siguiente ejemplo: Ejemplo: Dim File_Fso as fileSystemObject (variable que contiene al objeto fileSystem Object) Set File_Fso = New fileSystemObject (En tiempo de ejecución asignamos el fileSystemObject a la variable, en tiempo de diseño no se agrega ningun control al formulario) if (File_fso.FolderExist, (RutaOrigen)=True) then (Verificamos si existe la carpeta ) Exit Sub (Forzamos a salir de la rutina) Else File_Fso.CreateFolder RutaOrigen (Ruta Origen es la variable que contiene la ruta donde quieres que se cree la carpeta) end if Hasta aqui es la creación de la carpeta, para compartirla necesitas usar la API NetShareAdd9x pero es muy inestable y problemática es mejor que compartas la carpeta manualmente. Si requieres un ejemplo mas completo mandame un mail. SALUDOS | |
| Respuesta: | J RC |
| Crear una carpeta es posible desde una instrucción para el manejo del sistema de archivos de Visual Basic, MkDir (<directorio>), pero para compartirla deberñás declarar la función de la API y llamarla desde tu pograma Visual Basic 5. Busca que función es, y en el visor de texto de la API obtendrás la declaracion para Visual Basic. | |