Insertar fin de archivo manualmente

[Sergestux]

Alguien me podria decir como puedo hacerle para escribir un archivo de texto e incluirle un fin de archivo hasta el final.

Es que estoy generando unos archivos de un layout que me pasaron donde me indican que al final, debo incluirle un caracter de fin de archivo (para windows)

Código:

Archivo = App.Path & "\Archivo.txt"
 Open Archivo For Output As #1

        For CONT = 1 To X
            Print #1, Datos     'Aca lleno los datos
        Next CONT
        Print #1, Chr("\0")       'Aca quiero meterle el fin de linea
  Close #1

[totigo]

Para fin de linea usas las constantes de vb:

vbCr
vbCrLf

CR/LF (retorno de carro + avance de línea)
13 o "retorno de carro" (en hexadecimal 0D)
10 o "avance de línea" (en hexadecimal 0A)

Para fin de archivo, usas caracter de control 'Fin de Archivo' 26 en decimal (en hexadecimal 1A):

chr(26)


La verdad nunca he tenido la necesidad de usarlos en mis desarrollos.


Ejemplo de como generar un archivo plano:

Código vb:

Dim fnum As Integer
Dim FileName As String
 
    FileName = "c:\prueba.txt"
 
    
        fnum = FreeFile()
        Open FileName For Output As #fnum
        
        For i = 0 To 10
            linea = "Linea numero " & i
            Print #fnum, linea
        Next i
 
        Close #fnum
 
        MsgBox "Hecho! Se ha generado el archivo.", vbInformation
 

[Sergestux]

Gracias intentare con el caracter que me dices chr(26), mandare el archivo y espero que sea ese, y estaba pensando cerrarlo con vbNullChar o que es lo mismo Chr(0) pero ya veo que no va por ahi la cosa

[Avellaneda]

Iniciado por Sergestux

Gracias intentare con el caracter que me dices chr(26), mandare el archivo y espero que sea ese, y estaba pensando cerrarlo con vbNullChar o que es lo mismo Chr(0) pero ya veo que no va por ahi la cosa

La verdad es que no entiendo para qué quieres poner el carácter de fin de archivo.

Como te dice totigo ése carácter se genera él solo al escribir y cerrar el archivo.

[Sergestux]

Bueno yo hace poco generaba unos archivos para un sistema tipo unix y al igual me pedian que le insertara el caracter de fin de linea Ctrl + D y eso era lo que hacia, a pesar de que el archivo debia tener su propio fin de linea.

Lo que sucede es que esos archivos son subidos a otro sistema y supongo que asi es como trabaja la logica del sistema, es decir que no dejan de leer hasta que encuentren el caracter que indica que el archivo ha terminado