lovelace2101 Posted July 10, 2014 Share Posted July 10, 2014 Hello , I need a script input email from a list email and then click button. ( "Bình Chọn" ) at Website: http://imiss.hoakhoi.vn/picture/-le-thi-kieu-oanh.aspx#.U761BPmSwSw Can you help me? Thank you very much. Dat Link to comment Share on other sites More sharing options...
lovelace2101 Posted July 10, 2014 Author Share Posted July 10, 2014 My basic script : $oIE = ObjCreate("InternetExplorer.Application") $oIE.visible = True $oIE.Navigate("http://imiss.hoakhoi.vn/picture/-le-thi-kieu-oanh.aspx#.U761BPmSwSw") Sleep(5000) $oIE.document.getElementById("ctl00_ctl00_Content_Content_txtEmail").value= "name@gmail.com" $oIE.document.getElementByName("ctl00$ctl00$Content$Content$btnSubmit").click ; Can you help me edit ? Thanks, Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted July 10, 2014 Moderators Share Posted July 10, 2014 lovelace2101,Google tells me that "Bình Chọn" is "Vote" - are you trying to spam a competition? M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
lovelace2101 Posted July 11, 2014 Author Share Posted July 11, 2014 Hi Mod, This is not spam. I only want input email of friend to vote . And Can't spam vote. thanks Link to comment Share on other sites More sharing options...
lovelace2101 Posted July 11, 2014 Author Share Posted July 11, 2014 #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <MsgBoxConstants.au3> GUICreate("Imiss - by Đạt đẹp trai",300,200,-1,-1) GUICtrlCreateLabel("Vui lòng nhập Email bình chọn:",20,32,200,25) $UserNameCON = GUICtrlCreateInput("",20,50,260,22) $loginBtn = GUICtrlCreateButton("Bình Chọn",105,160,100,25) GUISetState(@SW_SHOW) ; will display an empty dialog box ; Run the GUI until the dialog is closed While 1 $msg = GUIGetMsg() Switch $msg Case $loginBtn $UserName = GUICtrlRead($UserNameCON) $oIE = _IECreate ("http://imiss.hoakhoi.vn/picture/-le-thi-kieu-oanh.aspx#.U78jQvmSwSw") $divs = _IETagNameGetCollection($oIE, "p") $oIE.document.getElementById("ctl00_ctl00_Content_Content_txtEmail").value=$UserName $oSubmit = _IEGetObjByName ($oIE, "ctl00$ctl00$Content$Content$btnSubmit") $oIE = _IEAction ($oSubmit, "click") For $p In $divs If $p.className == "vote_mess" Then MsgBox(0, "Thông báo", $p.innerText) EndIf Next ExitLoop Case $GUI_EVENT_CLOSE ExitLoop EndSwitch WEnd GUIDelete() Fail . Can you help me ? Link to comment Share on other sites More sharing options...
Recommended Posts