habib
7 juin 2002 à 13:01
ce petit code te permet d'ecrire et d'afficher le fichier html
Private Sub Command1_Click()
ecrire dans le fichier:
Open "c:\TEST\Rapport.html" For Append As 1
Print #1, "******************************************"
Print #1, "****************************************"
Print #1, "************************************"
Close
Afficher le fichier
Dim Responsel As Long
Response = Shell("NotePad.exe c:\TEST\Rapport.html", vbNormalFocus)
End Sub