Foros del Web » Programación para mayores de 30 ;) » .NET »

Leer excel con web y asp

Estas en el tema de Leer excel con web y asp en el foro de .NET en Foros del Web. No seáis malos conmigo. No sé mucho de programación. Por un tema debo hacer una web muy simple que extraiga datos de un excel. Me ...
  #1 (permalink)  
Antiguo 30/07/2015, 09:22
 
Fecha de Ingreso: julio-2015
Mensajes: 1
Antigüedad: 8 años, 9 meses
Puntos: 0
Leer excel con web y asp

No seáis malos conmigo. No sé mucho de programación.

Por un tema debo hacer una web muy simple que extraiga datos de un excel. Me he mirado, y remirado, post al respecto y no lo consigo.

Al final he escrito el siguiente código copiado de algún foro y adaptandolo pero... no va... chrome me descarga una copia del fichero asp y no me pinta el contenido del excel.

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">
<title>Leer de una hoja de datos Excel</title>
</head>
<body>

<h1>Leer de una hoja de datos Excel</h1>

<%
ExcelFile = "http://......../LibroExcel.xls"
SQL = "SELECT [Nombre], [Apellidos] FROM [Sheet1$]"
Set ExcelConnection = Server.createobject("ADODB.Connection")
ExcelConnection.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ExcelFile & ";Extended Properties=""Excel 12.0 Xml;HDR=YES;IMEX=1"";"
SET RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL, ExcelConnection
Response.Write "<table border=""1""><thead><tr>"
FOR EACH Column IN RS.Fields
Response.Write "<th>" & Column.Name & "</th>"
NEXT
Response.Write "</tr></thead><tbody>"
IF NOT RS.EOF THEN
WHILE NOT RS.eof
Response.Write "<tr>"
FOR EACH Field IN RS.Fields
Response.Write "<td>" & Field.value & "</td>"
NEXT
Response.Write "</tr>"
RS.movenext
WEND
END IF
Response.Write "</tbody></table>"
RS.close
ExcelConnection.Close
%>



</body>
</html>


El excel sólo tiene dos columnas con los nombres Nombre y Apellidos.

No sé qué hago mal...
  #2 (permalink)  
Antiguo 08/08/2015, 00:54
 
Fecha de Ingreso: noviembre-2002
Ubicación: DF
Mensajes: 1.056
Antigüedad: 21 años, 5 meses
Puntos: 37
Respuesta: Leer excel con web y asp

Yo leo asi desde .net:

Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & nombreArchivoDestino & ";" & "Extended Properties=Excel 8.0;" 'HDR=Yes;IMEX=0;"


Dim oledbConn As OleDbConnection = New OleDbConnection(connString)
oledbConn.Open()
Dim rsTiemposExcel
strSql = "SELECT * FROM [Hoja1$]"
Dim cmd = New OleDbCommand(strSql, oledbConn)
rsTiemposExcel = cmd.ExecuteReader()

Dim campo1 As String = ""
Dim campo2 As String = ""
Dim campo3 As String = ""
Dim cuentaRegistros As Integer = 0
While rsTiemposExcel.Read()

OJO: el excel esta ACCESIBLE via local (UNA VEZ QUE HE HECHO EL "UPLOAD" del .xls)
En tu caso veo que tienes: ExcelFile = "http://......../LibroExcel.xls"
que creo NO ES UNA RUTA VALIDA ... DEBE SER ALGO COMO D:\inetpub\" (local en tu webserver)
  #3 (permalink)  
Antiguo 08/08/2015, 04:28
Avatar de gnzsoloyo
Moderador criollo
 
Fecha de Ingreso: noviembre-2007
Ubicación: Actualmente en Buenos Aires (el enemigo ancestral)
Mensajes: 23.324
Antigüedad: 16 años, 5 meses
Puntos: 2658
Respuesta: Leer excel con web y asp

OFF TOPIC en Base de Datos.

Movido a .Neta.
__________________
¿A quién le enseñan sus aciertos?, si yo aprendo de mis errores constantemente...
"El problema es la interfase silla-teclado." (Gillermo Luque)

Etiquetas: asp, bases-de-datos-general, excel
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 15:28.