ShellExecute () dont work for shortcut

[au3scr]

ShellExecute("C:\Documents and Settings\rain\Desktop\hama (2).lnk")

Any ideas how to get this thing work? i need to execute *.lnk files

current example here dont work.

[AlmarM]

Hmm, Its working for me!

Could you try renaming it to 'hama(2)' ?

AlmarM

[au3scr]

I tried .. didnt worked, here is other examples that dont work

ShellExecute("C:\Documents and Settings\rain\Desktop\smite.lnk")

ShellExecute("C:\Documents and Settings\rain\Desktop\Doom3.lnk")

[erik7426]

I tried .. didnt worked, here is other examples that dont work

ShellExecute("C:\Documents and Settings\rain\Desktop\smite.lnk")

ShellExecute("C:\Documents and Settings\rain\Desktop\Doom3.lnk")

Have you tried...?

ShellExecute(@DesktopDir & "\Doom3.lnk")

[AlmarM]

Have you tried...?

ShellExecute(@DesktopDir & "\Doom3.lnk")

Arg! Just what I wanted to say

@ au3scr

Try what he said >_<

AlmarM

[au3scr]

I dno whats wrong, I just cant get it work

Edit:Still dont work

Edited October 3, 2008 by au3scr

[erik7426]

I dno whats wrong, I just cant get it work

Edit:Still dont work

I just wrote this...it works on my PC

Try this

expandcollapse popup

#cs --------------------------------------------------------------------------------------------
    
    AutoIt Version: 3.2.12.1
    Author:      erik7426
    
    Script Function:
    If available gets the path to the executable from a shortcut(.lnk) file
    and then runs the executable.
    
    Requirements:   $lnk = name of a valid shortcut including path
    Return Values:
    SUCCESS - Returns 0
    FAILURE - Returns 1 if the shortcut is not found
    FAILURE - Returns 2 if there is an error extracting the executable path
    Example:    FileShortcutRunWait(@DesktopDir & "\MyProgram.lnk")
    
#cE --------------------------------------------------------------------------------------------

FileShortcutRun(@DesktopDir & "\Doom3.lnk")




Func FileShortcutRun($lnk)
    If Not FileExists($lnk) Then
        Return (1)
    EndIf
    
    $filepath = FileGetShortcut($lnk)
    If @error = 1 Then
        Return (2)
    EndIf
    Run($filepath[0], $filepath[1])
    Return (0)
EndFunc;==>FileShortcutRun

Func FileShortcutRunWait($lnk)
    If Not FileExists($lnk) Then
        Return (1)
    EndIf
    
    $filepath = FileGetShortcut($lnk)
    If @error = 1 Then
        Return (2)
    EndIf
    RunWait($filepath[0], $filepath[1])
    Return (0)
EndFunc;==>FileShortcutRunWait

Edited October 3, 2008 by erik7426

[au3scr]

@erik7426

My great thanks to you. yours version works