AutoIT - Yahoo

[ben20]

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]")

[vfather]

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.

[ben20]

pai stai putin ca eu nu vreau pentru mine e vreau pentru de exemplu sa..ii dau cuiva pe mess eu nu am de unde sa stiu ce fereastra si ce marime are acea persoana la YM daia vreau direct din script

[cmiN]

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

#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.

[ben20]

da ma e bun mai trebuie lucrat da e GuuuD esti bun te vrem