Visual Basic - Problemas con un archivo .txt

Life is soft - evento anual de software empresarial
 
Vista:

Problemas con un archivo .txt

Publicado por Mirwuis (9 intervenciones) el 19/10/2004 21:15:34
necesito pasar los registros de una tabla en access a un archivo plano .txt pero cuando copio los archivos al registro me los copia en dos lineas, es decir no me continua la linea, auxilio ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Detalla un poco más

Publicado por bla (230 intervenciones) el 19/10/2004 21:41:26
Sin más datos no podemos saber que es lo que ocurre.
¿Cómo lo estás haciendo?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problemas con un archivo .txt

Publicado por Ruri (583 intervenciones) el 20/10/2004 04:43:28
Si RDS es tu recodset, entonces yo usaría este código

With RDS 'Data1.Recodset o lo que sea
If .RecordCount<1 then exit sub
Dim fso As Object, TXE As Object, s as string, k as long, j as long
Set fso = CreateObject("Scripting.FileSystemObject")
Set TXE = fso.CreateTextFile(App.Path & "Basededatos.txt", True)
.MoveLast
.MoveNext
For k=1 to .RecordCount
s= .Fields(0).Value & vbtab
s=s & .Fields(1).Value & vbtab
s=s & .Fields(2).Value & vbtab
s=s & .Fields(3).Value & vbtab
' ...
TXE.WriteLine s
Next k
TXE.Close
End With
Set fso=Nothing
Set TXE = Nothing

Saludos Ruri
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar