abrir fichero .txt y tomar datos

[Laika]

Cómo puedo con FSO abrir un .txt que en su interior tiene varias lineas con este formato:

<a href='pagina1.asp'>Pagina1</a>

<a href='pagina2.asp'>Pagina2</a>

<a href='pagina3.asp'>Pagina3</a>

Una vez que esté abierto quiero quedarme con una parte del texto de cada una de las lineas: pagina1.asp, pagina2.asp, pagina3.asp...

[u_goldman]

Investiga acerca de las funciones Instr e InstrRev

Despues iteras cada una de las lineas mediante el fso.readline y buscas esos substrings, unes con un delimitador, en tu caso "," e incrementas una variable.

Saludos

[Laika]

Ya lo he hecho pero los resultados los quiero añadir a una tabla y me da este error:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Controlador ODBC Microsoft Access] No se puede actualizar. Base de datos u objeto de sólo lectura.

Este es el codigo:

<%

Set Conn = Createobject("ADODB.Connection")
Set rs = CreateObject ("ADODB.RecordSet")
Conn.Open "bdatos"

set FSO = Server.CreateObject("Scripting.FileSystemObject")
set oFich = FSO.OpenTextFile("C:\listadodevinculos.txt", 1)

rs.Open "tabla1",Conn,3,3

For i= 0 to 764

contenido= oFich.Readline
cadena=split(contenido,"'")
cadena_final=(cadena(1))

rs.AddNew
rs ("campo1")= cadena_final

i=i+1

Next

rs.close
oFich.Close
Set oFich = Nothing
Set FSO = Nothing

%>

[sqa212]

ponte sobre la bd, boton derecho del raton y desactiva solo lectura