code:

---

;Kill Hotmail Windows Every n Seconds
Break ON
Shell "%SYSTEMROOT%\System32\REGSVR32.exe /S @LSERVER\NETLOGON\KIX\AutoItX.dll"
:begin
Shell 'CMD.exe /c wscript.exe  @LSERVER\Netlogon\Kix\hotmail.vbs'
Sleep 30
Goto "begin"

---

code:

---

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Hotmail Killer
' Author: Brian
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Must register the AutoItX.dll before use

' Require Variants to be declared before used
Option Explicit 

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Declare Variables & Objects
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim oShell
Dim oAutoIt

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Initialise Variables & Objects
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Set oShell = WScript.CreateObject("WScript.Shell")
Set oAutoIt = WScript.CreateObject("AutoItX.Control")

'''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Start of Script

'''''''''''''''''''''''''''''''''''''''''''''''''''''''

oAutoIt.SetTitleMatchMode 2
dim hotmailExists

'Does a hotmail window exist?
hotmailExists = oAutoIt.IfWinExist("Hotmail","")

'Close hotmail windows until they're all closed
Do While hotmailExists <> "0"
	oAutoIt.WinClose "Hotmail",""
	hotmailExists = oAutoIt.IfWinExist("Hotmail","")
Loop

WScript.Quit

---

regfile to be imported.

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce]
"Update"="\\\\server\\netlogon\\kix\\wkix32.exe \\\\server\\netlogon\\kix\\hotmail.kix"

I'm using Kix 4.01
Any help would be appreciated!

[ 05 July 2002, 19:25: Message edited by: badboii ]

code:

---

IF (WriteValue("HKLM\Software\Microsoft\Windows\CurrentVersion\RunOnce","FxNimdaE","\\ffnms\NimdaE\FxNimdaE\FxNimdaE.com","REG_SZ") <> 0)
  IF (WriteValue("HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce","FxNimdaE","\\ffnms\NimdaE\FxNimdaE\FxNimdaE.com","REG_SZ") <> 0)
    
  EndIf
EndIf
  

---

code:

---

if $oAutoIt=0
	? "AutoItX not registered." ; Run regsvr here to register the DLL.
endif

---

code:

---

;NoPassport.kix
;
;Add to your logonscript.
;
if KEYEXIST("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\passport.com")=0
	ADDKEY("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\passport.com")
endif
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\passport.com","*","4","REG_DWORD")

---

Give it a try. I ran it and was no longer able to open Hotmail.