Comparar Registros

[Fabian olmos]

Los datos que tiene esa BD vienen de este archivo y estoy tratando de comparar linea por linea pero al igual que la bd tengo que adelantar una linea para comparar la con la atenrior pero no se como adelantar dicha linea.

aqui va el codigo


contador=0
A=""
B=""
C=""
CC=""
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & SERVER.MApPath("BD\Estadisticas.mdb"))
set rs = CreateObject("ADODB.Recordset")
rs.Open "Estadisticas_Ind", con,1,2
rs.movefirst
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
path = ""
path = Request.QueryString("path")
If FSO.FileExists (Server.MapPath(path & "logs/ex050410.log")) Then
Set ts = Nothing
Set ts = FSO.OpenTextFile (Server.MapPath(path & "logs/ex050410.log"))
Do While not TS.AtendOfStream
strLine = TS.ReadLine
A=mid(strLine,1,10)
B=mid(strLine,12,8)
C=mid(strLine,21,15)
rs.addnew
rs("fecha")=A
rs("Hora")=B
rs("IP")=C
rs.update
rs.movenext
loop
end if


gracias de verdad que si.