Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch
Auteur Message
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Hello !

Je l'avais envoyé par MP à Sacha pour qu'il le poste, mais il était trop occupé à bronzer au soleil Mort de Rire
Donc voila, un "Add-On" comme j'aime bien l'appeler, pour AffPNG (çad, en théorie, si le temps vire et qu'il se met à pleuvoir, Sacha l’inclura dans le code d'AffPNG Mr. Green )

Celui-ci permet de visualiser une vidéo YouTube dans un Batch, comme tel:



Syntaxe:

Code:
YouTube [Titre de la fenêtre] [Lien de la vidéo]


Exemple:

Code:
@Echo Off
Mode 90,30
Title AffPNG - YouTube
Set "Lien=https://www.youtube.com/watch?v=gUxq7-WRHoE"
Echo Appuyez sur une touche pour voir la video...
Pause>Nul
YouTube "AffPNG - YouTube" %Lien%
Echo Merci d'avoir regard‚ !
Pause>Nul


Vous vous en doutez, connexion internet requise !

Télécharger

En prime, le code source:


Code:

#Include <IE.Au3>
#Include <GUIConstants.Au3>
#Include <GUIConstantsEx.Au3>
#Include <WindowsConstants.Au3>

HotKeySet("{ESC}", _Quitter)
If FileExists(@AppDataDir & "\Video.html") Then FileDelete(@AppDataDir & "\Video.html")

$Batch = WinGetPos($CmdLine[1])

$GUI = GUICreate("", $Batch[2]-11, $Batch[3]-31, $Batch[0]+5, $Batch[1]+25, BitOR($WS_POPUP, $DS_MODALFRAME), $WS_EX_TOOLWINDOW)
GUISetState(@SW_SHOW, $GUI)

GUISetBkColor("0x000000", $GUI)

$Lien = $CmdLine[2]
$Video = StringSplit($Lien, "=")
$IE = _IECreateEmbedded()
$Page = GUICtrlCreateObj($IE, 0, 0, $Batch[2]-11, $Batch[3]-31)

FileWrite(@AppDataDir & "\Video.html", "<html>" & @CRLF)
FileWrite(@AppDataDir & "\Video.html", "<style>" & @CRLF)
FileWrite(@AppDataDir & "\Video.html", "body { background-color: #000000; }" & @CRLF)
FileWrite(@AppDataDir & "\Video.html", "</style>" & @CRLF)
FileWrite(@AppDataDir & "\Video.html", "<body>" & @CRLF)
FileWrite(@AppDataDir & "\Video.html", '<iframe width="560" height="315" src="https://www.youtube.com/embed/' & $Video[2] & '" frameborder="0" allowfullscreen></iframe>' & @CRLF)
FileWrite(@AppDataDir & "\Video.html", "</body>" & @CRLF)
FileWrite(@AppDataDir & "\Video.html", "</html>" & @CRLF)

_IENavigate($IE, @AppDataDir & "\Video.html")

While WinExists($CmdLine[1])
   $Batch = WinGetPos($CmdLine[1])
   WinMove($GUI, "", $Batch[0]+5, $Batch[1]+25, $Batch[2]-11, $Batch[3]-31)
   $State = WinGetState($CmdLine[1])
   If BitAND($State, 8) Then WinSetOnTop($GUI, "", 1)
   WinSetOnTop($GUI, "", 0)
   Sleep(10)
WEnd

Func _Quitter()
   Exit
EndFunc



Dylan.




______________________________________________________
Viens découvrir INTERPOL, un nouveau langage interprété !

Yahoo Messenger
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Merci Dylan,

vraiment excellent, bravo.

Ça sera inclus a AFFPNG dans la nouvelle refonte.

J'espère que ça donnera envie à d'autres d'ajouter des fonctions à AFFPNG.

Okay




______________________________________________________
AffPng.exe , StringBetween.exe , Hex2Png.exe
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Bonjour,

Superbe, merci pour le partage Okay

@+




______________________________________________________
Une question ? N'hésitez pas à me contacter par Message Privé ou via le topique concerné.
Visiter le site web du posteur
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Cool, c'est très utile! Wink




______________________________________________________
Cordialement,
Hugo, qui adore programmer, jouer à Minecraft, ZT2 et FSX.
Boutons-liens :
Visiter le site web du posteur Skype
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Merci ^^




______________________________________________________
Viens découvrir INTERPOL, un nouveau langage interprété !

Yahoo Messenger
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
salut Dylan
Pourquoi j'ai cette erreur lors de l'exécution de ton script batch ?
Citation:
Line 5034 Error:Subscript used on non-accesible variable





______________________________________________________
Mes Contributions en Téléchargement
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Alors là aucunes idées Hackoo, je n'ai jamais rencontré cette erreur.




______________________________________________________
Viens découvrir INTERPOL, un nouveau langage interprété !

Yahoo Messenger
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
Hackoo a écrit:
salut Dylan
Pourquoi j'ai cette erreur lors de l'exécution de ton script batch ?
Citation:
Line 5034 Error:Subscript used on non-accesible variable


Pareil la même erreur alors que tout est correct, voici mon code :

Code:

YouTube test https://www.youtube.com/watch?v=ngElkyQ6Rhs


Je suis sous WinXp SP3 32 bits


EDIT : J'ai essayé avec ton code exemple, ça fonctionne à moitié : pas d'erreur mais une fenêtre noir avec un cadre blanc au milieu et ... rien du tout ! Rien ne se passe ...




______________________________________________________
Coucou, tu veux voir mon Site Web ?? Mort de Rire
Visiter le site web du posteur Skype
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
IK-DC a écrit:
Hackoo a écrit:
salut Dylan
Pourquoi j'ai cette erreur lors de l'exécution de ton script batch ?
Citation:
Line 5034 Error:Subscript used on non-accesible variable


Pareil la même erreur alors que tout est correct, voici mon code :

Code:

YouTube test https://www.youtube.com/watch?v=ngElkyQ6Rhs


Je suis sous WinXp SP3 32 bits


EDIT : J'ai essayé avec ton code exemple, ça fonctionne à moitié : pas d'erreur mais une fenêtre noir avec un cadre blanc au milieu et ... rien du tout ! Rien ne se passe ...


Ah, sans doute avez vous oublier de mettre dans votre batch la ligne:

Code:
Title test


En effet, il faut donner un titre au batch, et ce même titre en argument pour la commande.

Pour ce qui est du cadre blanc, ce doit être un problème de connexion internet ?




______________________________________________________
Viens découvrir INTERPOL, un nouveau langage interprété !

Yahoo Messenger
Répondre en citant
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 
XtR3m_St4RkY a écrit:
IK-DC a écrit:
Hackoo a écrit:
salut Dylan
Pourquoi j'ai cette erreur lors de l'exécution de ton script batch ?
Citation:
Line 5034 Error:Subscript used on non-accesible variable


Pareil la même erreur alors que tout est correct, voici mon code :

Code:

YouTube test https://www.youtube.com/watch?v=ngElkyQ6Rhs


Je suis sous WinXp SP3 32 bits


EDIT : J'ai essayé avec ton code exemple, ça fonctionne à moitié : pas d'erreur mais une fenêtre noir avec un cadre blanc au milieu et ... rien du tout ! Rien ne se passe ...


Ah, sans doute avez vous oublier de mettre dans votre batch la ligne:

Code:
Title test


En effet, il faut donner un titre au batch, et ce même titre en argument pour la commande.

Pour ce qui est du cadre blanc, ce doit être un problème de connexion internet ?



Oui c'est bon, désolé pour le retard Embarassed !

A propos, c'est possible de changer la position de la fenêtre youtube dans le batch ???

@ + Wink




______________________________________________________
Coucou, tu veux voir mon Site Web ?? Mort de Rire
Visiter le site web du posteur Skype
Message [AffPNG - Add-On] YouTube - Inclure une vidéo dans un Batch 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch