Ci-dessous un script qui permet de visionner les vidéos de YouTube en streaming.
Y a-t-il un moyen de cacher (rendre invisible) l’explorateur et de ne voir que le lecteur vidéo YouTube et son contenu.
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <IE.au3>
#include <File.au3>
$nomdeficher = "youtube file"
_FileCreate(@TempDir & "\" & $nomdeficher & ".html")
Local $filehtml = FileOpen(@TempDir & "\" & $nomdeficher & ".html", 1)
FileWriteLine($filehtml, '<embed width="853" height="480" src="http://www.youtube.com/v/q1l8QoFOPJk" type="application/x-shockwave-flash"></embed>')
FileClose($filehtml)
$htmlpage = @TempDir & "\" & $nomdeficher & ".html"
$oIE = _IECreateEmbedded()
$hGUI = GUICreate ("test", 900, 500)
GUICtrlCreateObj($oIE, 0, 0,900,530)
GUISetState()
_IENavigate($oIE, "file:///" & $htmlpage)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Code : Tout sélectionner
#include <ie.au3>
#include <WindowsConstants.au3>
Local $IE = _IECreateEmbedded()
GUICreate("Streaming Youtube", 585, 340, Default, Default, $WS_POPUP)
GUICtrlCreateObj($IE, 0, 0, 585, 340)
GUISetState();
_IENavigate($IE, "about:blank")
_IEDocWriteHTML($IE, '<BODY bgcolor="black" style="overflow-y:hidden"><IFRAME height=315 width=560 src="http://www.youtube.com/embed/RSi9KIu-W4o" frameBorder=0 allowfullscreen></IFRAME></BODY>')
_IEAction($IE, "refresh")
While 1
If GUIGetMsg() = -3 Then ExitLoop
WEnd


Si le problème était que vous deviez le regarder sur youtube, c'est réglé, sinon il faudra plus de précisionBoulanza a écrit :Re-Bonjour,
Oui, c’est exactement se que je voulais, mais je croix qu’il y a un problème de lancement de la vidéo, peut être c’est dû au code html. Mon scripte marche très bine sous Win XP, Vista et W7 est il possible de l’adaptez à vos scriptes ? moi j’ai pas pu !!
Merci à vous tous
A+

Code : Tout sélectionner
_IEDocWriteHTML($IE, '<BODY bgcolor="black" style="overflow-y:hidden"><IFRAME height=' & $hauteur - 35 & ' width=' & $largeur - 35 & ' src="http://www.youtube.com/v/q1l8QoFOPJk" type="application/x-shockwave-flash">[color=#FF0000]</embed>[/color]')Code : Tout sélectionner
_IEDocWriteHTML($IE, '<BODY bgcolor="black" style="overflow-y:hidden"><IFRAME height=' & $hauteur - 35 & ' width=' & $largeur - 35 & ' src="http://www.youtube.com/v/q1l8QoFOPJk" type="application/x-shockwave-flash">[color=#FF0000]</IFRAME></BODY>[/color]')

