Exporter de data avec vers Excel est très facile. Simplement ajouter un header qui dit que cest un document Excel.
Un exemple simple :
<%
Set fso = Server.Createobject("scripting.filesystemobject" )
Set file = fso.CreateTextFile(Server.MapPath ("/docs" ) & "/data.xls", true)
file.WriteLine "<html xmlns:x='urn:schemas-microsoft-com:office:excel'>"
file.WriteLine "<head></head>"
file.WriteLine "<body>"
file.WriteLine "<table border='1'>"
file.WriteLine "<tr><th>ID</th><th>Client</th></tr>"
file.WriteLine "<tr><td>109</td><td>C&S</td></tr>"
file.WriteLine "<tr><td>793</td><td>MG Mode</td></tr>"
file.WriteLine "</table>"
file.WriteLine "<table border='1'>"
file.WriteLine "<tr><th>Client</th><th>Ordre</th><th>Date</th></tr>"
file.WriteLine "<tr><td>785</td><td>1045</td><td>07/01/2004</td></tr>"
file.WriteLine "<tr><td>109</td><td>1048</td><td>07/01/2004</td></tr>"
file.WriteLine "<tr><td>109</td><td>1050</td><td>08/01/2004</td></tr>"
file.WriteLine "</table>"
file.Writeline "</body></html>"
file.Close
%>
|
Maintenant, vous avez le document /docs/data.xls avec votre data que vous pouvez accéder. Naturellement vous pouvez modifier le code de se faire plus dynamique.
J'espère que vous êtes aidés.
