Leer excel en ASP

[becode]

Hola a todos, necesito leer ficheros excel para poder sacar sus datos con asp, el problema esta en que cada excel es distinto(no tiene el mismo numero de filas), por lo que no puedo dar nombre a un rango de celdas.
Asi que lo que necesito es sacar del excel los datos fila por fila pero sin dar nombre a las celdas, pero no se como hacerlo (buscando un poco he visto algo de unas librerias... pero para php) si alguien me pudiera ayudar se lo agradeceria, soy novato en ASP.

[Lebennin]

Buenas becode,

espero que este codigo te ayude:

Código:

Set objXls = CreateObject("Excel.Application")

objXls.Workbooks.Open Ruta
Set objSheet = objXls.ActiveSheet

'Fila 2 para saltar los titulos
FilExcel = 2
'Loop para todas las filas del fichero excel
Do While Trim(objSheet.Cells(FilExcel,1).value) <> ""
'Recuperamos todos los datos por cada fila y columna
IdContrato = objSheet.Cells(FilExcel,1).Value
Fecha = objSheet.Cells(FilExcel,2).Value

Loop
objXls.Workbooks.Close
Set objXls = Nothing

Decirte que para realizar esto necesitas tener instalado el Excel en el servidor que corra la pagina asp.

[becode]

Muchas gracias Lebennin, me ha sido de gran ayuda , gracias

[Lebennin]

Nada tio. Me alegro de poder ayudar ;)

[JuanRAPerez]

Contador = 0
Do While Trim(objSheet.Cells(FilExcel,1).value) <> ""
'aqui obtienes la cantidad de registros
Contador = conador + 1
'Recuperamos todos los datos por cada fila y columna
IdContrato = objSheet.Cells(FilExcel,1).Value
Fecha = objSheet.Cells(FilExcel,2).Value
Loop

suerte

[Myakire]

¿Por qué no abres el Excel como si fuera una tabla?, no es necesario dar un nombre a los rangos, ejemplo:

oRS.Open "Select * from [Transportes CamposFiltrados$A1:Y1000] WHERE IDTRANSPORTISTA = " & Session("auth_userid"), oConn, 1, 3

[becode]

Gracias a todos por la ayuda, ya lo e soluccinado

[JuanRAPerez]

para la gente que lee los post años mas tarde, seria bueno que pegaras tu solucion completa asi la gente puede tener a la mano la respuesta o la forma de hacer el proceso

gracias.

[Lebennin]

Myakire, siempre debilitando mis soluciones XDDD

[Myakire]

Iniciado por Lebennin

Myakire, siempre debilitando mis soluciones XDDD

eehh, no, mas bien es complementarlas , es más, con tu respuesta me ha dado curiosidad el saber que ventaja tendría abrir el excel con CreateObject("Excel.Application"), algún día lo probaré

saludos

[Lebennin]

No es que tenga muchas ventajas la verdad. Viene bien si quieres hacer formatos y demas y posteriormente enviar esa hoja excel por mail. Yo lo utilizo en mi empresa para eso, hay gente que sigue muy enganchada al Excel XDDD