Jump to content
ben20

AutoIT - Yahoo

Recommended Posts

Am si io o problema incerc sa fac un script

WinWaitActive('[TITLE:Yahoo! Messenger with Voice; CLASS:YClickieButton; INSTANCE:6]')

ControlClick("Yahoo! Messenger with Voice", "", "[iD:60325]")

numai ca nu functioneaza nu vrea sa-mi dea click sau enter pe 60325 = Add Contact de ce oare ?

sau asa

WinWaitActive('Yahoo! Messenger with Voice')

ControlClick("Yahoo! Messenger with Voice", "", "[iD:60325]")

Link to comment
Share on other sites

WinWaitActive("Yahoo! Messenger with Voice")
MouseClick("left", 0, 500, 2)

unde "left" reprezinta click stanga, 0,500 coordonatele, si 2 cat de repede sa mute cursorul.

ca as obtii coordonatele modifica din help fileu autoitului MouseGetPost.AU3, adaugi un Sleep de cate secunde crezi ca ai nevoie pana pozitionezi cursoru.

Link to comment
Share on other sites

Uite aici un script facut dupa ce ti-am citit postul

Are mai multe optiuni ... in caz de ai messul inchis ... bagi undeva intr-un inputbox id si restu face el :X

#cs
bagi id -> din comenzi ai id-ul bagat in lista -> v9
#ce

Opt('TrayIconHide', 1)
Opt('MustDeclareVars', 1)
Global $input1, $handle, $title
Dim $ans


Func start()
$title='Add to Messenger List'
$handle='Yahoo! Messenger'
If Not ProcessExists('YAHOOM~1.EXE') or ProcessExists('YahooMessenger.exe') or ProcessExists('Ymsgr_tray.exe') Then
$ans=MsgBox(1, 'Bye', 'Nu ai messul deschis! Ti-l deschid eu ?')
If $ans==2 Then
Exit
Else
Run(@ProgramFilesDir & '\Yahoo!\Messenger\YahooMessenger.exe')
start()
EndIf
Else
WinWait($handle)
WinActivate($handle)
WinWaitActive($handle)
If WinActive($handle, 'Forgot your password?') Then
$ans=MsgBox(3, 'Login', 'Vrei sa te si loghez =] ?')
If $ans==2 Then
Exit
ElseIf $ans==7 Then
Sleep(3000)
start()
Else
ControlClick($handle, '', '[CLASS:Button; INSTANCE:4]')
Sleep(3000)
start()
EndIf
Else
$input1=InputBox('Yahoo!', 'Scrie id !')
If $input1=='' Then
MsgBox(0, 'Bye', 'Chiar nu-ti place sa bagi un id cu script-ul asta ;( ?')
Else
WinActivate($handle)
WinWaitActive($handle)
Send('^+a')
WinActivate($title)
Send($input1 & '!n' & '!n')
Sleep(50)
WinActivate($title)
ControlClick($title, '', '[CLASS:Button; INSTANCE:4]')
EndIf
EndIf
EndIf
EndFunc

start()

EDIT: Uitasem de un winactivate pe undeva ... acuma merge brici.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
×
  • Create New...