Busqueda en txt
Hola, yo pongo el siguiente codigo:
Dim fso As New FileSystemObject
If fso.FileExists("c:shalal.dat" Then
Set des = fso.OpenTextFile("c:pass.dat"
textab = des.ReadAll
des.Close
End If
t = InStr(1, Trim(LCase(textab)), Trim(LCase("hola"), vbTextCompare)
Con esto busca en el archivo si se ecuentra una palabra.
Ahora lo q yo quiero es q empiese a buscar a partir de un linea y apartir de uun caracter. Osea yo quiero q busque a partir de la 9 linea y a partir del 6 caracter escrito en esa linea como se hace? . Gracias
Dim fso As New FileSystemObject
If fso.FileExists("c:shalal.dat" Then
Set des = fso.OpenTextFile("c:pass.dat"
textab = des.ReadAll
des.Close
End If
t = InStr(1, Trim(LCase(textab)), Trim(LCase("hola"), vbTextCompare)
Con esto busca en el archivo si se ecuentra una palabra.
Ahora lo q yo quiero es q empiese a buscar a partir de un linea y apartir de uun caracter. Osea yo quiero q busque a partir de la 9 linea y a partir del 6 caracter escrito en esa linea como se hace? . Gracias
