ciao a tutti!dovrei inserire un link in pagina aspx attraverso il quale si scarica un file excel contenente dati presi da db
in asp bastava mettere nella pagina col link: <a href="tme_ent_mob_dett_xls.asp?territorio=<%=territorio%>&gruppo=<%=gruppo%>"> e nella pagina che effettua la creazione del file excel:
<!-- #include file = accesso.inc -->
<!-- #include file = _private\connessione.inc -->
<%
'assegna il nome al file Excel che si desidera generare
Dim filename
filename = "tme_ent_mob_dett_xls"
'abilita la bufferizzazione
Response.Buffer = true
'definisce il tipo di documento
Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "content-disposition", "inline; filename=" &filename& ".xls"
Dim Tot(20), Tot1(20)
%>
<% Server.ScriptTimeOut = 8000 %>
<%
'Recupero i parametri
territorio = Request.QueryString("territorio")
gruppo = Request.QueryString("gruppo")
mysql = " SELECT TERRITORIO, GRUPPO_PREMIUM_CARE, ROW_ID, LAST_UPDATE, STATO, DATA_STIPULA_ORDINE, TEMPO_EVASIONE AS TEMPO_EFFETTIVO, TEMPO_IN_MERCE, TEMPO_EFFETIVO AS TEMPO_EVASIONE " &_
" FROM PASSO_4_DETTAGLIO_KPI_TME WHERE TERRITORIO = '"&territorio&"' AND GRUPPO_PREMIUM_CARE = '"&gruppo&"'"
query1 = Replace(mysql, "'", "''")
objRs.Source = mysql
objRs.Open
'crea la tabella del foglio Excel
Response.Write "<table border=1 cellpadding=2 align=center>"
Response.Write "<tr bgcolor=#BCBCBC>"
Response.Write "<th><font size=1 face=Verdana>TERRITORIO</font></th>"
Response.Write "<th><font size=1 face=Verdana>PREMIUM CARE</font></th>"
Response.Write "<th><font size=1 face=Verdana>CODICE ORDINE</font></th>"
Response.Write "<th><font size=1 face=Verdana>DATA CHIUSURA</font></th>"
Response.Write "<th><font size=1 face=Verdana>STATO</font></th>"
Response.Write "<th><font size=1 face=Verdana>DATA STIPULA</font></th>"
Response.Write "<th><font size=1 face=Verdana>TEMPO EFFETTIVO</font></th>"
Response.Write "<th><font size=1 face=Verdana>TEMPO IN MERCE</font></th>"
Response.Write "<th><font size=1 face=Verdana>TEMPO EVASIONE</font></th>"
Response.Write "</tr>"
While Not (objRs.EOF)
Response.Write "<tr bgcolor=#FFFF66>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("TERRITORIO") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("GRUPPO_PREMIUM_CARE") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("ROW_ID") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("LAST_UPDATE") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("STATO") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("DATA_STIPULA_ORDINE") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("TEMPO_EFFETTIVO") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("TEMPO_IN_MERCE") &"</font></td>"
Response.Write "<td align=center><font color=#000000 size=1 face=Verdana>"& objRs.Fields("TEMPO_EVASIONE") &"</font></td>"
Response.Write "</tr>"
objRs.MoveNext
Wend
objRs.Close
Response.Write "</table>"
'invia l'output HTML bufferizzato
Response.Flush
Response.End
'INIZIO TRACCIAMENTO DATI UTENTE
tracciamento = "INSERT INTO TRACCIAMENTO (USERNAME, IP, QUERY, PAGINA, DATA) "&_
"VALUES ('"& Session("login") &"', '"& Request.ServerVariables("REMOTE_ADDR") &"', '"& query1 &"', 'tme_ent_mob_dett_xls.asp', getdate())"
objConn.Execute tracciamento
'FINE TRACCIAMENTO DATI UTENTE
%>
<html><head><title>XLS KPI Tasso Chiamate Enterprise</title></head><body></body></html>
<!-- #include file = _private\chiudi_connessione.inc -->
come si traduce tutto ciò in .net?
