Double click List View Item to run underlying file

[0MikeyJ0]

Hi All,

First post here and new to AutoIT but not new to scripting, Have previously written a scripts using VBScript and am now converting them to AutoIT.

I'm trying to create a basic GUI that lists the .au3 files in a folder and then lets me run the file directly by double clicking it in the ListView. I've grabbed some code that Melba23 wrote from a 2011 post that seemed to work for Melba but not for the OP. The last post was Melba asking what the console showed with a small rewritten piece of code but OP didn't not answer. Here's the original thread for reference:

https://www.autoitscript.com/forum/topic/133356-how-to-select-run-a-program-in-the-listview/

I seem to have the same issue OP did in that the underlying file in the ListView does not run when it is double clicked. Can anyone see why this might not work?

expandcollapse popup

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.14.2
 Author:         myName

 Script Function:
    Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

;#requireadmin
;#AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator

;#NoTrayIcon
#include <Array.au3>
#include <ButtonConstants.au3>
#include <File.au3>
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$sAppClicked = ""

$GUI = GUICreate("RunApp in ListView", 545, 290, -1, -1)
$Label = GUICtrlCreateLabel("Discript:Files List", 190, 10, 200, 17)
$Button = GUICtrlCreateButton("Browse", 200, 250, 75, 25, $WS_GROUP)
GUICtrlSetCursor(-1, 0)
$hListView = _GUICtrlListView_Create($GUI, "", 10, 30, 525, 200)
_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES))
_GUICtrlListView_SetUnicodeFormat($hListView, True)
_GUICtrlListView_InsertColumn($hListView, 0, "Application:", 225)
_GUICtrlListView_InsertColumn($hListView, 1, "Target:", 300)

GUISetState()
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button
            $sFiles = FileSelectFolder("Choose a drive or folder", @DesktopDir, 2)
            If (@error) Or (Not $sFiles) Then Exit
            $iFlist = _FileListToArray($sFiles, "*", 0)
            For $i = 0 To UBound($iFlist) - 1
                _GUICtrlListView_AddItem($hListView, $iFlist[$i] & @CRLF)
            Next
            _GUICtrlListView_DeleteItem($hListView, 0)
            $iCount = _GUICtrlListView_GetItemCount($hListView)
            $Target = $sFiles
            For $x = 0 To $iCount
                _GUICtrlListView_AddSubItem($hListView, $x, $Target, 1)
            Next
            If $iCount Then GUICtrlSetData($Label, "Discript:BoubleClick App name to Run")
    EndSwitch

        If $sAppClicked Then
            $sAppToRun = $sFiles & "\" & StringTrimRight($sAppClicked, 2) ; <<<<<<<< Remove the trailing @CRLF
            Run($sAppToRun)
            $sAppClicked = ""
        EndIf

        ;If $sAppClicked Then
        ;   ConsoleWrite($sAppClicked & " - " & StringToBinary($sAppClicked) & @CRLF)
        ;   $sAppToRun = $sFiles & "\" & StringTrimRight($sAppClicked, 2) ; <<<<<<<< Remove the trailing @CRLF
        ;   Run($sAppToRun)
        ;   $sAppClicked = ""
        ;EndIf

WEnd

Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
    #forceref $hWnd, $iMsg, $iwParam
    Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $hWndListView, $tInfo
    $hWndListView = $hListView
    If Not IsHWnd($hListView) Then $hWndListView = GUICtrlGetHandle($hListView)
    $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $iCode = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
        Case $hWndListView
            Switch $iCode
                Case $NM_DBLCLK
                    $sAppClicked = _GUICtrlListView_GetItemText($hWndListView, _GUICtrlListView_GetSelectedIndices($hWndListView))
            EndSwitch
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_NOTIFY

The piece of info Melba was asking able from the console that happens when I double click a ListView item is: 0x4469736B4465667261672E6175330D0A.

Thanks!

Mike

[Melba23]

0MikeyJ0,

Welcome to the AutoIt forums.

Run only works with executable files (EXE, BAT, COM or PIF - as explained in the Help file) so to "run" an .au3 file you need to use ShellExecute.

However, this depends on how you installed AutoIt: if you selected as default "Run the file" then it will work - if you selected "Edit the file" then all it will do is open the file in SciTE.

M23

 

[0MikeyJ0]

Ahh! I see what you're saying. So, if I need to use this script set on other pc's that don't have AutoIT installed, I'd need to compile the .au3 files into .exe files?

[Melba23]

0MikeyJ0,

Or compile the script and use the built-in interpreter to run the other scripts - look in the Help file under <Using AutoIt - Running Scripts - AutoIt specific command Line Switches>.

M23

[InunoTaishou]

Can't you also run the AutoIt3.exe with the path to the .au3 file? Then you could just pack up the one AutoIt.exe file and double clicking the script in the list view would pass the path to the exe.

I know you can drag and drop multiple .au3 files on autoit3.exe but I don't know what dependencies autoit3.exe needs in order to run. I'd test it but I don't want to uninstall and then reinstall autoit lol

[BrewManNH]

AutoIt doesn't need any dependencies to run when compiled. You can run a script using another script you compiled if you use the correct parameters when compiling.

#pragma compile(AutoItExecuteAllowed, true)

 

Edited February 19, 2016 by BrewManNH