Este sé que no es el codigo para leerlo, pero es lo que uso para recojer los datos, muchas gracias
Código:
<% Dim oConn,strSQL, objRS Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("basededatos.mdb")) strSQL = "select distinct PARTES from CATALOGO" Set objRS = oConn.Execute(strSQL) if objRS.Eof AND objRS.Bof Then %> NUM. ÚLTIMO PARTE=<%=objRS("nparte")%>