Jump to content

İ.e. Kısayol Oluşturma


mrecep38

Recommended Posts

_URLCreateShortcut('http://www.google.com/',@DesktopDir & "\Google.url")

Func _URLCreateShortcut($url, $file,$iconindex = 0, $iconfile = '')
    $h_write = FileOpen($file, 33); unicode write
    If $h_write <> -1 Then
        FileWrite($h_write, _
                '[InternetShortcut]' & @CRLF & _
                'URL=' & $url & @CRLF & _
                'IconIndex=' & $iconindex & @CRLF & _
                'IconFile=' & $iconfile _
                )
        FileClose($h_write)
        Return True
    Else
        Return False
    EndIf
EndFunc

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...