
19/09/2008, 02:04
|
Colaborador | | Fecha de Ingreso: enero-2008 Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 3 meses Puntos: 37 | |
Respuesta: Archivos secuenciales Cita:
Iniciado por null Quiero realizar un programa que me permita guardar " Anotaciones " y despues mostrarlas en un text a todas juntas... :
Private Sub CMDingresar_Click()
Open "C:\Retrieve.dll" For Output As #1
Print #1, TXTingreso.Text
Close #1
End Sub
Private Sub CMDmostrar_Click()
Open "C:\Retrieve.dll" For Input As #1
Input #1, anotaciones
TXTmostrar.Text = anotaciones
Close #1
End Sub
Mi problema es que cuando las guarda, me borra las anteriores y asi sucesivamente ... y mi idea es que aparezcan todas las anteriormente guardadas!
Estaria muy agradecido si me consiguen la respuesta!, me canse de buscarla  Sólo tienes que abrir el archivo en modo Append: Open "C:\Retrieve.dll" For Append As #1 |