incepator Posted November 12, 2012 Share Posted November 12, 2012 hello, someone thought to make a software to automate conversations with www.cleverbot.com? That's what I'm trying to do now, but do not succeed ... if you can help me a bit, I would be grateful. Link to comment Share on other sites More sharing options...
water Posted November 12, 2012 Share Posted November 12, 2012 What have YOU tried so far? Don't expect US to write the code for you. My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 (edited) the point is they i did not use IE functions very well, therefore I asked your help. expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <File.au3> #include <IE.au3> #include <String.au3> #include <Array.au3> #include <GuiListView.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 615, 438, 192, 124) $Input1 = GUICtrlCreateInput("", 48, 160, 409, 21) $Edit1 = GUICtrlCreateEdit("", 32, 0, 521, 153) $Button1 = GUICtrlCreateButton("Button1", 472, 160, 75, 25) Dim $Form1_AccelTable[1][2] = [["{ENTER}", $Button1]] GUISetAccelerators($Form1_AccelTable) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $oIE = _IECreate ("http://cleverbot.com/",1,1,0,0) _IELoadWait($oIE) $oForm = _IEFormGetObjByName ($oIE, "stimulusForm") $Submit = _IEGetObjByName($oIE, "stimulus") $oQuery4 = _IEFormElementGetObjByName ($oForm, "stimulus") $mesaj = _IEFormElementSetValue ($oQuery4,GUICtrlRead($Input1)) If $mesaj = False Then _IEFormElementSetValue ($oQuery4,GUICtrlRead($Input1)) _IELoadWait($oIE) EndIf _IELoadWait($oIE) _IEAction($oForm, "click") If @error Then MsgBox(0,"",@error) EndIf EndSwitch WEnd Edited November 12, 2012 by incepator Link to comment Share on other sites More sharing options...
water Posted November 12, 2012 Share Posted November 12, 2012 If you have a problem please describe what doesn't work, the error messages you get etc. The more information we have the better. We can't take your script and play around to find out what doesn't work. My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 (edited) problem is not sending "ENTER" after insert message ... it would be the first problem, although I used _IEAction($oForm, "click") not working... Edited November 12, 2012 by incepator Link to comment Share on other sites More sharing options...
water Posted November 12, 2012 Share Posted November 12, 2012 You want the ENTER key go to the Internet Explorer? My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
JohnOne Posted November 12, 2012 Share Posted November 12, 2012 _IEFormSubmit maybe. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 _IEFormSubmit not working.. Link to comment Share on other sites More sharing options...
JohnOne Posted November 12, 2012 Share Posted November 12, 2012 you have tried it before? AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 Yes..."_IEFormSubmit($oForm)"...but not working :-|if ...$oForm = _IEFormGetObjByName ($oIE, "stimulusForm") Link to comment Share on other sites More sharing options...
JohnOne Posted November 12, 2012 Share Posted November 12, 2012 You see, it might take you a little while longer, but giving info here on the problem is important.People are willing to help, but will quickly lose patience and opt out.This is just an example from your last reply_IEFormSubmit tells you why it failed, but you never told us. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 the idea is that I tried the "it" but does not indicate any error .. _IEFormSubmit($Submit, 0) If @error Then MsgBox(0,"",@error) EndIf not ask you to help me more ... Link to comment Share on other sites More sharing options...
Danp2 Posted November 12, 2012 Share Posted November 12, 2012 From your code above, $Submit doesn't appear to be a form. Have you tried using $oForm in the _IEFormSubmit statement? Latest Webdriver UDF Release Webdriver Wiki FAQs Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 DanP2...Believe me I tried, but it does not work, probably has a security that does not allow this. Link to comment Share on other sites More sharing options...
JohnOne Posted November 12, 2012 Share Posted November 12, 2012 take a look at this post just made, and follow the link in it. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
incepator Posted November 12, 2012 Author Share Posted November 12, 2012 (edited) fail ... we will try tomorrow. X_xEDIT... Edited November 13, 2012 by incepator Link to comment Share on other sites More sharing options...
Moderators JLogan3o13 Posted November 13, 2012 Moderators Share Posted November 13, 2012 fail ... we will try tomorrow. X_xEDIT...This is a prime example of why you never see a ton of help in your threads. You constantly refuse to provide anyone with the information they need to help you. Do you honestly believe "fail...we will try tomorrow" tells anyone anything? "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum! Link to comment Share on other sites More sharing options...
mihaibr Posted November 13, 2012 Share Posted November 13, 2012 I think he's drunk. Close topic req: I just see a disrespectful person that request some help but don't provide enough information. Link to comment Share on other sites More sharing options...
incepator Posted November 13, 2012 Author Share Posted November 13, 2012 drunk ? Link to comment Share on other sites More sharing options...
Mechaflash Posted November 13, 2012 Share Posted November 13, 2012 Mentally Incapacitated: Drunk, stupid, high, or all of the above. Incapable of giving precise information when performing precise actions. He/she/he-she/it doesn't want help. Spoiler “Hello, ladies, look at your man, now back to me, now back at your man, now back to me. Sadly, he isn’t me, but if he stopped using ladies scented body wash and switched to Old Spice, he could smell like he’s me. Look down, back up, where are you? You’re on a boat with the man your man could smell like. What’s in your hand, back at me. I have it, it’s an oyster with two tickets to that thing you love. Look again, the tickets are now diamonds. Anything is possible when your man smells like Old Spice and not a lady. I’m on a horse.” Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now