Page 1 sur 1
Problème de script WebGadget
Publié : jeu. 19/déc./2019 4:54
par MetalOS
Salut les gars,
Je rencontre un problème de chargement de script avec le WebGadget et le code de la page m'indique que mon navigateur et obsolète. Comme le WebGadget et basé sous windows sur la version 4 de IE et il possible de passer par Webkit ou une userlib pour pouvoir afficher le site en question sans erreur. Fred si tu passe par ici une mise à jour du WebGadget sur WebKit et elle prévue dans l'avenir sous windows ?
Voici le code d'exemple qui me fait défaut:
Code : Tout sélectionner
If OpenWindow(0,0,0,600,300,"WebGadget",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)
WebGadget(0,10,10,580,280,"http://infoproject-software.fr/Projets/Meteo/BNL/")
; Note: si vous désirez utiliser un fichier local, changez le dernier paramètre en "file://" + chemin + nomdufichier
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Re: Problème de script WebGadget
Publié : jeu. 19/déc./2019 9:14
par Mesa
Pour supprimer l'alerte de script, on trouve dans les forums, ce truc sous windows:
Code : Tout sélectionner
Global myBrowser.IWebBrowser2
If OpenWindow(0,0,0,600,300,"WebGadget",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)
WebGadget(0,10,10,580,280,"http://infoproject-software.fr/Projets/Meteo/BNL/")
; Note: si vous désirez utiliser un fichier local, changez le dernier paramètre en "file://" + chemin + nomdufichier
; SetGadgetAttribute(0, #PB_Web_BlockPopups, #True)
; SetGadgetAttribute(0, #PB_Web_BlockPopupMenu, #True)
myBrowser = GetWindowLong_(GadgetID(0), #GWL_USERDATA)
myBrowser\put_Silent(#True) ;Suppress error warnings in WebGadget
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
M.
Re: Problème de script WebGadget
Publié : jeu. 19/déc./2019 12:17
par Mindphazer
Re: Problème de script WebGadget
Publié : sam. 21/déc./2019 5:06
par MetalOS
Pour supprimer l'alerte des script j'avais trouvé sur le forum, je vais tester pour le module. Merci les gars.
Re: Problème de script WebGadget
Publié : sam. 21/déc./2019 6:23
par PhM
Salut MetalOS,
Pour ma part, j’utilise une astuce encore plus efficace trouvé sur le forum anglais.
Par contre, je pense qu'il est nécessaire d'avoir la version enregistrée de PureBasic mais, je n'en suis pas certain ?
En reprenant ton exemple :
Code : Tout sélectionner
If OpenWindow(0,0,0,600,300,"WebGadget",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)
WebGadget(0,10,10,580,280,"http://infoproject-software.fr/Projets/Meteo/BNL/")
myBrowser.IWebBrowser2 = GetWindowLong_(GadgetID(0), #GWL_USERDATA)
myBrowser\put_Silent(#True) ; suppression des erreurs dans WebGadget (html5 compatible)
myBrowser\put_Left(0)
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Bon courage...
Re: Problème de script WebGadget
Publié : sam. 21/déc./2019 9:34
par vurvur
Ajoute ces lignes avant ton code pour utiliser la version de IE la plus récente:
Code : Tout sélectionner
dwLabel.s = GetFilePart(ProgramFilename()) : dwValue.i = 11001
rPath.s = "SOFTWARE\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION"
RegCreateKeyEx_(#HKEY_CURRENT_USER, rPath.s, 0, #Null, #REG_OPTION_VOLATILE, #KEY_ALL_ACCESS, #Null, @phkResult, @Disposition)
RegSetValueEx_(phkResult, @dwLabel, 0, #REG_DWORD, @dwValue, SizeOf(Long))
Du coup ton URL s'affichera sans erreurs.
Re: Problème de script WebGadget
Publié : mar. 24/déc./2019 3:56
par MetalOS
*Phm: J'utilisais déjà cette astuce pour éviter les message d'erreur de script. Merci
*vurvur: Merci pour ton partage ca fonctionne super maintenant.
Merci les gars
Re: Problème de script WebGadget
Publié : lun. 03/août/2020 23:55
par Ekim
Bonsoir,
Je ne suis que débutant mais ne serait il pas plus prudent d'ajouter un contrôle conditionnel pour éviter de créer la clé de registre à chaque exécution?