Sign in to follow this  
Followers 0
tutor2000

Autoitx to get the first text box in a webpage

Started by tutor2000,

1 post in this topic

#1 ·  Posted

Aloha gang

Just thought I'd share a wierd little script that is part of a proggy. It looks for the first text box in a webpage using autoitx autoitx3 by reading the statusbar and the clipboard.

Sloppy work but here you go. I'll try to copy and past all the needed parts so newbies can use it to. Don't foret to install autoitx stuff for you new guys

Give this a .hta ending

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

<HTML>

<HEAD>

<META HTTP-EQUIV="CONTENT-TYPE" CONTENT="text/html; charset=windows-1252">

<TITLE>Submit By Rick Submission Maker</TITLE>

<META NAME="CHANGEDBY" CONTENT="James Kirkham">

<META NAME="CHANGED" CONTENT="20040706;19320343">

<HTA:APPLICATION ID="RickKirkhamSubmit"

APPLICATIONNAME="RickKirkhamSubmit"

BORDER="thick"

BORDERSTYLE="thick"

NAVIGABLE="yes"

VERSION="3.0"

CAPTION="yes" ICON="/graphics/creature.ico"

SHOWINTASKBAR="yes"

SINGLEINSTANCE="yes"

SYSMENU="yes"

WINDOWSTATE="maximized">

<script LANGUAGE="VBScript">

<!--

Set oAutoIt = CreateObject("AutoItX.Control")

Set oAutoIt3 = CreateObject("AutoItX3.Control")

'''''''''''''''''''''''''''''

'FUNCTION GETTABS

function gettabs()

oautoit3.winwait "Submit By Rick Submission Maker",""

var = oautoit3.winmove("Submit By Rick Submission Maker","",0,0,300,300)

var = oautoit3.WinSetOnTop ("Submit By Rick Submission Maker","",1)

'Web page was previously renamed the name below

oautoit3.winactivate "SubmitByRick Form",""

oautoit.winmaximize "SubmitByRick Form",""

do

oautoit3.winactive "SubmitByRick Form",""

status=oautoit3.StatusbarGetText ("SubmitByRick Form" ,"" )

oautoit3.send "{tab}"

newstatus=oautoit3.StatusbarGetText ("SubmitByRick Form" ,"")

if status=newstatus then

oautoit3.clipput("")

oautoit3.send "jrksbr"

oautoit3.send "+{home}"

oautoit3.send "^c"

oautoit3.sleep 1000

clip = oautoit3.clipget()

end if

loop until clip = "jrksbr"

end function

-->

</SCRIPT>

</HEAD>

<BODY onload = 'gettabs()'>

</body>

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

That should do it. Tear it up, improve it. I still need to add apopup killer function

I'll probablyjust close anything without the titles I use and Program Manager. I'll be using this with a button click as well to write the info to an ini and continue the function.

Aloha

Rick

Only $2.00 with Resale Rights How to Block Better for Martial Artists and NonMartial Artistshttp://kirkhamsebooks.com/MartialArts/Bloc...tterEbook_m.htm

Share this post

Link to post
Share on other sites



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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0
Go To Topic Listing AutoIt Example Scripts