Visual Basic - Recorrido inverso de un txt

Life is soft - evento anual de software empresarial
   
Vista:

Recorrido inverso de un txt

Publicado por jose (2 intervenciones) el 04/09/2008 03:05:36
Buenas tardes,
estoy buscando una forma de recorrer un archivo txt hasta que encuentre un registro igual a otro registro en otra tabla, PERO a la inversa!
no quiero usar este while sino un for o algo, pero necesito una funcion que me diga cuantos items tiene este archivo de texto (file.count, file.rows, o algo asi ¿? ):S
estoy tarbajando en el siguiente codigo. Si bien anda, no es lo que busco. se entiende?
necesito buscar en forma decreciente para no recorrer todo el txt.

Dim fileName2, file, FSO
Dim commandText
Dim count, flag
flag = 0
'Se establece la conexión
Set conn = CreateObject("ADODB.Connection")
conn.Open = connectionStringSyb
Set rs = CreateObject("ADODB.Recordset")

commandText = "select Mensaje from dbo.tabla1"
rs.Open commandText, conn, adOpenKeyset

'Se instancia el objeto File System
Set FSO = CreateObject("Scripting.FileSystemObject")

fileName2 = DTSGlobalVariables("fileName2").Value

Set file = FSO.OpenTextFile(fileName2, ForReading, True)

While Not file.AtEndOfStream and rs(0) <> line

line = file.ReadLine
cmd = "insert into base1..tabla2 values('" & line & "')"

If rs(0) <> line then and flag = 0 then

flag = 1
Else
If flag = 1 then
conn.Execute (cmd)
End if
End If
Wend

desde ya muchas gracias al que me tire un centro :P
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

RE:Recorrido inverso de un txt

Publicado por igor (633 intervenciones) el 04/09/2008 18:23:09
A VER SI NOS ENTERAMOS!!!!!!!!!!!!!!!!!!!!OSTIEJAS!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Trabajas con Visual Basic Script, NO!!!!. Ya que escribes en el foro equivocado por lo menos podrías indicarlo.

Te recomiendo que no deseches la idea del while para recorrer el archivo en inversa.
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:Recorrido inverso de un txt

Publicado por jose (2 intervenciones) el 04/09/2008 20:22:14
ups!
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