ASP exporte les données de la table de la base de données vers Excel

Recommandé: ASP utilise le numéro de téléphone pour générer le code de l'image
Fonction: Générez le numéro de téléphone sur la page au format d'image. % Appelez Com_CreatValidCode (request.Querystring (TEL)) public sub-com_creatvalidcode (ptel) '---------- 禁止缓存 Response.expires = 0 réponse.addheader pragma, non-cache.

Le code d'instance ASP exporte directement les données de la base de données vers la feuille de calcul Excel.

<! - # Inclure File = .. / Conn.asp ->

<%

Dim S, SQL, nom de fichier, fs, myfile, x

Set fs = server.createObject (scripting.fileSystemObject)

'- Suppose que vous souhaitez que le fichier Excel généré soit stocké comme suit

filename = server.mappath (users.xls)

'- Sélectionnez le fichier Excel d'origine s'il existe

Si fs.fileexists (nom de fichier) alors

Fs.DeleteFile (nom de fichier)

terminer si

'- Créer un fichier Excel

Définissez MyFile = Fs.CreateTextFile (FileName, True)

'Set rs = server.createObject (adodb.recordSet)

'- Supprimer les données que vous souhaitez mettre dans Excel à partir de la base de données

'SQL = SELECT * FROM TB_EXECL ORDER BY ID DESC

'Rs.Open SQL, Conn

Starttime = demande (starttime)

EndTime = Demande (Fintime)

StartrendTime = Addtime entre # et starttime et 00: 00: 00 # et # & Fintime et 23: 59: 59 #

strSql = select * from myeky_myusr

SET RSTDATA = Conn.Execute (STRSQL)

Si pas rsstdata.eof et non rsstdata.bof alors

TRLINE DIM, Responsestr

strline =

Pour chaque x dans rstdata.fields

strline = strline & x.name & chr (9)

Suivant

'- Écrivez le nom de la colonne de la table pour exceller d'abord

MyFile.Writeline Strline

Faire tout en ne faisant pas

strline =

pour chaque x dans rstdata. champs

Strline = Strline & X.Value & Chr (9)

suivant

MyFile.Writeline Strline

rsstdata.movènext

boucle

terminer si

Response.Write Le fichier Excel est généré avec succès, cliquez sur <a href = users.xls cible = _blank> Télécharger </a>!

rsstdata.close

définir rstdata = rien

Conn.Close

Définir Conn = Rien

%>

Partager: séparation du code et de la page dans ASP
Afin d'éviter les difficultés de maintenance causées par le mélange de programmes ASP et de code HTML, cet article présente une méthode pour utiliser des modèles pour séparer les programmes et les pages pour faciliter la programmation. Lorsque vous utilisez ASP pour créer un site, il y a souvent une situation où le code de programme et le code HTML sont mélangés dans un fichier ASP. Il y a beaucoup d'inconvénients à faire ceci: 1. Sans parler de la programmation, vous devez