Save FileSelectFolder for next program start

[beon]

Hello Autoit Community,

as always i´m a total beginner in coding & autoit this is my first programing after hello world , so please be patient.

Im trying to build a .exe to let people join a server with specific parameters.

Works fine as long as i define the path to the server exe:

expandcollapse popup

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Beta
#AutoIt3Wrapper_Icon=beon.ico
#AutoIt3Wrapper_Outfile=BeON.exe
#AutoIt3Wrapper_Outfile_x64=BeON.exe
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Res_Description=BeON Community Launcher for DOBs Arma 3 Server #2
#AutoIt3Wrapper_Res_Fileversion=1.0.3.0
#AutoIt3Wrapper_Res_LegalCopyright=www.BeON.pw
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstantsEx.au3>
#include <IE.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)
Local $hMainGUI = GUICreate("BeON - Community Launcher", 450, 167)
Local $oIE = _IECreateEmbedded() ; update (IE)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEButton")
GUICtrlCreateObj($oIE, 315, 130, 260, 37) ;updates seite aufrufen größe fenster
GUICtrlCreateLabel("Please select the BeON-Server you want to join:", 110, 20)
GUICtrlCreateLabel("___________________________________________________________________________", 0, 110)
GUICtrlCreateLabel("Your Version: 1.0.3", 218, 133)
GUICtrlCreateLabel("Visit us online www.BeON.pw", 162, 151)
; Server Button
Local $iOKButton = GUICtrlCreateButton("Join BeON  Server #1", 125, 50, 200)
GUICtrlSetOnEvent($iOKButton, "OKButton")
; Server Button ende
; Webiste Button
Local $website = GUICtrlCreateButton("Whats new ?", 125, 80, 200)
GUICtrlSetOnEvent($website, "website")
_IENavigate($oIE, "http://launcher.beon.pw/")
_IEAction($oIE, "stop")
; Website button ende
GUISetState(@SW_SHOW, $hMainGUI)
While 1
    Sleep(100) ;da gehste schlafen
WEnd
;Start -> Servere  Starten + Verbinen zu Server
Func OKButton()
    ShellExecute("C:\Program Files (x86)\XXXX\XXXX\server.exe", "0 0 -skipintro -mod=@mas18; -noSplash -noFilePatching -world=empty -connect=85.190.162.190 -port=2302")
EndFunc
;ENDE -> Arma 3 Starten
;Start -> Website
Func website()
    ShellExecute("http://beon.pw/")
EndFunc
;ENDE -> Website
Func CLOSEButton()
    Exit
EndFunc

But the user always store the server.exe in a different directory. So i searched the wiki and found the "FileSelectFolder function" to let the user select their directory. This works great:

#include <MsgBoxConstants.au3>

Example()

Func Example()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"

    ; Display an open dialog to select a file.
    Local $sFileSelectFolder = FileSelectFolder($sMessage, "")& "\hello.bat" ; just for tests, server.exe lator
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
        ShellExecute($sFileSelectFolder)
    EndIf
EndFunc   ;==>Example

But they have to select the folder everytime they launch the .exe thats not exactly what i was looking for.

So my question:

How to set this to: Only ask at first program launch and use the selected path evrey time they launch the program from now on ?

Or build a button wich says "select your server path", and stores the given path until you cklick the button again.

Thanks for your help.

kind regards BeON - Dominik

Edited April 8, 2015 by beon

[caramen]

Game automation is prohibed here :/

Still i dont know if it is game automation or not since you just automate the start of an application...

I guess you wont get any help here about this.

For help you i'm just gonna say you got the logic already .... you answered to your question by yourself saying the logic.

You just have to found a way on how to do it in the help file

 

build a button = GuiCtrlCreat ===> Helpfile

You can Use a $Var1 or $VarX to use any Control if you want to call them again later using this autoit Code :

Legende: X = your own characters

$VarX = GuiCtrlCreatXxxx

Then you will have to check the "Switch" in help file.

Edited April 8, 2015 by caramen

[beon]

Okay thank you verry much.

I will try to get this working with you provided information.

Sorry for posting something that is prohibited, didnt knew that.

Edited April 8, 2015 by beon

[SorryButImaNewbie]

I don't know if this will be judged as game automation, the mods will decide.

I to use the FileSelectFolder in a few of my programs, and for me too, its a tiny problem that the users have to specify the same path all the time, so I will monitor this thread for an anserw for that I haven't yet tried to solve it but If I can come up with something I will share it with you, but myself is a beginner as well.

I'm sure it can be stored in a variable somehow

Edit: I think it can be done with the initial dir (optional) parameter, it would display the fullpath, which (from hre on I just guess) we should be able to save to somewhere(clipboard maybe? save it from clipboard and the clear clipboard?) and then save that in to your program for futre use

Edited April 8, 2015 by SorryButImaNewbie

[caramen]

Well ok it s quit simple ...

$Var1 = FileSelectFolder ()

To stick to the topic maker exemple :

ShellExecute( $Var1 & "" , "0 0 -skipintro -mod=@mas18; -noSplash -noFilePatching -world=empty -connect=85.190.162.190 -port=2302")

This is how to get this fileselect in a Variable.

 

If you want an exemple about the exemple used in the help file you have to change

$Var1

by

$sFileSelectFolder

And also if you use the exemple function to use it in your script you have to change

Local $sFileSelectFolder = FileSelectFolder($sMessage, "")

by

Global $sFileSelectFolder = FileSelectFolder($sMessage, "")

Func Example()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"

    ; Display an open dialog to select a file.
    Local $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
    EndIf
EndFunc   ;==>Example

If you want to setup a buttom for this

Change the function name as somthing like

Func SelectFolder()

When you make a GUI you have to get a switch...

You make your own buttom

$SelectFolder = GUICtrlCreateButton("Select Folder", 360, 175, 70, 20)

Switch
    Case $SelectFolder 
              SelectFolder()
EndSwitch

And the modified function :

Func SelectFolder()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"

    ; Display an open dialog to select a file.
    Global $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
    EndIf
EndFunc   ;==>Example

All is here, HF

Edited April 8, 2015 by caramen

[SorryButImaNewbie]

Hmm I tried to write it in to the console and save it from there, sorry but I just don't really see how will this be retained for subsequent runs? (never tried to do that before that I recall so I have no idea what I should look for , sorry )

[caramen]

if you mean to the script user's have to not set this up after each script run you have to store it differently.

Somthing like in a INI file then here you have to use a differente way ...

 

You can keep the modified exemple of the help file like this (AND ADD An INIWRITE in the exemple function : )

Func SelectFolder()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"

    ; Display an open dialog to select a file.
    Global $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
        Global $WhereisFolder = IniWrite ($SettingsFile, 'Folder', 'Location', $sFileSelectFolder )
    EndIf
EndFunc

Plz watch how to use IniFile in the Helpfile you dont got all info here. But check this line :

Global $WhereisFolder = IniWrite ($SettingsFile, 'Folder', 'Location', $sFileSelectFolder )

Ps : I am just helping your logic. You have to add much more lines of code to make this work, but you got at least, a way to do what you want depending on witch way you gonna choose.

Edited April 8, 2015 by caramen

[Zobengrauzis]

^{i would go}

Global $sFileSelectFolder = 0


;Code



Func SelectFolder()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"
if $sFileSelectFolder  = 0 then
    ; Display an open dialog to select a file.
    $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
    EndIf
endif
EndFunc   ;==>Example

then on runs after first, if file was selected, you can continue without selecting again.

P.S. next program loads (after exiting) - yes, what caramen said - ini

Edited April 8, 2015 by Zobengrauzis

[caramen]

^{i would go}

Global $sFileSelectFolder = 0


;Code



Func SelectFolder()
    ; Create a constant variable in Local scope of the message to display in FileSelectFolder.
    Local Const $sMessage = "Select a folder"
if $sFileSelectFolder  = 0 then
    ; Display an open dialog to select a file.
    $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        ; Display the error message.
        MsgBox($MB_SYSTEMMODAL, "", "No folder was selected.")
    Else
        ; Display the selected folder.
        MsgBox($MB_SYSTEMMODAL, "", "You chose the following folder:" & @CRLF & $sFileSelectFolder)
    EndIf
endif
EndFunc   ;==>Example

then on runs after first, if file was selected, you can continue without selecting again.

P.S. next program loads (after exiting) - yes, what caramen said - ini

I whould do same But i wont make the total code for them since they have to learn. The variable declaration is a basic.

[SorryButImaNewbie]

Now the only question, is this game automation or not?

(thank you guys, i update 4-5 of my scripts now)

[beon]

Thanks for all the Help, i will try to get it done.

Now the only question, is this game automation or not?

(thank you guys, i update 4-5 of my scripts now)

 

This is just a programm to let our users easily join our servers with a famous modification wich needs to be loaded so this is what -mod= does. The user could also do this manually but thats not what we want our loved users to do.  Otherways an error is displayed: "you cant join because you are missing some mods". Nothing more nothing less.

 

Thanks again !

Edited April 8, 2015 by beon

[Melba23]

beon & those who replied,

Why do you need a Mod to decide? Which part of:

 

Do not ask for help with AutoIt scripts, post links to, or start discussion topics on the following subjects:

[...]

Launching, automation or script interaction with games or game servers, regardless of the game.

is so hard to understand?

If you do find it that hard I can always arrange for a short holiday from posting so that you can read the >Forum rules at your leisure.

M23