ugenux
26 de Noviembre del 2004

¿Cómo puedo borrar la última línea de un fichero .txt al hacer click en un botón?
¿Existe algún comando o instrucción para ello?

Tengo un programa que edita ficheros txt y me falta borrar lineas......EStoy desesperado.

Gracias.

en?
26 de Noviembre del 2004

sólo tienes que leer del fichero hasta que llegue al final, leyando línea por línea, y escribirlo en un fichero temporal si después de la línea leída no es final de fichero:

Dim StrLinea As String

Open Fich1 For Input As #1
Open Fich2 For Output As #2
While not eof(1)
line input #1, StrLinea
if Not eof(1) Then print #2, strlinea
Wend
Close
Kill Fich1
Name Fich2 As Fich1

--
Un saludo.