Create a Internet Shorcut on Anyone's Computer
This code will create an internet shortcut on someone's computer. All you have to do it call it with a path and hyperlink!
Inputs
Path- path should be complete with filename ending in url (e.g. "C:\Shortcut.url")
Hyperlink- this is the complete website address
Assumes
So easy I think you can handle it.
Rate Create a Internet Shorcut on Anyone's Computer
(6(6 Vote))
Private Sub CreateHyperlink(Path As String, Hyperlink as String)
Open Path For Output As #1 'open file access
Print #1, "[Internetshortcut]" 'print on first line
Print #1, "URL=" & Hyperlink 'print url on second line
Close #1 'close it
End Sub
Create a Internet Shorcut on Anyone's Computer Comments
No comments yet — be the first to post one!
Post a Comment