Foros del Web » Programando para Internet » ASPX (.net) »

Esport datos a excel

Estas en el tema de Esport datos a excel en el foro de ASPX (.net) en Foros del Web. Buenas, quiero exportar datos a excel de esta manera Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click Striginsert = "SELECT * ...
  #1 (permalink)  
Antiguo 12/10/2010, 10:14
 
Fecha de Ingreso: mayo-2008
Mensajes: 353
Antigüedad: 16 años
Puntos: 3
Esport datos a excel

Buenas, quiero exportar datos a excel de esta manera

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

Striginsert = "SELECT * from Siniestro"
Dim ada As New SqlDataAdapter(Striginsert, con)
Dim DS As New DataSet
ada.Fill(DS, "sini")

Response.Write("<table runat=""server"" id=""Tablex"" Style = ""position: relative; top: 0px; height: 20px"">")
Response.Write("<tr>")
Response.Write("<td>listo echo </td>")
Response.Write("<td>")
Response.Write("<td><button runat=""server"" OnClientClick=""javascript: return exportToExcel('listo')"">Export to Excel</button></td>")
Response.Write("</td>")
Response.Write("</tr>")
Response.Write("</table>")

Response.Write("<table runat=""server"" id=""ExportTable"" Style = ""position: relative; top: 15px; height: 20px"">")
'
Response.Write("<tr>")
For i As Integer = 0 To DS.Tables(0).Columns.Count - 1
Response.Write("<td>" & DS.Tables(0).Columns(i).ColumnName & "</td>")
Next
Response.Write("</tr>")
For i As Integer = 0 To DS.Tables(0).Rows.Count - 1
Response.Write("<tr>")
Dim row As DataRow = DS.Tables(0).Rows(i)
For j As Integer = 0 To DS.Tables(0).Columns.Count - 1
Response.Write("<td>" & row(j) & "</td>")
Next
Response.Write("</tr>")
Next
Response.Write("</tr>")
Response.Write("</table>")
Response.End()

End Sub

El problema es que el botón que se crea para llamar un script en javascript NO lo ejecuta, o si lo ejecuta no se donde guarda el file de Excel. No único cierto es que me muestra la información el pantalla luego hago click sobre el botón export a excel y no dice NADA

Lo único cierto es que tengo un error, donde?? NO SE

Este es el script

<script type="text/javascript">
function exportToExcel(){
var i;
var j;
var mycell;
var tableID = "ExportTable";
var objXL = new ActiveXObject("Excel.Application");
var objWB = objXL.Workbooks.Add();
var objWS = objWB.ActiveSheet;

for (i=0; i < document.getElementById(tableID).rows.length; i++)
{
for (j=0; j < document.getElementById(tableID).rows(i).cells.len gth; j++)
{
mycell = document.getElementById(tableID).rows(i).cells(j)
objWS.Cells(i+1,j+1).Value = mycell.innerText;


}
}
</script>

Gracias por toda la ayuda recibida

Etiquetas: excel, aspx
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 19:17.