Ci siamo già occupati in passato della generazione al volo di documenti per Office, sfruttando la possibilità, introdotta dalla versione XP, di importare in maniera nativa i file HTML.
L'esempio di oggi è una variante che è in grado di esportare il contenuto di un intero db, formattandone i valori all'interno di una tabella HTML e preponendo la lista dei campi.
Il risultato è un report in Excel in pieno stile, con la possibilità di generare lo stesso in modo del tutto automatico attraverso una pagina web.
<% ' stringa di conn strConn = "Provider=sqloledb; Data Source=localhost; Initial Catalog=pubs; Integrated Security=SSPI;" ' apro la connessione set conn = Server.CreateObject("ADODB.Connection") conn.Open strConn ' estraggo i dati Set rs = conn.Execute("SELECT * FROM Authors") for i = 0 to rs.Fields.Count-1 risultato = risultato & rs.Fields(i).Name & "</td><td>" next risultato = risultato & "</td></tr><tr><td>" risultato = risultato & rs.GetString(,,"</td><td>","</td></tr><tr><td>", "-") ' chiusura rs.Close set rs = Nothing conn.Close set conn = Nothing ' modifico header per forzare l'apertura in Excel Response.ContentType = "application/vnd.ms-excel" Response.AddHeader "content-disposition", "inline; filename=tabella.xsl" ' scrivo a video Response.Write ("<table><tr><td>" & risultato & "</td></tr></table>") %>
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
Approfondimenti
I più letti di oggi
- ecco tutte le novità pubblicate sui nostri siti questa settimana: https://aspit.co/wkly buon week-end!
- Utilizzare la funzione EF.Parameter per forzare la parametrizzazione di una costante con Entity Framework
- Recuperare App Service cancellati su Azure
- Eliminare una project wiki di Azure DevOps
- Creare una libreria CSS universale: Immagini