how to create an internet link w/ FileCreateShortc

[mattslav]

I tried:

FileCreateShortcut ("http://www.yahoo.com", @USERPROFILEDIR & "\Favorites")

and it says the target cannot be found. What do I need to do?

[SlimShady]

CreateURLShortcut (@DesktopDir & "\AutoIt.url", "http://www.autoitscript.com")


Func CreateURLShortcut ($File, $URL)
   $Content = "[InternetShortcut]" & @LF & "URL=" & $URL & @LF & @CRLF
   $OpenShortcut = FileOpen($File, 2)
   If $OpenShortcut = -1 Then
      FileClose($OpenShortcut)
      Return -1
   EndIf
   FileWrite($OpenShortcut, $Content)
   FileClose($OpenShortcut)
   Return 0
EndFunc ;==>CreateURLShortcut

Edited September 17, 2004 by SlimShady

[mattslav]

thanks buddy, i appreciate it

[Valik]

Slim, you could of done that another way, specifically, in one line (Without even wrapping it in a function!).

IniWrite(@DesktopDir & "\AutoIt.url", "InternetShortcut", "URL", "www.autoitscript.com")

Also, until Jon changes it, calling FileClose() on a handle of -1 produces a script aborting error, so I don't recommend doing that.

[SlimShady]

Also, until Jon changes it, calling FileClose() on a handle of -1 produces a script aborting error, so I don't recommend doing that.

<{POST_SNAPBACK}>

FileOpen($File, 2)

I assume the folder where the user wants the file to be written, is accessible.

The problem you mentioned often occurs when reading a file that doesn't exist.