WebBrowser.
HTML: , "", . :
webbrowser1.Navigate("javascript:function%20E(){f0=document.forms[0];f0['login'].value='foo';}E()")
webbrowser1.Navigate("javascript:document.forms[0].submit()")
, HTML.
** Flash: ** - flash, , . SendKeys , , . Windows (, "f" ):
Dim c as char = "f"c
Dim classname As New System.Text.StringBuilder(100)
Dim ExplorerHandle As IntPtr = webbrowser1.Handle
GetClassNameA(ExplorerHandle, classname, classname.Capacity)
Do While classname.ToString <> "Internet Explorer_Server"
ExplorerHandle = GetWindow(GetExplorerHandle, GetWindow_Cmd.GW_CHILD)
GetClassNameA(ExplorerHandle, classname, classname.Capacity)
Loop
PostMessageA(ExplorerHandle, WM_Constants.WM_KEYDOWN, IntPtr.Zero, IntPtr.Zero)
PostMessageA(ExplorerHandle, WM_Constants.WM_KEYUP, CType(VkKeyScanA(CType(Asc(c), Byte)), IntPtr), IntPtr.Zero)
PostMessage, GetClassName, GetWindow .. pinvoke.net. , WM_KEYUP c, WM_KEYDOWN (0). KEYDOWN KEYUP , , Control , , KEYDOWN "p", IE. 0 KEYDOWN KEYUP. Backspace, , KEYDOWN, 0, Control-Backspace, , IE, , c = vbBack, KEYDOWN .
, 1 500 . , WebBrowser.
- AxWebBrowser. ActiveX, -, Control-P, , .Net.