Jump to content

Welcome to MSFN Forum
Register now to gain access to all of our features. Once registered and logged in, you will be able to create topics, post replies to existing threads, give reputation to your fellow members, get your own private messenger, post status updates, manage your profile and so much more. This message will be removed once you have signed in.
Login to Account Create an Account


Photo

AD-Aware 6 PRO

- - - - -

  • Please log in to reply
10 replies to this topic

#1
bombtrack

bombtrack

    boooom

  • Member
  • PipPip
  • 161 posts
  • Joined 02-January 04
for anybody who needs it :)

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "DONT PRESS ANY KEY OR MOVE THE MOUSE!!!",5," - Warning - ",48
WshShell.Run ("SETUP.EXE /S")
WScript.Sleep 5000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "X"
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}"
WScript.Quit

replace the X's with your serial number and setup.exe to your ad-aware instalation filename
Posted Image


How to remove advertisement from MSFN

#2
DarkBringer

DarkBringer

    Member

  • Member
  • PipPip
  • 219 posts
  • Joined 06-August 03
  • OS:none specified
  • Country: Country Flag
Nice, but have you seen this?

http://www.MSFN.org/...showtopic=11776
If a man speaks in a forest, and no woman is there to hear him, is he still wrong?

#3
bombtrack

bombtrack

    boooom

  • Member
  • PipPip
  • 161 posts
  • Joined 02-January 04

Nice, but have you seen this?

http://www.MSFN.org/...showtopic=11776

nope didnt find, used the forum search to, guess i didnt search good enough, oh well :)
Posted Image

#4
DarkBringer

DarkBringer

    Member

  • Member
  • PipPip
  • 219 posts
  • Joined 06-August 03
  • OS:none specified
  • Country: Country Flag
Hey, no problem. How do they compare?
If a man speaks in a forest, and no woman is there to hear him, is he still wrong?

#5
bombtrack

bombtrack

    boooom

  • Member
  • PipPip
  • 161 posts
  • Joined 02-January 04
other vbs that i couldnt has the differences:
time to wait until serial is entered: WScript.Sleep 8000
he sends all keys for the serial at once WshShell.SendKeys "xxxxxxx"
time to wait until pressing enter after serial is written: WScript.Sleep 2000

thats the only real difference. i didnt know that all keys can be written at once for the serial.

changed my vbs, guess this is the fastest way for it to work

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "DONT PRESS ANY KEY OR MOVE THE MOUSE!!!",5," - Warning - ",48
WshShell.Run ("SETUP.EXE /S")
WScript.Sleep 5000
WshShell.SendKeys "YOUR_SERIAL_HERE"
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}"
WScript.Quit

found this here on MSFN with the difference that it copys the reflist.ref to the ad aware dir

Set WshShell = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
WshShell.Popup "Do NOT MOVE the mouse an do NOT PRESS any button!",5," - Warning - ",48
...
...
...
'Copy the newest reflist.ref to the ad-aware folder overwrite the old one
'you have to check the path !
Set refl = fso.GetFile("%systemdrive%\Apps\reflist.ref")
refl.Copy ("%programfiles%\Lavasoft\Ad-aware 6\reflist.ref")
Wscript.Quit

but the it didnt copy the file when i tried it, anybody have an idea ?
Posted Image

#6
DarkBringer

DarkBringer

    Member

  • Member
  • PipPip
  • 219 posts
  • Joined 06-August 03
  • OS:none specified
  • Country: Country Flag
Yeah, that doesn't work for me too so I do it from a batch file with the syntax.....

echo  Copying Adaware 6 Reference List
copy /Y "%systemdrive%\Install\Apps\Adaware\reflist.ref" "%programfiles%\Lavasoft\Ad-aware 6\"

If a man speaks in a forest, and no woman is there to hear him, is he still wrong?

#7
bombtrack

bombtrack

    boooom

  • Member
  • PipPip
  • 161 posts
  • Joined 02-January 04

Yeah, that doesn't work for me too so I do it from a batch file with the syntax.....

echo  Copying Adaware 6 Reference List
copy /Y "%systemdrive%\Install\Apps\Adaware\reflist.ref" "%programfiles%\Lavasoft\Ad-aware 6\"

the way i was doing it now :)
Posted Image

#8
brent24

brent24

    Script kiddie

  • Member
  • Pip
  • 97 posts
  • Joined 14-December 03
The most effective way to install adaware with a script is below. You can move your mouse, hit any key you want, take the focus off the window. No matter what this script won't break. The other scripts rely on perfect timing to send the password to the window and hit enter. Then if that doesn't work for some weird unknown reason (i've seen it happen), your screwed.

function getWin(win, inc)
	{
	var cntr = 0;
	while (!WshShell.AppActivate(win))
  {
  if (cntr==12) return true;
  cntr++;
  WScript.Sleep(inc);
  }
	return true;
	}
var WshShell = new ActiveXObject("WScript.Shell");
var oExec = WshShell.Exec("aaw6181.exe /s");
while (oExec.Status == 0)
	{
	getWin("Password", 5000);
	WshShell.SendKeys ("1111111~");
	WScript.Sleep(500);
	}
WScript.quit();

Just replace the 1's and the setup filename with your password and filename.

[EDIT] One more note. It's a jscript so DONT name it .vbs use .js
They call me ... [root].

#9
bombtrack

bombtrack

    boooom

  • Member
  • PipPip
  • 161 posts
  • Joined 02-January 04

The most effective way to install adaware with a script is below.  You can move your mouse, hit any key you want, take the focus off the window.  No matter what this script won't break.  The other scripts rely on perfect timing to send the password to the window and hit enter.  Then if that doesn't work for some weird unknown reason (i've seen it happen), your screwed.

function getWin(win, inc)
	{
	var cntr = 0;
	while (!WshShell.AppActivate(win))
  {
  if (cntr==12) return true;
  cntr++;
  WScript.Sleep(inc);
  }
	return true;
	}
var WshShell = new ActiveXObject("WScript.Shell");
var oExec = WshShell.Exec("aaw6181.exe /s");
while (oExec.Status == 0)
	{
	getWin("Password", 5000);
	WshShell.SendKeys ("1111111~");
	WScript.Sleep(500);
	}
WScript.quit();

Just replace the 1's and the setup filename with your password and filename.

[EDIT] One more note.  It's a jscript so DONT name it .vbs  use .js

neeeeeato ! thx
Posted Image

#10
siski

siski
  • Member
  • 4 posts
  • Joined 14-January 04
Working for me, tested today !!

#11
mazin

mazin

    MSFN Addict

  • MSFN Sponsor
  • 1,952 posts
  • Joined 12-January 04
brent24

Watch your idea working here

http://www.msfn.org/...showtopic=16094
Posted Image




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users



How to remove advertisement from MSFN