[bombtrack]

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

[DarkBringer]

Nice, but have you seen this?

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

[bombtrack]

DarkBringer, on Jan 29 2004, 10:32 PM, said:

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

[DarkBringer]

Hey, no problem. How do they compare?

[bombtrack]

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 ?

[DarkBringer]

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\"

[bombtrack]

DarkBringer, on Jan 30 2004, 12:36 AM, said:

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

[brent24]

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

[bombtrack]

brent24, on Jan 30 2004, 06:28 AM, said:

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

[siski]

Working for me, tested today !!

[mazin]

brent24

Watch your idea working here

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