Open YouTube In Chrome, Search and Play Result Fullscreen

A McF · Apr 30, 2018, 10:13 PM

Re: Open YouTube in default broswer and query search term

The following VBScipt code will accept a search term as a parameter, select and follow a link from the search results, and play the video fullscreen. My web browser is Google Chrome.

`
For Each a In WScript.Arguments
param = param & a & " "
Next 'a

param = LCase(Trim(param))
Set WSS = CreateObject("Wscript.Shell")

arg = "https://www.google.ca/search?q=" & param & " site:youtube.com"
strURL = Chr(34) & "C:\Program Files\Google\Chrome\Application\chrome.exe " & Chr(34) & " " & Chr(34) & arg & Chr(34)

WSS.Run strURL
WSS.AppActivate "Google Chrome"
Wscript.sleep 2000

WSS.sendkeys "{TAB}"
Wscript.sleep 300
WSS.sendkeys "{TAB}"
Wscript.sleep 300
WSS.sendkeys "{TAB}"
Wscript.sleep 300
WSS.sendkeys "{TAB}"
Wscript.sleep 300
WSS.sendkeys "{TAB}"
Wscript.sleep 300

WSS.sendkeys"{enter}"
Wscript.sleep 7500

WSS.sendkeys "+{f}"
Set WSS = Nothing
`

A McF · Apr 30, 2018, 10:20 PM

@a-mcf NOTE: The path to Chrome broweser in the code, is that of the 32Bit version and would be different on a 64Bit machine.

Royher Figuera · Aug 14, 2020, 3:32 AM

@A-McF / @russ I'm interest in this script but I don't know how start. I made a file .vbs with your code but won´t run and I don´t know how configure triggercmd with that. I supose the trigger is the file and the param is "the search". I´m correct?