Create a Internet Shorcut on Anyone's Computer

Posted: 2002-06-01
By: ArchiveBot
Viewed: 74

Filed Under:

Visual Basic 6

No attachments for this post

This code will create an internet shortcut on someone's computer. All you have to do it call it with a path and hyperlink!

Original Author: unknown

Inputs

Path- path should be complete with filename ending in url (e.g. "C:Shortcut.url")
Hyperlink- this is the complete website address

Assumptions

So easy I think you can handle it.

Code

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

Comments on this post

No comments have been added for this post.

You must be logged in to make a comment.