zemkor

Hello, i have another question. I have inputbox $N1... $N50 How to use variables ? My solution not working, Thanks for answer. For $i = 1 To 50 Step +1 $x = $N & $i $y = $S & $i If GUICtrlRead($x) = "" Then Else GUICtrlSetState($y, $GUI_CHECKED)

Hello, i have another question. I have inputbox $N1... $N50 How to use variables ? My solution not working, Thanks for answer. For $i = 1 To 50 Step +1 $x = $N & $i $y = $S & $i If GUICtrlRead($x) = "" Then Else GUICtrlSetState($y, $GUI_CHECKED)

Melba23, Super so easy and working. Thanks you

Hello guys, i have a problem with combobox. How to fix script ? I need show data in combobox2 only for combobox2 if change combobox1 i need data for combobox1. My solution not working correctly. Thanks for answer. #include <ComboConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("Form1", 277, 134, 231, 168) $Combo1 = GUICtrlCreateCombo("", 48, 40, 185, 25, $CBS_DROPDOWNLIST) GUICtrlSetData(-1, "PC|Mobily", "PC") $Combo2 = GUICtrlCreateCombo("", 48, 72, 185, 25, $CBS_DROPDOWNLIST) GUISetState(@SW_SHOW) While 1 Sleep(250) If GUICtrlRead($Combo1) = 'PC' Then GUICtrlSetData($Combo2, "HDD|VGA|CPU", "HDD") EndIf If GUICtrlRead($Combo1) = 'Mobily' Then GUICtrlSetData($Combo2, "Apple|Nokia|Samsung", "Apple") EndIf WEnd

I have new information. Problem is internet explorer 11. On windows 7 is 11 and on windows 8 is explorer 10. After downgrade explorer 11 to 10 script working. Do you have anyone similar problem ?

Sorry but i don't see a problem. Why this working on windows 8 and on Windows 7 not ?

Hello, i have problem. My script working only windows 8 and windows 7/64 not working. Is any problem in scipt ? Error Variable must be of type "Object" Thanks for answer $oIEzmaz = _IECreate("http://www.bazos.sk/moje-inzeraty.php/") $cozmazat = GUICtrlRead($TB_Nadpis) $hesloinz = GUICtrlRead($TB_Heslo) _IELoadWait($oIEzmaz) Local $formular = _IEFormGetObjByName($oIEzmaz, "formedit") Local $vybrat = _IEFormElementGetObjByName($formular, "administrace") $oButtons = _IEGetObjByName($formular,"administrace",-1) For $oBtn In $oButtons If _IEFormElementGetValue($oBtn) = "Zmazať" Then _IEAction($oBtn, "focus") _IEAction($oBtn, "click") ExitLoop EndIf Next

Melba23 Now I understand Thanks you much.

Huh, your solution working but is much difficult for me. Im newbie . I dont know how used your script for my problem. Can you show me please on my example? #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <MsgBoxConstants.au3> $Form1 = GUICreate("TEST read and write", 301, 500, 224, 170) $text = GUICtrlCreateEdit("Text", 20, 165, 200, 300) $load = GUICtrlCreateButton("Load", 170, 41, 121, 33) $save = GUICtrlCreateButton("Save", 170, 89, 121, 33) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $save save() Case $load load() EndSwitch WEnd Func load() ;natiahne nastavenia z .ini Local $ini_file, $workingdir ; save workingdir $workingdir = @WorkingDir ; open file dialog $ini_file = FileOpenDialog('Open', @ScriptDir, 'Ini (*.ini)|All (*.*)', 1, 'Config.ini', $Form1) ; check if return is valid If @error Or $ini_file == '' Then FileChangeDir($workingdir) Return SetError(1, 0, '') EndIf ; read from ini file GUICtrlSetData($text,IniRead($ini_file, "Data", "Text", "")) ; restore workingdir FileChangeDir($workingdir) EndFunc Func save() Local $ini_file, $workingdir ; save workingdir $workingdir = @WorkingDir ; save file dialog $ini_file = FileSaveDialog('Save', @ScriptDir, 'Ini (*.ini)|All (*.*)', 10, 'Config.ini', $Form1) ; check if return is valid If @error Or $ini_file == '' Then FileChangeDir($workingdir) Return SetError(1, 0, '') EndIf IniWrite($ini_file, "Data", "Text", GUICtrlRead($text)) FileChangeDir($workingdir) EndFunc

Melba23 Sorry but i dont understand you. Please can you explain ?

Hello, i have question. How to save and read data from "GUICtrlCreateEdit" to ini file ?. Problem is: IniWrite write only first line of text and IniRead read only first line text. How to do it? Thanks for answer. $text = GUICtrlCreateEdit("Text", 20, 165, 120, 50) Func save() Local $ini_file, $workingdir ; save workingdir $workingdir = @WorkingDir ; save file dialog $ini_file = FileSaveDialog('Save', @ScriptDir, 'Ini (*.ini)|All (*.*)', 10, 'Config.ini', $Form1) ; check if return is valid If @error Or $ini_file == '' Then FileChangeDir($workingdir) Return SetError(1, 0, '') EndIf ; write to ini file IniWrite($ini_file, "Data", "Text", GUICtrlRead($Text)) EndFunc$text = GUICtrlCreateEdit("Text", 20, 165, 120, 50) Func load() ;natiahne nastavenia z .ini Local $ini_file, $workingdir ; save workingdir $workingdir = @WorkingDir ; open file dialog $ini_file = FileOpenDialog('Open', @ScriptDir, 'Ini (*.ini)|All (*.*)', 1, 'Config.ini', $Form1) ; check if return is valid If @error Or $ini_file == '' Then FileChangeDir($workingdir) Return SetError(1, 0, '') EndIf ; read from ini file GUICtrlSetData($text, IniRead($ini_file, "Data", "Text", "")) EndFuncThis not working, read and write only firt line

Kyan Thanks you much, your solution working.

Hello, i need your help again. How click on button in form if buttons have same name ? Button value is different. My script not working func odoslat() Local $oForm = _IEFormGetObjByName($oIE, "formedit") Local $oSelect = _IEFormElementGetObjByName($oForm, "Zmazať") _IEAction($oSelect, "focus") _IEAction($oSelect, "click") EndFuncSource code from web is here: I need click on button "Zmazať" <form name="formedit" id="formedit" method="post" action="/deletei2.php"> <br> Vaše heslo:<br> <input type="text" name="heslobazar" maxlength="20" value=""><br><br> <input type="hidden" name="idad" id="idad" value=49359062> <input type="submit" name="administrace" value="Editovať"> <input type="submit" name="administrace" value="Zmazať"> </form> </td> </tr>Thanks for answer

Guys need help, why second _IELinkClickByText not working ? First click is ok, but second click is problem. Warning from function _IELinkClickByText, $_IESTATUS_NoMatch but text is correct. First click, changed browser adress is this a problem ? Thanks for answer. Func zmazanie() $oIE = _IECreate("http://www.bazos.sk/moje-inzeraty.php/") $cozmazat = GUICtrlRead($nadpis) Sleep (2000) _IELinkClickByText($oIE, $cozmazat) Sleep (2000) _IELinkClickByText($oIE, "Zmazať/ Editovať/ Topovať") EndFunc