Jump to content

DarkBlood

Members
  • Posts

    8
  • Joined

  • Last visited

Everything posted by DarkBlood

  1. How simple was the solution, now works perfectly without spamming the key, thank you KaFu.
  2. This script sends SPACE key when you press Middle Click of your mouse. The function "_IsPressed" dont work like "HotKeySet", you can easily send 5 spaces or more while you keep pressing Middle Click and I want to send only one time the space key, not spamming/looping it. #include <misc.au3> While 1 If _IsPressed(04) Then ;04 is Middle Click Send("{SPACE}") EndIf Sleep(10) WEnd
  3. I'm searching a way to make a script for a simple TELNET login in my router, it would send username and password then would send a command and finally close telnet session, ALL of that using only AutoIT and without user interaction (AUTOMATED & HIDED). If anyone wants to help me thanks in advance! ----- What I want to automate? This: (It's for reconnect to change IP, for the router of the ISP Arnet Discus DRG A112) Start Menu > Run..: telnet 10.0.0.2 Username: admin Password: alvlgeddl Command 1: ppp config 0.0.33 down Command 2: ppp config 0.0.33 up Command 3: logout ----- edit: I made it!! YEAH! works fine full-auto. But... have some problems because of my router, if session was not closed correctly or opens sessions too fast, it locks and not permit any more connections, even worse don't returns any error, just close your telnet session instantly after send "Start > Run..: telnet 10.0.0.2". TcpStartUp () $RouterIP = tcpconnect("10.0.0.2", "23") Do Sleep(100) Until $RouterIP <> "-1" While 1 Sleep(100) $TCPRecv = TCPRecv($RouterIP,"5000") ;~ ConsoleWrite($TCPRecv) ;for debug test ;~ MsgBox("","",$TCPRecv) ;for debug test If StringInStr($TCPRecv, "Login:") > 0 Then TCPSend($RouterIP, "admin" & @crlf) ElseIf StringInStr($TCPRecv, "Password:") > 0 Then TCPSend($RouterIP, "alvlgeddl" & @crlf) TCPSend($RouterIP, "ppp config 0.0.33 down" & @crlf) TCPSend($RouterIP, "ppp config 0.0.33 up" & @crlf) TCPSend($RouterIP, "logout" & @crlf) ElseIf StringInStr($TCPRecv, "have a nice day") > 0 Then ExitLoop EndIf WEnd TCPShutdown()
  4. Works perfect and makes SciTE fully-portable, thank you Danny35d!! >_< screenshot sample for newbies like me:
  5. Opt("SendKeyDelay",0) Opt("SendKeyDownDelay",0)
  6. oh my god! is very simple THANK YOU Larry !!!
  7. I want to do a script that when you hold down right click will be send U infinite times until you free the right click. how can autoit do to listening a mouseup or mousedown event? #include <Misc.au3> $dll = DllOpen("user32.dll") While 1 Sleep(100) If _IsPressed("02", $dll) Then ;right click = 02 While 1 Send("{u}") Wend Endif WEnd
  8. topic. I'm using autoit beta v3.2.1.2.
×
×
  • Create New...