Jump to content
Sign in to follow this  

.URL Shortcut Creator

Recommended Posts

Hi, I've been searching for a function to make a url shortcut but they were SO COMPLICATED! And sometimes they would give an error. So here is what I wrote that will do the same thing and it is VERY SIMPLE!!! Please keep in mind to create the URL, the folder should already exist.

;Creating URLs
_qtUrlCreator(@FavoritesDir&"\Free Online Games.url", "http://arcadengine.com/")
_qtUrlCreator(@FavoritesDir&"\LeoMoon Studios.url", "http://leomoon.com/")
_qtUrlCreator(@FavoritesDir&"\Love is Comix.url", "http://loveiscomix.com/")
;URL Creator Function
Func _qtUrlCreator($urlName, $urlPath)
    Local $iniGenFile
    $iniGenFile = '[{000214A0-0000-0000-C000-000000000046}]' & @CRLF _
        & 'Prop3=19,2' & @CRLF _
        & '[InternetShortcut]' & @CRLF _
        & 'URL='&$urlPath & @CRLF _
        & 'IDList='
    FileWrite($urlName, $iniGenFile)

Share this post

Link to post
Share on other sites

I like one line solutions to this problem :blink:


Share this post

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Create New...