Le code d'implémentation d'asp pour générer un fichier xls à partir de la table. Copiez le code comme suit :
<%@LANGUAGE=VBSCRIPT CODEPAGE=936%>
<%
si demande(action)=1 alors
Response.ContentType=application/ms-excel
Response.AddHeader content-disposition,attachment;filename=www.xls
finir si
%>
<!DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transitional//EN http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd>
<html xmlns=http://www.w3.org/1999/xhtml>
<tête>
<méta http-equiv=Content-Type content=text/html; charset=gb2312 />
<title>Document sans titre</title>
<style type=text/css>
tableau {
bordure supérieure : 1px solide #003399 ;
bordure gauche : 1px solide #003399 ;
}
td{
bordure droite : 1px solide #003399 ;
bordure inférieure : 1px solide #003399 ;
}
la tête {
couleur d'arrière-plan : #000066 ;
poids de la police : gras ;
remplissage : 5 px ;
couleur :#FFFFFF ;
}
</style>
<langage de script=javascript>
fonction tableVersExcel(){
location.href='?action=1';
}
</script>
</tête>
<corps>
<input type=button value=Exporter les données onclick=tableToExcel() />
<%
ConnStr=...
Définir conn = Server.CreateObject (ADODB.Connection)
conn.Ouvrir connstr
set rs = serveur.CreateObject(adodb.recordset)
rs.open sélectionnez le top 10 * de [votre nom de table],conn,1,1
sinon (rs.eof et rs.bof) alors
colonne = rs.fields.count
réponse.Write(<table cellpadding='0' Cellpacing='0'>)
réponse.Write(<thead><td>numéro de série</td>)
pour chaque f dans rs.fields
réponse.Write(<td> & f.name & </td>)
suivant
réponse.Write(</thead>)
pour j = 1 à rs.recordcount
si j > 5 alors « Masquer les données dans le cinquième élément. Après le test, si les données affichées comme aucune sont exportées, elles ne seront pas exportées.
réponse.Write(<tr style='display:none'>)
autre
réponse.Write(<tr>)
finir si
réponse.Write(<td> & j & </td>)
pour i = 0 à la colonne - 1
réponse.Write(<td> & rs(i) & </td>)
suivant
réponse.Write(</tr>)
rs.movenext
suivant
réponse.Write(</table>)
finir si
rs.fermer
setrs = rien
connexion.fermer
définir la connexion = rien
%>
</corps>
</html>