ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Message avec Alert d' Internet explorer (invisible)   



L'auteur

ybenam
Algérie Algérie
Membre Simple
# 0000002080
enregistré le 21/04/2008


Fiche personnelle


Note des membres
pas de note

Contributions > 09 - Automation > Internet Explorer

Message avec Alert d' Internet explorer (invisible)
# 0000000594
ajouté le 01/06/2008 12:19:48 et modifié le 01/06/2008
consulté 7211 fois
Niveau débutant

Description
La commande Alert sous automation Internet explorer affiche un message qui peut prendre un peu moins d'un écran d'information.Une substitutionau messagebox de VFP pour afficher beaucoup de texte... cordialement
Code source :
&&un message qui prend plus d'informations que le messagebox ordinaire de VFP
aa=getfile('txt|htm'&&ou saisir votre message directement message="...;...."
message=filetostr(aa)

apIE=createObject('internetexplorer.application')
apIE.navigate("about:blank")
apIE.visible=.f.

do while apIE.busy or apIE.readystate#4
enddo
inkey(1)
apIE.document.parentWindow.alert(message)
apIE.quit
Commentaires
Aucun commentaire enregistré ...

Publicité

Les pubs en cours :


www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3