Please select a script from the list below to load it in to myControlServer.

You will need to have the myControlServer application installed for your browser to recognise the myControl Script (.mcs) extension.

Click on the small Windows or Linux icons (in the left hand column) to toggle the view of the script code

Set sh = WScript.CreateObject("WScript.shell")
If WScript.Arguments.Count > 0 Then
    sh.Run "http://www.amazon.co.uk/s/ref=nb_sb_noss_2?url=search-alias%3Dmobile-apps&field-keywords=" & Replace(WScript.Arguments(0), "_", "%20")
Else
    sh.Run "http://www.amazon.co.uk/mobile-apps/b/ref=amb_link_175361507_3?ie=UTF8&node=1661657031&pf_rd_m=A3P5ROKL5A1OLE&pf_rd_s=center-1&pf_rd_r=1QCAK1P2NJ7CBSH4A890&pf_rd_t=1401&pf_rd_p=408602187&pf_rd_i=1000644603"
End If

Set sh = WScript.CreateObject("WScript.shell")
If WScript.Arguments.Count > 0 Then
    sh.Run "cmd /k " & Replace(WScript.Arguments(0), "_", " ")
Else
    sh.Run "cmd /k cd " & sh.ExpandEnvironmentStrings("%USERPROFILE%")
End If

Set sh = WScript.CreateObject("WScript.shell")
sh.Run "control"

Set sh = WScript.CreateObject("WScript.shell")
sh.Run "https://www.dropbox.com/login?lhs_type=anywhere"

Set sh = WScript.CreateObject("WScript.shell")
sh.Run "outlook"

 

 

Set sh = WScript.CreateObject("WScript.shell")
sh.Run "http://www.nbc.com/video"

 

Set sh = WScript.CreateObject("WScript.shell")
If WScript.Arguments.Count > 0 Then
    sh.Run "http://www.pandora.com/results?search_query=" & Replace(WScript.Arguments(0), "_", "%20")
Else
    sh.Run "http://www.pandora.com"
End If

Set sh = WScript.CreateObject("WScript.shell")
sh.Run "C:\Program Files (x86)\Plex Home Theater\Plex Home Theater.exe"

Set sh = WScript.CreateObject("WScript.shell")
appdata = sh.ExpandEnvironmentStrings("%APPDATA%")
If WScript.Arguments.Count > 0 Then
    sh.Run Replace(WScript.Arguments(0), "_", " ")
Else
    sh.Run appdata & "\SkyNetSoftware\myControlServer\Scripts\Run\run.exe"
End If

Set sh = WScript.CreateObject("WScript.shell")
windir = sh.ExpandEnvironmentStrings("%WINDIR%")

Const HKCU = &H80000001 ' HKEY_CURRENT_USER

Set reg = GetObject("winmgmts:\\.\root\default:StdRegProv")
path = "Control Panel\Desktop"
key = "scrnsave.exe"
reg.GetStringValue HKCU, path, key, value

scr = ""

If IsNull(value) Then
    ' no screen saver currently set, just use the first one located in the windows directory
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set dir = fso.GetFolder(windir & "\System32\")
    For Each file in dir.Files
        If UCase(fso.GetExtensionName(file.Name)) = "SCR" Then
            scr = windir & "\System32\" & file.Name
            Exit For
        End If
    Next
Else
    scr = value
End If

'Wscript.Echo scr

If scr <> "" Then
    sh.Run scr & " /s"
Else
    Wscript.Echo "Unable to locate any screen savers"
End If

Set sh = WScript.CreateObject("WScript.shell")
result = MsgBox("Execute Windows sleep command?" & vbCrLf & "(PC power will revert to stand-by)", 4, "Sleep")
If result = 6 Then
    sh.Run "rundll32.exe powrprof.dll,SetSuspendState Sleep" 
End If

Set sh = WScript.CreateObject("WScript.shell")
appdata = sh.ExpandEnvironmentStrings("%APPDATA%")
If WScript.Arguments.Count > 0 Then
    sh.Run appdata & "\SkyNetSoftware\myControlServer\Scripts\Spotify\spotify.exe " & Replace(Replace(Replace(WScript.Arguments(0), "artist_", "artist:"), "track_", "track:"), "album_", "album:")
Else
    sh.Run appdata & "\SkyNetSoftware\myControlServer\Scripts\Spotify\spotify.exe"
End If

Set sh = WScript.CreateObject("WScript.shell")
If WScript.Arguments.Count > 0 Then
    sh.Run "http://www.tvcatchup.com/channels.html"
Else
    sh.Run "http://www.tvcatchup.com"
End If

Set sh = WScript.CreateObject("WScript.shell")
If WScript.Arguments.Count > 0 Then
    sh.Run "http://www.youtube.com/results?search_query=" & Replace(WScript.Arguments(0), "_", "%20")
Else
    sh.Run "http://www.youtube.com"
End If

Submit a new Script

Please note: all scripts submissions are reviewed before they are made visible to the Community

All of the scripts listed on this page have been inspected and should not pose any threats

However, we cannot accept any responsibility for the consequence of custom script execution