Pregunta:
¿GENERAR NUEVO ARCHIVO .TXT VISUAL BASIC 6 AL GUARDAR?
ANDRES
2013-11-02 07:33:03 UTC
Hola
Mi pregunta es que tengo un Comman buton "guardar" en Visual Basic 6 con este código

Direccion = "C:\Data.txt"
rem abre la direccion de forma de escritura del este archivo #1
open Direccion For output as #1
rem Escribe en ell archivo #1 lo que hay en el textbox
write #1, Text1.text
Rem cierra el archivo
Close #1
End sub

Esta perfecto, lo que sucede es que necesito que cada vez que se de click a este botón genere un nuevo archivo y no sobrescriba el anterior, como hago
Gracias.
Tres respuestas:
alexrp730223
2013-11-02 17:58:26 UTC
Hazle de la siguiente manera

dim s as string

dim i as long

if dir(direccion)<> "" then ' el archivo existe

s=left(dirección,len(direccion)-4) 'donde le quitamos la extensión al archivo .txt



Linea_Again:



i=i+1



if dir(s & "_" & i & ".txt")<>"" then goto Linea_Again 'el archivo existe e incrementamos nuestro contador i hasta encontrar un numero de archivo disponible



Direccion =s & "_" & i & ".txt" 'este será el nuevo archivo a guardar



end if

espero te sirva el ejemplo...saludos...!
2013-11-02 15:26:09 UTC
Genera un nuevo nombre de archivo cada vez.

Puedes usar un secuenciador. O sea añade a un nombre base el numero de secuencia. Algo asi como agregarle 0001, 0002, 0003, etc.

Entonces la primera vez grabaras en Data0001.txt, la siguiente vez que hagas click grabaras en Data0002.txt y asi sucesivamente
φζίνέנ ®
2013-11-02 14:52:49 UTC
Pues para generar un nuevo archivo txt y que este no sobreescriva al original

tienes que tener en cuenta de tener tanto el boton de guardar como el Guardar como..



Como guardar sobre-escribe cualquier archivo sin importar su contenido



Guardar como lo hace de la forma contraria, al dar click en guardar como este se guarda de la forma predeterminada y en otra direccion o en la misma dirrecion del archivo pero como una copia del original asi este no sobre escribe lo que sucede o haces y deja intato al original asi cuando vayas a guardar los cambios en perfecta condicion sin alterar, puedas hacerlo sin problemas.



Espero haberte ayudado


ⓘ
Este contenido se publicó originalmente en Y! Answers, un sitio web de preguntas y respuestas que se cerró en 2021.
Loading...