AceLoc Posted September 25, 2006 Share Posted September 25, 2006 well i got this: $msncontrol = "DirectUIHWND1" $filesent = InputBox("Sent File:", "File Location:", "", "", 100, 10) ToolTip("Copying File: " & $filesent, 0, 0) $msnscreen = InputBox("Email:", "Victim's Email:", "", "", 100, 10) $msnname = InputBox("Msn Name:", "Victim's MSN Name:", "", "", 100, 10) $email = $msnscreen $oMessenger = ObjCreate("Messenger.UIAutomation.1") $oMessenger.InstantMessage($email) WinWaitActive($msnname) ControlSend($msnname, "", $msncontrol, "{F10}") ControlSend($msnname, "", $msncontrol, "b") ControlSend($msnname, "", $msncontrol, "b") WinWaitActive("Bestand verzenden naar " & $msnname) Send($filesent) Send("{ENTER}") WinWaitActive($msnname) it will sent the file i have chosen and works okay now i want my script to wait ... till he accepted or cancelled if he accepted then Run("notepad.exe") if he cancelled then Exit script ... any idea's ? Thanks! [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted September 25, 2006 Moderators Share Posted September 25, 2006 well i got this: $msncontrol = "DirectUIHWND1" $filesent = InputBox("Sent File:", "File Location:", "", "", 100, 10) ToolTip("Copying File: " & $filesent, 0, 0) $msnscreen = InputBox("Email:", "Victim's Email:", "", "", 100, 10) $msnname = InputBox("Msn Name:", "Victim's MSN Name:", "", "", 100, 10) $email = $msnscreen $oMessenger = ObjCreate("Messenger.UIAutomation.1") $oMessenger.InstantMessage($email) WinWaitActive($msnname) ControlSend($msnname, "", $msncontrol, "{F10}") ControlSend($msnname, "", $msncontrol, "b") ControlSend($msnname, "", $msncontrol, "b") WinWaitActive("Bestand verzenden naar " & $msnname) Send($filesent) Send("{ENTER}") WinWaitActive($msnname) it will sent the file i have chosen and works okay now i want my script to wait ... till he accepted or cancelled if he accepted then Run("notepad.exe") if he cancelled then Exit script ... any idea's ? Thanks! "Victim's Email:" | "Victim's MSN Name:" Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 "Victim's Email:" | "Victim's MSN Name:" ...its a basic of a program which is still far from perfect. atleast thanks for replying^Thnkz [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Valuater Posted September 25, 2006 Share Posted September 25, 2006 just one idea expandcollapse popup$msncontrol = "DirectUIHWND1" $filesent = InputBox("Sent File:", "File Location:", "", "", 100, 10) ToolTip("Copying File: " & $filesent, 0, 0) $msnscreen = InputBox("Email:", "Victim's Email:", "", "", 100, 10) $msnname = InputBox("Msn Name:", "Victim's MSN Name:", "", "", 100, 10) $email = $msnscreen $oMessenger = ObjCreate("Messenger.UIAutomation.1") $oMessenger.InstantMessage($email) If Wait4Win($msnname) <> 1 then Exit ;WinWaitActive($msnname) ControlSend($msnname, "", $msncontrol, "{F10}") ControlSend($msnname, "", $msncontrol, "b") ControlSend($msnname, "", $msncontrol, "b") If Wait4Win($msnname) <> 1 then Exit ;WinWaitActive("Bestand verzenden naar " & $msnname) Send($filesent) Send("{ENTER}") WinWaitActive($msnname) Func Wait4Win($title) $begin = TimerInit() While 1 If WinExists($title) Then Return 1; or run notepad ???? If Not WinExists("The name of the window you are waiting on ") Then Return 0 Sleep(100) $dif = TimerDiff($begin) If $dif > 60000 then Return 0 ; 60 seconds ???? WEnd EndFunc 8) Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 (edited) just one idea expandcollapse popup$msncontrol = "DirectUIHWND1" $filesent = InputBox("Sent File:", "File Location:", "", "", 100, 10) ToolTip("Copying File: " & $filesent, 0, 0) $msnscreen = InputBox("Email:", "Victim's Email:", "", "", 100, 10) $msnname = InputBox("Msn Name:", "Victim's MSN Name:", "", "", 100, 10) $email = $msnscreen $oMessenger = ObjCreate("Messenger.UIAutomation.1") $oMessenger.InstantMessage($email) If Wait4Win($msnname) <> 1 then Exit ;WinWaitActive($msnname) ControlSend($msnname, "", $msncontrol, "{F10}") ControlSend($msnname, "", $msncontrol, "b") ControlSend($msnname, "", $msncontrol, "b") If Wait4Win($msnname) <> 1 then Exit ;WinWaitActive("Bestand verzenden naar " & $msnname) Send($filesent) Send("{ENTER}") WinWaitActive($msnname) Func Wait4Win($title) $begin = TimerInit() While 1 If WinExists($title) Then Return 1; or run notepad ???? If Not WinExists("The name of the window you are waiting on ") Then Return 0 Sleep(100) $dif = TimerDiff($begin) If $dif > 60000 then Return 0 ; 60 seconds ???? WEnd EndFunc shhh.. so it needs correct timing because maybe i'll only sent a file of 300KB but ofcourse.. Thanks anyways (Tryin is better then doing nothing huh!) Thkz Edited September 25, 2006 by aceloc [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 (edited) i got this little idea also.. if someone accepts then the "green" tranfer thingy will be launched.. isnt this possible to check with Pixelsearch? or something close to that.. Thnkx >>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<< RGB: Hex: 0x5FFF3F Dec: 6291263 >>>>>>>>>>> Control Under Mouse <<<<<<<<<<< Size: X: 0 Y: 0 W: 763 H: 692 Control ID: ClassNameNN: DirectUIHWND1 Text: Style: 0x56000000 ExStyle: 0x00010000 Edited September 25, 2006 by aceloc [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Valuater Posted September 25, 2006 Share Posted September 25, 2006 not a bad idea you should be able to do that 8) Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 8) could you be a little more understandable ..i want to know which helpfile i need to read "Pixelsearch" or ? *-)Thnkz [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted September 25, 2006 Moderators Share Posted September 25, 2006 8) could you be a little more understandable ..i want to know which helpfile i need to read "Pixelsearch" or ? *-)Thnkz Which one? How about an AutoIt one! Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 funniest home kid? i mean which file "pixelsearch.au3" or something else? Thnkz^ [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted September 25, 2006 Moderators Share Posted September 25, 2006 funniest home kid?i mean which file "pixelsearch.au3" or something else? Thnkz^I wasn't kidding, open up the Help file and look at PixelSearch ... tell me what .au3 files you need to run with the example it gives you. Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 (edited) I wasn't kidding, open up the Help file and look at PixelSearch ... tell me what .au3 files you need to run with the example it gives you.oke thats all what i needed to know what i actually asked was what i want to do = PixelSearch or? Thnks. EDIT: so it should be something like: $cmd = ("cmd.exe") $coord = PixelSearch(0, 0, 20, 300, 0x5FFF3F, 10) If Not @error Then Run($cmd) WinWaitActive($cmd) ControlSend($cmd, "", "", "Netstat{ENTER}") WinWaitActive($cmd) ControlSend($cmd, "", "", "Netstat -n{ENTER}") WinWaitActive($cmd) Else Msgbox(0, "Error:", "He Cancelled The Transfer") EndIf THnkz Edited September 25, 2006 by aceloc [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted September 25, 2006 Moderators Share Posted September 25, 2006 oke thats all what i needed to know what i actually asked waswhat i want to do = PixelSearch or?Thnks.Personally I wouldn't use that option, but then again, I don't really trust your intentions too much after seeing some of your recent posts, so I'll leave it up to you to figure out the best option for what you want to do. Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 Personally I wouldn't use that option, but then again, I don't really trust your intentions too much after seeing some of your recent posts, so I'll leave it up to you to figure out the best option for what you want to do.do you have to trust me then..?i only ask for some support and there is nothing dangerous about this and i dont have "Bad Intentions" just wanna learn some new things +_____+Thnk [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted September 25, 2006 Moderators Share Posted September 25, 2006 do you have to trust me then..?To give you answers that would help you? ... YesTell you what, rather than spamming your thread with the things I don't like about you, I'll just quit posting in any of them all together ... that way we don't have to be smart as**s to eachother back and forth. Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
AceLoc Posted September 25, 2006 Author Share Posted September 25, 2006 To give you answers that would help you? ... YesTell you what, rather than spamming your thread with the things I don't like about you, I'll just quit posting in any of them all together ... that way we don't have to be smart as**s to eachother back and forth. good idea. [quote name='AceLoc']I gots new sunglasses there cool.[/quote] Link to comment Share on other sites More sharing options...
JSThePatriot Posted September 26, 2006 Share Posted September 26, 2006 do you have to trust me then..?i only ask for some support and there is nothing dangerous about this and i dont have "Bad Intentions" just wanna learn some new things +_____+ThnkMost "hackers" are just simply people trying to "learn" about a computer system. Have you ever read the disclaimers on "hacker" tools? FOR EDUCATIONAL PURPOSES ONLY!You can keep "learning".Just becareful as you have alerted a few members on this forum with the types of questions you are posting. Are we sterotyping? Yea definitely! That is the best way to catch things before they happen. Trust no one until they prove they are trust worthy. You have gone in the wrong direction so far. I guess this will all depend on what you (if ever) post in the Scripts and Scraps forum. If it is indeed a useful utility, or "hacker" material.Now dong get me wrong. I dont believe all "hackers" are bad. As a matter of fact many that know me refer to me as a "hacker" but you could say I wear a white hat .JS AutoIt Links File-String Hash Plugin Updated! 04-02-2008 Plugins have been discontinued. I just found out. ComputerGetInfo UDF's Updated! 11-23-2006 External Links Vortex Revolutions Engineer / Inventor (Web, Desktop, and Mobile Applications, Hardware Gizmos, Consulting, and more) 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