Exportar a txt
En una aplicación al guardar un documento, según se guarda quisiera exportar una serie de campos a un fichero de txt. Por favor es muy urgente
1 respuesta
Respuesta de karjman
1
Esto es para abrir el fichero
Dim fileNum As Integer
Dim fileName As String
fileNum% = Freefile()
fileName$ = "C:\Fichero.txt"
Open fileName$ For Output As fileNum%
ESTO ESCRIBE EN EL FICHERO
Write #fileNum%, document.campo(0)
Esto cierra el fichero
Close fileNum%
Dim fileNum As Integer
Dim fileName As String
fileNum% = Freefile()
fileName$ = "C:\Fichero.txt"
Open fileName$ For Output As fileNum%
ESTO ESCRIBE EN EL FICHERO
Write #fileNum%, document.campo(0)
Esto cierra el fichero
Close fileNum%
