Foros del Web » Programando para Internet » ASP Clásico »

Crear una tabla en Access con una hoja excel

Estas en el tema de Crear una tabla en Access con una hoja excel en el foro de ASP Clásico en Foros del Web. Saludos, Es posible crear una tabla en una base de datos de Access leyendo una hoja de un archivo excel? y como? Se los agradeceria ...
  #1 (permalink)  
Antiguo 29/11/2004, 09:58
 
Fecha de Ingreso: noviembre-2004
Ubicación: Mexico D.F. Alvaro Obregon
Mensajes: 3
Antigüedad: 19 años, 6 meses
Puntos: 0
Crear una tabla en Access con una hoja excel

Saludos,

Es posible crear una tabla en una base de datos de Access leyendo una hoja de un archivo excel? y como? Se los agradeceria mucho.
  #2 (permalink)  
Antiguo 30/11/2004, 05:12
 
Fecha de Ingreso: noviembre-2004
Ubicación: trelew - chubut
Mensajes: 134
Antigüedad: 19 años, 6 meses
Puntos: 0
lo mas facil es importar el excel directamente desde access
con archivo --->obtener datos externos
  #3 (permalink)  
Antiguo 04/12/2004, 15:02
 
Fecha de Ingreso: noviembre-2004
Ubicación: Mexico D.F. Alvaro Obregon
Mensajes: 3
Antigüedad: 19 años, 6 meses
Puntos: 0
Muchas gracias. Y es posible hacerlo con codigo ASP? es decir, desde la pagina web, abrir el archivo y leer sus datos e insertarlos en una BD de access?
Gracias de nuevo.
  #4 (permalink)  
Antiguo 06/12/2004, 06:45
 
Fecha de Ingreso: noviembre-2004
Ubicación: trelew - chubut
Mensajes: 134
Antigüedad: 19 años, 6 meses
Puntos: 0
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">&nbsp;</p>
</body>
</html

espero te sirva
  #5 (permalink)  
Antiguo 09/12/2004, 08:22
 
Fecha de Ingreso: noviembre-2004
Ubicación: Mexico D.F. Alvaro Obregon
Mensajes: 3
Antigüedad: 19 años, 6 meses
Puntos: 0
Sonrisa

Muchas gracias Flacoluis, has sido de mucha ayuda.
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 21:14.