Hi Guys I made a Script to make a shortcut of any link you want :)
it'w will help you to save links , For reference at a later time
Name : Utopian Shortcut Links
Language : Vbscript
Os : Windows
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Source Code :
Set obj = CreateObject("wscript.shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
strFolder = objFSO.GetParentFolderName(WScript.ScriptFullName)
Link = inputbox("Davinshi !" & Chr(13) & Chr(13) & "Set Your Link To make it in a shortcut :" , "Utopian Shortcut Links")
If Link = "" Then
WScript.Quit
End if
max=1000000
min=1
Randomize
Random = (Int((max-min+1)*Rnd+min))
Set Davinshi = obj.CreateShortcut(strFolder & "\Utipian_" & Random & ".lnk")
strChrome = Registry("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\chrome.exe\Path", "") & "\Chrome.exe"
Davinshi.TargetPath = strChrome
Davinshi.Description = "Utopian"
Davinshi.Arguments = Link
Davinshi.Save
function Registry(strRegistryKey, strDefault)
Dim WSHShell, value
On Error Resume Next
Set WSHShell = CreateObject ("WScript.Shell")
value = WSHShell.RegRead (strRegistryKey)
if err.number <> 0 then
Registry= strDefault
else
Registry=value
end if
set WSHShell = nothing
end function
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
How To use it ?
Put The code in notepad & save it as .vbs
Run vbs file Then it's will Tell You To Put Your Link To save it
Put the Link & The Shortcut Will created
Open The Shortcut Will direct you to the Link
You Need To Have Google Chrome
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Good Luck !
Posted on Utopian.io - Rewarding Open Source Contributors