Bonjour,

J´ai codé un VBScript qui trouve des informations d´une base de données et range ces infos dans des variables.

Ensuite, je génère en dessous une page Html qui affiche ces variables dans des <table></table>. Ceci dans un même script.

Je souhaiterais maintenant exporter sur Excel cette page Html avec toutes les informations trouvées précédemment.

Je me disais qu´il aurait fallu que au fur et à mesure des calculs, j´écrive les informations récoltées à la fois dans la page Html et aussi dans le fichier Excel. Donc modifier le script en rajoutant les objExcel.Cells(2, 1).Value = "A".

Mais sachant que ca peut paraître long, est-ce qu´il y´aurait une méthode plus courte pour que le contenu affiché dans ma page Html soit directement entièrement recopié dans un fichier .xls ?
Car je voudrais savoir le temps que nécessite cet ajout d´exportation.

Merci de votre aide.

je ne sais pas vraiment.
Parcontre excel sait lire le format csv (comma separated values).

Ok merci.
Oui j´avais lu aussi sur les csv, mais j´crois que c´est des tableaux "sobres" tandis que le client voudra sûrement des couleurs et des en-têtes

J´ai vu un exemple de script, et j´comptais donc remplir le .xls lors du clic sur un button. Ca sera long, mais pas le choix apparamment.

J´me permets de upper ce topic car j´ai un nouveau soucis : je n´arrive même pas à exécuter une fonction via un lien Html.

http://img265.imageshack.us/img265/1636/probvbscriptld4.png

Sur la capture ci-dessus, le 1er lien ne pose aucun problème : lorsque je clique dessus, la fenêtre d´impression apparaît.

Mais lorsque je clique sur le 2ème, censé afficher la msgbox contenue dans la fonction Affiche(), et bien on me dit que le type de Affiche est incompatible.

Comment ça se fait, alors que les 2 liens "pointent" vers des fonctions ?

Merci.

Affiche qui ne prend pas d´argument n´y gagnerais pas à être déclaré comme procédure plutôt que fonction. (en remplaçant le mot clef Function par sub si j´ai bonne mémoire, ou alors procedure, ou quelque chose comme ça).

Merci de ton aide.

Mais j´avais bien essayé auparavant de la déclarer comme procédure avec Sub et End Sub, et le même résultat.

De +, si au lieu de faire appel à Affiche() via un lien, je fais directement appel à cette fonction

Càd si je remplace

document.write "<a href=´#´ onclick="VbScript : call Affiche">

par

call Affiche

Et bien la msgbox apparraît bien.