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")%>


