Creating Open File

[kylomas]

Thank you finally someone who answers

 

Your question was answered >here and the answer remains the same.

[Arclite86]

but after you asked me for more detail, nobody responded anymore, and I am not a expert in autoit coding thats why I ask for help to find an solution to read from the file menu and open the note's, could you please help me because I dont know the answers or else I would have solved myself.

[llewxam]

It looks like line 107 may be your problem, or at least a problem, I was unable to use the GUI to really test, it locked up.

Anyway, what Jos was trying to say is line 107 says:

$laden = (GUICtrlRead($iMSG, 1) & @CRLF)

What that does is adds @CRLF to some data, and @CRLF is a "macro" which adds a "line break", which is more fancy speak basically representing hitting the Enter key on your keyboard.  So, using the Debug info you showed above, it looks like the $sListFile array should be full of directories and file names, but the @CRLF is breaking the line up.  If you remove " & @CRLF" from line 107 you should be one step closer.

Ian

[Jos]

Trouwens je Nederlands is aardig goed 

That tends to happen with people that live in Nederland.

 

but after you asked me for more detail, nobody responded anymore, and I am not a expert in autoit coding thats why I ask for help to find an solution to read from the file menu and open the note's, could you please help me because I dont know the answers or else I would have solved myself.

This is not the intent. Stick to a single thread and stop being impatient.

Main reason i can see is that you have made this script but have doubts you understand much of it as you don;t seem to do anything with the hint or tips you get.

PS: I have merged all 3 threads out there on this topic and advice you now to not open another one.

Jos

Edited November 1, 2014 by Jos

[Arclite86]

I almost got it:

expandcollapse popup

$_FF_COM_TRACE = True
#include <MsgBoxConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <FF.au3>
#include <staticConstants.au3>
#include <IE.au3>
#include <String.au3>
#include <Excel.au3>
#include <FileConstants.au3>
#include <IE.au3>
#include <String.au3>
#include <GUIConstantsEx.au3>
#include "GUIExtender.au3"

Local $oIE
;, BitOR($WS_BORDER, $WS_VSCROLL)

;_FFStart( "https://www.google.nl" )
;WinSetState ( "Google - Mozilla Firefox", "",  @SW_MINIMIZE )










Global $iIndex = 0

#Region ### START Koda GUI section ### Form=
$Form1_1_1_1 = GUICreate("program", 814, 713, 697, 101)
_GUIExtender_Init($Form1_1_1_1)

$List1 = GUICtrlCreateList("", 0, 64, 145, 358)
GUICtrlSetData(-1, "")
$List2 = GUICtrlCreateList("", 144, 64, 65, 358)
GUICtrlSetData(-1, "")
$List3 = GUICtrlCreateList("", 208, 64, 65, 358)
GUICtrlSetData(-1, "")
$List4 = GUICtrlCreateList("", 344, 64, 153, 358)
GUICtrlSetData(-1, "")
$List5 = GUICtrlCreateList("", 496, 64, 65, 358)
GUICtrlSetData(-1, "")
$List6 = GUICtrlCreateList("", 560, 64, 121, 230)
GUICtrlSetData(-1, "")
$List7 = GUICtrlCreateList("", 680, 64, 65, 230)
GUICtrlSetData(-1, "")
$List8 = GUICtrlCreateList("", 744, 64, 65, 230)
GUICtrlSetData(-1, "")
$List9 = GUICtrlCreateList("", 272, 64, 65, 358)
GUICtrlSetData(-1, "")

$extend = GUICtrlCreateButton("extend", 272, 456, 89, 17)
GUISetState(@SW_SHOW)






    Local $helpmenu, $infoitem, $exititem, $recentfilesmenu
    Local $viewmenu, $viewstatusitem
    Local $statuslabel, $msg, $file



    $filemenu = GUICtrlCreateMenu("&File")
    $fileitem = GUICtrlCreateMenuItem("Open", $filemenu)
    GUICtrlSetState(-1, $GUI_DEFBUTTON)
    $helpmenu = GUICtrlCreateMenu("?")
    GUICtrlCreateMenuItem("Save", $filemenu)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $infoitem = GUICtrlCreateMenuItem("Info", $helpmenu)
    $exititem = GUICtrlCreateMenuItem("Exit", $filemenu)
    $recentfilesmenu = GUICtrlCreateMenu("Recent Files", $filemenu, 1)

    GUICtrlCreateMenuItem("", $filemenu, 2) ; create a separator line

    $viewmenu = GUICtrlCreateMenu("View", -1, 1) ; is created before "?" menu
    $viewstatusitem = GUICtrlCreateMenuItem("Statusbar", $viewmenu)
    $message4 = GUICtrlCreateMenuItem("message", $filemenu)




    GUICtrlSetState(-1, $GUI_FOCUS)




    GUISetState(@SW_SHOW)

; Loop until the user exits.
    While 1

        $msg = GUIGetMsg()

        If $msg = $fileitem Then
            $file = FileOpenDialog("Choose file...", @TempDir, "All (*.*)")
            If @error <> 1 Then GUICtrlCreateMenuItem($file, $recentfilesmenu)
        EndIf
        If $msg = $viewstatusitem Then
            If BitAND(GUICtrlRead($viewstatusitem), $GUI_CHECKED) = $GUI_CHECKED Then
                GUICtrlSetState($viewstatusitem, $GUI_UNCHECKED)
                GUICtrlSetState($statuslabel, $GUI_HIDE)
            Else
                GUICtrlSetState($viewstatusitem, $GUI_CHECKED)
                GUICtrlSetState($statuslabel, $GUI_SHOW)
            EndIf
        EndIf
        If $msg = $GUI_EVENT_CLOSE Or $msg = $exititem Then ExitLoop

            Local $newfile = StringReplace($file, "Openfile.txt", "")

$1newfile = ($newfile & ("lists\list"))

        If $msg = $infoitem Then MsgBox($MB_SYSTEMMODAL, "Info", "Only a test...")
If $msg = $message Then MsgBox($MB_SYSTEMMODAL, "Info", " " & $1newfile)

Global $iIndex = 0, $sListData1 = ($1newfile & ("1"))
Global $sListFile1 = ($1newfile & ("1"))

Global $iIndex = 0, $sListData2 = ($1newfile & ("2"))
Global $sListFile2 = ($1newfile & ("2"))

Global $iIndex = 0, $sListData3 = ($1newfile & ("3"))
Global $sListFile3 = ($1newfile & ("3"))

Global $iIndex = 0, $sListData4 = ($1newfile & ("4"))
Global $sListFile4 = ($1newfile & ("4"))

Global $iIndex = 0, $sListData5 = ($1newfile & ("5"))
Global $sListFile5 = ($1newfile & ("5"))

Global $iIndex = 0, $sListData6 = ($1newfile & ("6"))
Global $sListFile6 = ($1newfile & ("6"))

Global $iIndex = 0, $sListData7 = ($1newfile & ("7"))
Global $sListFile7 = ($1newfile & ("7"))

Global $iIndex = 0, $sListData8 = ($1newfile & ("8"))
Global $sListFile8 = ($1newfile & ("8"))

Global $iIndex = 0, $sListData9 = ($1newfile & ("9"))
Global $sListFile9 = ($1newfile & ("9"))

Global $iIndex = 0, $sListData10 = ($1newfile & ("10"))
Global $sListFile10 = ($1newfile & ("10"))

Global $iIndex = 0, $sListData11 = ($1newfile & ("11"))
Global $sListFile11 = ($1newfile & ("11"))

Global $iIndex = 0, $sListData12 = ($1newfile & ("12"))
Global $sListFile12 = ($1newfile & ("12"))

Global $iIndex = 0, $sListData13 = ($1newfile & ("13"))
Global $sListFile13 = ($1newfile & ("13"))







; Read saved file if it exists--------
If FileExists($sListFile1) Then
    $sListData1 = FileRead($sListFile1)
EndIf

; Load data read from the file
GUICtrlSetData($List1, $sListData1)
_GUICtrlListBox_SetCurSel($List1, $iIndex)



; Read saved file if it exists--------
If FileExists($sListFile2) Then
    $sListData2 = FileRead($sListFile2)
EndIf




; Load data read from the file
GUICtrlSetData($List2, $sListData2)
_GUICtrlListBox_SetCurSel($List2, $iIndex)


; Read saved file if it exists--------
If FileExists($sListFile3) Then
    $sListData3 = FileRead($sListFile3)
EndIf




; Load data read from the file
GUICtrlSetData($List3, $sListData3)
_GUICtrlListBox_SetCurSel($List3, $iIndex)

; Read saved file if it exists--------
If FileExists($sListFile4) Then
    $sListData4 = FileRead($sListFile4)
EndIf




; Load data read from the file
GUICtrlSetData($List4, $sListData4)
_GUICtrlListBox_SetCurSel($List4, $iIndex)


; Read saved file if it exists--------
If FileExists($sListFile5) Then
    $sListData5 = FileRead($sListFile5)
EndIf



; Load data read from the file
GUICtrlSetData($List5, $sListData5)
_GUICtrlListBox_SetCurSel($List5, $iIndex)




; Read saved file if it exists--------
If FileExists($sListFile6) Then
    $sListData6 = FileRead($sListFile6)
EndIf

; Load data read from the file
GUICtrlSetData($List6, $sListData6)
_GUICtrlListBox_SetCurSel($List6, $iIndex)

; Read saved file if it exists--------
If FileExists($sListFile7) Then
    $sListData7 = FileRead($sListFile7)
EndIf

; Load data read from the file
GUICtrlSetData($List7, $sListData7)
_GUICtrlListBox_SetCurSel($List7, $iIndex)




; Read saved file if it exists--------
If FileExists($sListFile8) Then
    $sListData8 = FileRead($sListFile8)
EndIf

; Load data read from the file
GUICtrlSetData($List8, $sListData8)
_GUICtrlListBox_SetCurSel($List8, $iIndex)



; Read saved file if it exists--------
If FileExists($sListFile9) Then
    $sListData9 = FileRead($sListFile9)
EndIf

; Load data read from the file
GUICtrlSetData($List9, $sListData9)
_GUICtrlListBox_SetCurSel($List9, $iIndex)


; Read saved file if it exists--------
If FileExists($sListFile10) Then
    $sListData10 = FileRead($sListFile10)
EndIf

; Load data read from the file
GUICtrlSetData($money, $sListData10)
_GUICtrlListBox_SetCurSel($money, $sListData10)

    WEnd
    GUIDelete()

but now I  need to find a way it automaticly opens after I opened it