Ver Mensaje Individual
  #4 (permalink)  
Antiguo 23/11/2009, 14:37
Avatar de Myakire
Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 2 meses
Puntos: 146
Respuesta: exportar a excel

Ejemplo? supongo que de la conexión a Excel

Código asp:
Ver original
  1. <%
  2.     Dim sSourceXLS
  3.  
  4.     sSourceXLS = Server.MapPath(".") & "\Excel\RollosCosteados.xls"
  5.  
  6.     Dim oConn
  7.     Set oConn = Server.CreateObject("ADODB.Connection")
  8.     oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
  9.                "Data Source=" & sSourceXLS & ";" & _
  10.                "Extended Properties=""Excel 8.0;HDR=YES;"""
  11.  
  12.     Dim oRS
  13.     Set oRS = Server.CreateObject("ADODB.Recordset")
  14.     oRS.Open "Select * from [Rollos$A1:Y1000]", oConn, 1, 3
  15.    
  16.         %>
  17.         <table width="100%" border="1">
  18.         <%
  19.     Do While Not (oRS.EOF)
  20.         %><tr><%
  21.         For i = 0 To 24
  22.                     %><td><%=oRS.Fields(i).Value%><%
  23.         Next
  24.         oRS.MoveNext
  25.     Loop
  26.         %>
  27.         </table>
  28.         <%
  29.    
  30.     oRS.Close
  31.     Set oRS = Nothing
  32.    
  33.     oConn.Close
  34.     Set oConn = Nothing
  35. %>

Eso abre un Excel y lo muestra en pantalla, harías lo mismo pero en lugar de mostrarlo le correrías intrucciones de INSERT o UPDATE, en un Excel puedes hacer lo mismo que en una tabla común y corriente menos DELETE, ya que no puede eliminar filas en Excel mediante ADO, solo limpiar su contenido.