Título: Escribir en linea aparte Publicado por: bautistasbr en 11 Marzo 2006, 20:09 pm ola amigos,tengo una aplicacion que me guarda los datos de 2 textbox en un archivo de texto,pero quiero q cada vez q pulse el boton me guarde los datos en otras lineas.Ejemplo:yo guardo el archivo y me sale asi
Amigo Amigos pero cuando vuelvo a pulsar el boton me sobrescribe los datos,y quiero q los ponga aparte,mi codigo es este. Private Sub Command1_Click() Dim canalLibre As Integer 'Obtenemos un canal libre que nos dará 'el sistema oparativo para poder operar canalLibre = FreeFile 'Abrimos el fichero en el canal dado Open "C:\fichero.txt" For Output As #canalLibre 'Escribimos el contenido del TextBox al fichero Print #canalLibre, Text1 Print #canalLibre, Text2 Close #canalLibre End Sub Título: Re: Escribir en linea aparte Publicado por: NYlOn en 11 Marzo 2006, 20:15 pm Código: Open "C:\fichero.txt" For Append As #canalLibre Título: Re: Escribir en linea aparte Publicado por: bautistasbr en 11 Marzo 2006, 21:27 pm gracias funciona perfectamente
|