Visual Basic - Fichero de errores

Quiero crear un fichero de texto que almacene el error que se haya producido durante la ejecucion de mi programa. Pero no consigo que cada registro se inserte en una nueva linea del fichero, siempre me lo crea a continuacion. Utilizo un fichero aleatorio con una variable de tamaño 254. Utilizo VB 6.

No uses un fichero aleatorio usa uno plano...
Ejemplo:

Private Sub GraboError (mensaje as String)
Open "ERROR.DAT" for Append as #1
print #1, mensaje
Close #1
End Sub

El modo de apertura Append hace que si el fichero no existe, te lo crea. Y si el fichero ya existe, te agrega los datos uno debajo del otro. Espero que te sirva, cualquier cosa mandame un mail.

Saludos!!!