Générer une page en html

Signaler
Messages postés
85
Date d'inscription
lundi 25 septembre 2006
Statut
Membre
Dernière intervention
18 décembre 2008
-
Messages postés
85
Date d'inscription
lundi 25 septembre 2006
Statut
Membre
Dernière intervention
18 décembre 2008
-
Bonjour à tous,

je viens de passer un peu plus de 2 heures à chercher sur ce forum quelque chose qui pourrait m'aider en VB2005, mais rien de rien... ou que des choses très anciennes ou pas adaptées à ce langage.

Voila mon problème. J'ai un form qui comprend un certain nombre d'infos saisies et d'autres récupérées dans une base de données.
L'ensemble de ces résultats s'affichent à l'écran dans un form. Jusque là tout est OK.

Mon problème réside dans le fait que je dois ajouter un bouton pour envoyer toutes les infos de la page sur un document en html.

En fait, c'est comme si je voulais imprimer, sauf que là, mon bouton doit générer une page web.

Je ne trouve rien de concret. Y'a t'il quelque chose qui puisse m'aider sur ce site ?
Je vous en remercie par avance.

Philippe - Sympa 74
 

3 réponses

Messages postés
266
Date d'inscription
mardi 7 septembre 2004
Statut
Membre
Dernière intervention
30 avril 2009
1
bonjour,


ne suffit-il pas de générer un texte contenant le code html de la 
page avec les données de la form et d'enregistrer tout cela dans un
fichier avec une extension ".html"??

--------------------------------------------------
Toujours + de VB et d'API => APi @ le Loupe
http://apialaloupe.free.fr
Messages postés
38
Date d'inscription
jeudi 20 septembre 2007
Statut
Membre
Dernière intervention
9 décembre 2008

Bonjour,
Pour autant que je le sache, le seul moyen est d'écrire du code HTML dans le fichier.
Exemple: créer la liste des fichiers d'un dossier

Sub CreateFilesList(dirpath as String)
On Error Resume Next
Set fso = CreateObject("scripting.filesystemobject")
Set monfic = fso.CreateTextFile(dirpath & "\filesList.htm", True)
monfic.Write "<html> " & vbCrLf & "<head>" & vbCrLf & "<title> liste de fichiers</title>" & "</head>" & vbCrLf & ""
monfic.WriteLine "                                                  *** Liste de fichiers générée par le programme 'files manager' ***"
monfic.WriteLine "
"
monfic.WriteLine "Liste des fichiers du dossier:  " & dirpath
monfic.WriteLine "
"
Set fso = CreateObject("Scripting.FileSystemObject")
Set rep = fso.GetFolder(dirpath)
Set fc = rep.Files
For Each fichier In fc
    monfic.WriteLine "<li>  " & fichier.name & "  -  " & fichier.Size & " octet(s)"
    monfic.WriteLine "
"
    monfic.WriteLine "<hr noshade>"
    monfic.WriteLine "
"
    DoEvents
Next
monfic.Write "" & vbCrLf & "</html>"
End Sub
Messages postés
85
Date d'inscription
lundi 25 septembre 2006
Statut
Membre
Dernière intervention
18 décembre 2008

Bonjour et merci Vautour 32 pour cet exemple.
C'est donc ce que je craignais un peu... il faut donc se taper tout le code html et gérer le cas des caractères accentués, etc..; etc.

J'avais posé cette question (de débutant) car vu qu'il existe un script pour l'opération inverse... c'est à dire enlever quasi automatiquement toutes les balises d'un code html pour ne récupérer que le texte brut... je me disais (bientôt Noël) qu'il existait sans doute un code déjà prévu pour convertir les données d'un fichier texte en code html.

Bon ben... va falloir que je retrousse les manches donc...
Merci tout de même pour ces pistes et pour ton exemple de script.

Toutefois (question subsidiaire), il est possible d'écrire des balises html directement dans le corps d'une sub dans VB2005 ???
je sais que c'est possible sur un code écrit en asp mais aussi en VB ? Je vais essayer cela...

Philippe - Sympa 74