Restricted Sites
Code:

	$RestSites =	'webshots.com','cometcursor.com','cometsystems.com','cometzone.com','hotbar.com','bonzi.com',
			'date-manager.com','doubleclick.com','doubleclick.net','ezula.com','lop.com','new.net','topmoxie.com',
			'gator.com','gatorcorporation.com','gatoradvertisinginformationnetwork.com','offercompanion.com',
			'mysearch.com','mysearchnow.com','mysearchstart.com','mywebsearch.com','precision-time.com','valueclick.com',
			'websearch.com','aol.com','aim.com','weatherbug.com','whenusearch.com','real.com','referralware.com'
	for each $Site in $RestSites 
		$=writevalue('hkcu\software\microsft\windows\currentversion\Internet Settings\ZoneMap\Domains\'+$site,'*',4,REG_DWORD)
		next


make the 4 in the writevalue statement into a 2 to make it trusted
_________________________
How to ask questions the smart way <-----------> Before you ask