Salut à tous !

J'ai l'impression qu'il y a eu un problème avec le précédent message envoyé, 
donc je le renvoi.

Aujourd'hui je vous propose une variante d'un aménagement que j'avais fait pour 
le visuRSS.

Il s'agissait à partir de ce logiciel d'envoyer un lien de vidéo youtube dans 
VLC.

Cette fois-ci, il s'agit à partir de n'importe quel navigateur, d'envoyer un 
lien youtube vers VLC.

Donc, vous ouvrez une page youtube, vous utilisez son moteur de recherche pour 
rechercher des vidéo, et lorsque vous en avez une que vous voulez regarder, 
vous vous placez sur son lien et vous faites ctrl+maj+v (par exemple) pour 
envoyer le lien vers le logiciel VLC installé sur votre ordinateur pour 
immédiatement commencer à la lire.

L'avantage pour nous d'utiliser vlc plutôt que la page html standard pour lire 
les vidéo est que la manipulation est d'abord plus rapide, et ensuite plus 
facile (augmentation diminution de volume, déplacement dans la vidéo, et voir 
même enregistrement en temps réel de la vidéo).

Et je suis même en train de réfléchir sur un script alternatif qui permettrait 
de se créer une playlist de vidéo, c'est-à-dire d'ajouter la vidéo à la lecture 
plutôt  que de la faire écraser la lecture précédente.

Vous vous voyez déja  créer une playliste d'une petite cinquantaine de vidéo 
youtube  et ensuite  de vous coucher sous votre couette et passer tranquille un 
après-midi de visionnage/écoute sans plus rien avoir à faire. Le pied n'est-ce 
pas ?

Les tests ont été faits sur firefox 30 et internet explorer 8. Je suppose que 
cela doit fonctionner également avec google chrome.

Je vous conseille d'avoir la dernière version de vlc si vous voulez  
l'utiliser. Cela pour être sûr de la compatibilité avec les vidéo youtube.

Dernière recommandation, dans la fonction SendURLToVLCApp, vous devez indiquer 
le chemin vers votre installation de vlc sur votre ordinateur.
Ainsi donc, retrouvez la ligne suivante:
let sVLCPath = "C:\\Program Files\\adslTV\\VLC\\vlc.exe"

et modifiez-la en conséquence. Faites bien attention de doubler les \ pour que 
le chemin soit valide.

L'aménagement est constitué d'un script et une fonction.
J'ai choisi de mettre l'envoi du lien vers vlc dans une fonction  parce qu'il 
peut venir l'envi de  l'utiliser dans un autre programme ou d'une autre façon.

Les voici:

Début du code jawsscript

Void Function SendURLToVLCApp (string sURL)

; envoi une url à VLC

var

string s,

string sVLCPath,

object oFSO,

object oFil

; le chemin vers votre version de VLC installé

let sVLCPath = "C:\\Program Files\\adslTV\\VLC\\vlc.exe"

; via le fileSystemObject, on recherche le nom court du chemin vers ce fichier

; cela pour éviter les erreurs de chemin dûs aux caractères d'espacement.

let oFSO = CreateObject("Scripting.FileSystemObject")

let oFil = oFSO.GetFile(sVLCPath)

let sVLCPath = oFil.ShortPath()

; libération des objets

let oFil = null()

let oFSO = null()

; constitution de la commande

let s = sVLCPath + " " + sURL + ""

; exécution de la commande

Run (s)

; annonce de l'évènement

SayString ("Envoi du lien de la vidéo vers VLC")

; SayString (sURL)

EndFunction


Script SendURLToVLC ()

; ctrl+shift+v

; envoi l'url du lien sous le curseur à VLC

var

string sURL, 

string sLink, 

string s,

int i

; on recherche l'adresse URL du lien

let sURL = GetElementDescription (true,false )

; SayFormattedMessage (ot_user_buffer, surl)

; if 1 then return endif

; recherche de la première ligne avec href

let s = StringLower(sURL)

let i = 0

while (i < 10)

let i = i+1

if StringContains (StringSegment (s, "\n", i), "href") then

let sURL = StringSegment (sURL, "\n", i)

let i = 15 ; on force la sortie de la boucle en marquant le succès à la 
recherche

endif

EndWhile

; si rien de trouvé

if i < 15 then

SayString ("erreur: le lien n'est pas reconnu")

return

EndIf

; on prend la partie après href

let sURL =stringChopLeft (sURL, 5)

; si adresse incomplète de youtube,

if StringLeft (StringLower (sURL), 6) == "/watch" then

let sURL = "http://www.youtube.com"; + sURL

EndIf

; envoi à vlc

SendURLToVLCApp(sURL)

EndScript



fin du code jawsscript

Voilà ! J'espère que cela plaiera au moins à quelques uns.

Yannick Daniel Youalé
Du Cameroun
La programmation est une religion. Aimez-la, ou quittez-la.
Mon site: www.visuweb.net

Répondre à