Voici un exemple de code effectuant cette impression.
//Variables
sNomFenetre est une chaîne de caractères = " Le nom de la fenêtre "
sNomChampHtml est une chaîne de caractères = " Le nom du champ HTML à imprimer "
sNomActiveX est une chaîne de caractères = " Le nom du champ ActiveX "
ResOuverture est un entier
ResFermeture est un entier
ResSuppression est un booléen
//création d`un fichier HTML
fCrée(fRepEnCours()+"\FichierTemp.HTM")
ResOuverture = fOuvre(fRepEnCours() + "\FichierTemp.HTM", foLectureEcriture)
SI ResOuverture <> -1 ALORS
//On récupère le contenu du champ HTML dans un fichier externe qui sera ensuite envoyé à l`ActiveX
fEcrit(ResOuverture, {sNomFenetre + "." + sNomChampHtml}..ValeurAffichée)
//Affichage du fichier dans l`ActiveX
QUAND EXCEPTION DANS
{ sNomFenetre + "." + sNomActiveX}>>Navigate( fRepEnCours() + "\FichierTemp.HTM")
FAIRE
Erreur("Impossible d`accéder à l`ActiveX internet Explorer")
RETOUR
FIN
Multitâche(100)
//Impression du contenu du navigateur
{ sNomFenetre + "." + sNomActiveX}>>Navigate( "javascript:self.print()")
//Fermeture du fichier HTML
fFerme(ResOuverture)
SINON
Erreur("Impossible d`ouvrir le fichier courrier temporaire HTML généré")
FIN |