Hey Redback,

i'm trying to implement your part of the script, that should generate a graphical progress of the logon. However... Me being a novice at Kixtart and all... can't figure out, how to make it work.

Below is the how I tried to test it. But the result is, that the (dos)box opens a fraction of a second and then closing it again, not doing anything. Could you please shed some light on this for me?

By the way... is there loss of perfomance, when using the Kix GUI? I ask this question because we have a few dial in users also.

Thanx in advance.

Brian

code:
SetConsole ("maximize") 	
   ;Setup the GUI	
	$Form = CreateObject("Kixtart.Form")	
	$form.text = "Logon In Progress....."	
	$Form.Size = 300,400	
	$form.backcolor = 255,255,255	
	$Form.Center	
	$pbar = $Form.progressbar	
	$pbar.width = 240	
	$pbar.height = 10	
	$pbar.min = 0	
	$pbar.max = 20	
	$pbar.center	
	$pbar.top = 350	
	$pbar.borderstyle = 0	
	$logo = $form.image(login.bmp)	
	$logo.center	
	$logo.top = 15	
	$logo.borderstyle = 0	
	$text = $form.textbox	
	$text.locked = 1	
	$text.width = 240	
	$text.height = 20	
	$text.center	
	$text.top = 320	
	$text.value = HELLO!	
	$form.show

$pbar.value = 0
$text.value = "Starting Logon Progess"	
Sleep 1
$pbar.value = 1
$text.value = "Copying files to Local"
Select
	CASE @INWIN = ("1") ;Windows NT
		If exist (@LDRIVE + "\lmhosts.")
			copy @LDRIVE + "\lmhosts." %systemroot%\system32\drivers\etc
		EndIf
		If exist (@LDRIVE + "\hosts.")
			copy @LDRIVE + "\hosts." %systemroot%\system32\drivers\etc
		EndIf
		If exist (@LDRIVE + "\services.")
			copy @LDRIVE + "\services." %systemroot%\system32\drivers\etc
		EndIf
		If exist ("%systemroot%\system32\nbtstat.exe")
			run "%systemroot%\system32\nbtstat -R"
			"" ?
		EndIf
	CASE @INWIN = ("2") ;Windows 9x
		If exist (%LSERVER%\netlogon\lmhosts.)
			copy %LSERVER%\netlogon\lmhosts. %windir%
		EndIf
		If exist (%LSERVER%\netlogon\hosts.)
			copy %LSERVER%\netlogon\hosts. %windir%
		EndIf
		If exist (%LSERVER%\netlogon\services.)
			copy %LSERVER%\netlogon\services. %windir%
		EndIf
		If exist ("%windir%\nbtstat.exe")
			run "%windir%\nbtstat -R"
		"" ?
		EndIf
EndSelect
$pbar.value = 2
$text.value = "Mapping the Drives"
use n: /d
use n: "\\nlwl10\stahl"
use o: /d
use o: "\\%USERSERVER%\@userid$"
use p: /d
use p: \\%USERSERVER%\data
use q: /d
use q: "\\%USERSERVER%\%DEPARTMENT%dat"
use s: /d
use s: \\%USERSERVER%\mtapps
use t: /d
use t: \\%USERSERVER%\siteapps

$pbar.value = 3
$text.value = "Unassociating .vbs/.js and .wsh extensions "
$res = DELTREE ("HKEY_CLASSES_ROOT\JSFile\Shell")
$res = DELTREE ("HKEY_CLASSES_ROOT\VBSFile\Shell")
$res = DELTREE ("HKEY_CLASSES_ROOT\WSHFile\Shell")
$res = DELTREE ("HKEY_CLASSES_ROOT\Microsoft Internet Mail Message\Shell")
$res = DELTREE ("HKEY_CLASSES_ROOT\Microsoft Internet News Message\Shell")

$pbar.value = 4
$text.value = "Logon Script Complete"
Sleep 1
_________________________
Rodney Dangerfield: “My mother didn't breast-feed me. She said she liked me as a friend.”