Discussion :

[yafou2]

Bonjour à tous

Je lance un navigateur IE (avec une url en paramètre) depuis une application PowerBuilder,
ça fonctionne actuellement avec l'instruction "winexec(iexplore, 1)"

note: winexec provient de l'api "kernel32.dll", à mon sens c'est comme un run

je souhaiterai avoir le fonctionnement suivant:

- si IE est déjà lancé (mais comment le déterminer ?), ne pas en lancer un autre et lui passer une url (mais par quel moyen ?)

- si IE n'est pas lancé (aucune instance dans les processus), je le lance en lui donnant mon url.

La seconde ligne est ce qui est fait actuellement à part que je le lance systématiquement un autre IE (qu'il tourne déjà ou pas), voici le code grosso modo :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
string ls_filename
uint rtn, wstyle
ls_filename = "c:\windows\iexplorer.exe"
wstyle = 1
rtn = WinExec(ls_filename, wstyle)
Messagebox("Return Code", string(rtn))

(je peux remplacer éventuellement le winexec par un run)

Ce que je souhaite faire vous paraît techniquement possible ? et si oui quelles pistes me suggérierez-vous ?

Merci pour toute idée

ps: je suis sous PB 5 (no choice ) et IE 6 (pas le choix non plus)

[highlander]

Tu as meilleurs temps d'intégrer un l'internet explorer comme un objet ole (Microsoft Web Browser) dans ton appli. Ceci te permet de contrôler toi-même ce qui se passe.

Tu peux p. ex. naviguer sur un site par la commande ole_browser.object.Navigate2(url)

ou parcourir tous les éléments qui se trouvent sur le site et p. ex. remplir des champs, etc.

[yafou2]

Tu as meilleurs temps d'intégrer un l'internet explorer comme un objet ole (Microsoft Web Browser) dans ton appli. Ceci te permet de contrôler toi-même ce qui se passe.

Tu peux p. ex. naviguer sur un site par la commande ole_browser.object.Navigate2(url)

ou parcourir tous les éléments qui se trouvent sur le site et p. ex. remplir des champs, etc.

Je te remercie pour ta réponse Highlander, je me pose néanmoins des questions sur la mise en pratique d'une solution de ce type...
concrétement peux tu m'en dire 2 mots afin que j'oriente plus efficacement mes recherches ?

en gros les lignes type dans PB ou toute manip' à laquelle tu penses (sans détailer) est le bienvenue

si ça aboutit, je posterai ici la 'solution' complète à mon problème

Re-Merci pour ta réponse et pour tout élément me permettant d'avancer plus efficacement.

[highlander]

Hello Yafou2

Je ne sais pas exactement ce que tu veux réaliser. Moi par exemple, j'ai automatisé la commande d'un produit sur un site d'une entreprise. Pour ceci, j'ai créé une fenêtre qui contient un objet ole du type Microsoft Web Broser":
- menu Insert / Control / OLE
- onglet "Insert Control" --> choisir "Microsoft Web Browser"
- placer l'ojet sur la fenêtre, adapter la grandeur et év. changer le nom
- ouvrir un site dans l'ole (p. ex. dans le "open" script de la fenêtre): ole_browser.object.navigate2("www.developpez.net")

Si tu veux aller plus loins, tu peux placer une "singlelineedit"-box et un bouton pour permettre à l'utilisateur de naviguer sur un autre site, etc.

Comme indiqué plus haut, par script, tu peux également cliquer sur un bouton ou un link qui se trouve sur le site. Pour ceci, il faut créer une boucle du style (le bouton en question s'appel "SIGNIN") :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
li_link_ctr = ole_browser.object.document.Links.Length
	FOR li_link = 0 TO li_link_ctr - 1
		ls_text = upper(ole_browser.object.document.Links[li_link].ID)
		CHOOSE CASE upper(ls_text)
			CASE 'SIGNIN'
				ole_browser.object.document.Links[li_link].Click()
		END CHOOSE
	NEXT

Voilà, pour t'orienter dans une direction...

[yafou2]

nickel ta réponse, je sais vers quoi m'orienter pour trouver une solution now

question subsidiaire : tu travailles avec quelle version de PB ?

étant sur PB 5 j'ai peur d'être assez vite limité par les possibilités

merci pour ton aide en tout cas

[highlander]

Ce que j'ai décrit j'ai réalisé avec la version 10.2. Je ne peux malheureusement pas te dire, si cela fonctionne avec la version 5. Désolé encore pour le retard et bonne chance...