This repository has been archived on 2024-06-20. You can view files and clone it, but you cannot make any changes to it's state, such as pushing and creating new issues, pull requests or comments.
coffee.pygments/tests/examplefiles/autoit/autoit_submit.au3
trdean1 54f9d2fec7
Supports single quote strings in AutoItLexer (#1667)
* Supports single quote strings in AutoItLexer

* Adds test case for autoIt single strings
2021-02-08 07:29:53 +01:00

29 lines
732 B
AutoIt

#include <IE.au3>
;http://msdn.microsoft.com/en-us/library/Aa752084.aspx
$ourl="http://localhost:5000/"
$oIE = _IEAttach ($ourl,"url")
If @error = $_IEStatus_NoMatch Then
$oIE = _IECreate ($ourl & "sample.html")
endIf
$oForm = _IEFormGetObjByName ($oIE, "form1")
;username, call DOM directly
$oIE.document.getElementById("username").value="helloAutoIT"
;state select
$oSelect = _IEFormElementGetObjByName ($oForm, "state")
_IEFormElementOptionSelect ($oSelect, "S2", 1, "byText")
;options raido
_IEFormElementRadioSelect($oForm, "2nd", "type", 1, "byValue")
$myvar = 'boo; bar; "baz"'
#cs
ConsoleWrite(@Error)
Sleep(10000)
#ce
_IEFormSubmit($oForm, 0)
_IELoadWait($oIE)
Sleep(60000)
_IEQuit($oIE)