Soyez le premier à donner votre avis sur cette source.
Vue 5 080 fois - Téléchargée 726 fois
'dans le zip... 'EXEMPLE D'UTILISATION '---------------------------- Option Explicit Dim htm As VGHTML.HTMLDocument Private Sub Form_Load() Dim strImg As String Set htm = New VGHTML.HTMLDocument htm.DocumentType = HtmlTransitional htm.DocumentLangage = French htm.DocumentTitle = "ESSAI" htm.DocumentDescription = "Mon essai" htm.DocumentKeywords = "test, Test, TEST" strImg = App.Path & "\images\bground3.jpg" htm.BodyTagContent False, , strImg htm.Document.AddText "Voila un exemple", vgcenter Open App.Path & "\test.html" For Output As #1 Print #1, htm.RenderDocument Close #1 End Sub
31 août 2002 à 12:36
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.