Código fuente de 'Recoge valores de celdas Excel.asp'
<html>
<head>
<title>Recoge valores de celdas Excel</title>
</head>
<body style="font-family: Arial; font-size: 9pt">
<p align="center"><b><font size="3">Recoge valores de celdas Excel</font></b></p>
En este ejemplo, leemos las celdas A1 a B6 de una hoja Excel (ASP.xls) y presentamos los valores, como a continuación:
<br><br>
<% 'Código ASP
dim ConnectDBQ,rs,dbc
Set dbc = Server.CreateObject("ADODB.Connection")
ConnectDBQ="DRIVER={Microsoft Excel Driver (*.xls)}; DBQ=" & server.mappath("ASP.xls")
dbc.Open ConnectDBQ
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open "select * from A1:D6",dbc,3,3
rs.movefirst
response.write("Columna A - Columna B - Columna C - Columna D" & "<br>")
do while not rs.eof
response.write(rs(0) & String(21, ".") & rs(1) & String(21, ".") & rs(2) & String(21, ".") & rs(3))
response.write( "<br>")
rs.movenext
loop
rs.close
%>
<p align="center"> </p>
</body>
</html
espero te sirva