Distrophy Posted October 19, 2008 Share Posted October 19, 2008 (edited) I've made a script that automates retrieving a "spambox" address from www.spambox.us. The way I have it working right now is it loads IE in the background, types in the info to a form and submits the form. This feels very crude to me and I was wondering if someone could help me get the syntax to submit in the web address to generate a spambox. Func GenMail() Dim $login = "test@email.com" Dim $time = "1";1= 30min, 2= 1 hour, 3= 12 hours, 4= 1 day, 5= 1 week, 6= 1 month, 7= 6 months, 8= 1 year $oIE = _IEcreate("www.spambox.us/about.php","",0) $oForm = _IEFormGetCollection($oIE,0) $oText = _IEFormElementGetObjByName($oForm, "email") $oTime = _IEFormElementGetObjByName($oForm, "lifetime") _IEFormElementSetValue($oText, $login, 0) _IEFormElementOptionselect ($oTime, $time, 1, "byIndex") _IEFormSubmit($oForm) $readMail = _IEBodyReadText ( $oIE ) $foundMailx = _StringBetween($readMail, "mail","will expire") $foundMail = StringStripWS ( $foundMailx[0], 8 ) PostMail($foundMail) EndFunc That is my current code, but I was hoping someone would be able to figure out what query i could put in the URL to spambox.us/generate.php to get a box to generate without all the form filling nonsense. Thanks Edited October 19, 2008 by Distrophy 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