Foros del web, para los que viven de bits

Xannarkand · 05-may-2006, 07:14

Hola soy estudiante de Ing. En Sistemas, tengo un proyecto final en visual basic 6.0, y me esta saliendo muy bien, solo tengo un pequeno detalle, No se como crear una carpeta y un archivo, por ejemplo combo1= "Suerte", necesito que se cree una carpeta y dentro de esa carpeta un archivo con el nombre que exista en el combo1, y asi que se creen varios archivos y carpetas con el valor que tenga combo1, no se si me explico, buenosolo eso me falta, muchas gracias

NightDark · 05-may-2006, 07:58

Cita:

Iniciado por Xannarkand

Hola soy estudiante de Ing. En Sistemas, tengo un proyecto final en visual basic 6.0, y me esta saliendo muy bien, solo tengo un pequeno detalle, No se como crear una carpeta y un archivo, por ejemplo combo1= "Suerte", necesito que se cree una carpeta y dentro de esa carpeta un archivo con el nombre que exista en el combo1, y asi que se creen varios archivos y carpetas con el valor que tenga combo1, no se si me explico, buenosolo eso me falta, muchas gracias

Pues a estudiar a estudiar que hay que terminar la carrera (yo ni tengo jaja)
para crear la carpeta puedes declarar la API CreateFolder :) y usarla...
o crear un objeto (CreateObject) y usar FSO (FileSystemObject)
(Dim fso: set fso = createobject("scripting.filesystem.object"))
y usar CreateFolder...

Por lo del archivo tienes los procedimientos de VB.. (que supongo ya debes haber aprendido.)

Código:

Open "xxx fichero" for output as #1
print #1,"contenido"
close #1

o podrías declarar la API que está en la libreria del Kernel32 y usar CreateFile para crear los archivos.

un saludo.

darkhack · 07-may-2006, 01:25

Para crear la carpeta puedes usar la sentencia "MkDir":

MkDir "ubicacion"
ejemplo:

MkDir "C:\hola"
y pss para crear el archivo puedes ligar a una variable la direccion del archivo.
Salu2

05-may-2006, 07:14	#1 (permalink)
Xannarkand Fecha de Ingreso: mayo-2006 Mensajes: 1	Ayuda para mi proyecto!!! Hola soy estudiante de Ing. En Sistemas, tengo un proyecto final en visual basic 6.0, y me esta saliendo muy bien, solo tengo un pequeno detalle, No se como crear una carpeta y un archivo, por ejemplo combo1= "Suerte", necesito que se cree una carpeta y dentro de esa carpeta un archivo con el nombre que exista en el combo1, y asi que se creen varios archivos y carpetas con el valor que tenga combo1, no se si me explico, buenosolo eso me falta, muchas gracias

05-may-2006, 07:58	#2 (permalink)
NightDark Fecha de Ingreso: enero-2006 Ubicación: mi casa Mensajes: 256	Cita: Iniciado por Xannarkand Hola soy estudiante de Ing. En Sistemas, tengo un proyecto final en visual basic 6.0, y me esta saliendo muy bien, solo tengo un pequeno detalle, No se como crear una carpeta y un archivo, por ejemplo combo1= "Suerte", necesito que se cree una carpeta y dentro de esa carpeta un archivo con el nombre que exista en el combo1, y asi que se creen varios archivos y carpetas con el valor que tenga combo1, no se si me explico, buenosolo eso me falta, muchas gracias Pues a estudiar a estudiar que hay que terminar la carrera (yo ni tengo jaja) para crear la carpeta puedes declarar la API CreateFolder :) y usarla... o crear un objeto (CreateObject) y usar FSO (FileSystemObject) (Dim fso: set fso = createobject("scripting.filesystem.object")) y usar CreateFolder... Por lo del archivo tienes los procedimientos de VB.. (que supongo ya debes haber aprendido.) Código: Open "xxx fichero" for output as #1 print #1,"contenido" close #1 o podrías declarar la API que está en la libreria del Kernel32 y usar CreateFile para crear los archivos. un saludo.

07-may-2006, 01:25	#3 (permalink)
darkhack Fecha de Ingreso: marzo-2005 Mensajes: 654	Para crear la carpeta puedes usar la sentencia "MkDir": MkDir "ubicacion" ejemplo: MkDir "C:\hola" y pss para crear el archivo puedes ligar a una variable la direccion del archivo. Salu2 __________________ Dios solo nos dio el 0 y el 1 pero con eso hemos hecho maravillas 1er dia te espantas, 2° te desesperas,3° buscas ayuda y 4°....Adios

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado