code:

---

		; ****************************** Configure Outlook ********************************
		$MsgKey = "$HKCUSMWNTCV\Windows Messaging Subsystem\Profiles"
		$MProfile = ReadValue($MsgKey, "DefaultProfile")	;Read the current default profile
		IF $MProfile = "" and $ostype="WinNT"			;If there is not default profile, create the profile using the PRF
			$ExFileLoc = "c:"				;Location to copy temp file to
			$copysource = "$logon\newprof.prf"		;name of the template prf
			$File = "$ExFileLoc\newprof.PRF" 		;Custom profile filename
			$exserver = "areamail" 				;name of mailserver
			DEL "$File"					;Deletes any existing PRF file
			COPY "$copysource" "$exfileloc" 		;Copies baseline PRF file to c:
			$section = "General" 
			$ = WRITEPROFILESTRING ($FILE, $section, "Custom", "1")
			$ = WRITEPROFILESTRING ($FILE, $section, "ProfileName", "@UserID")
			$ = WRITEPROFILESTRING ($FILE, $section, "DefaultProfile", "Yes")
			$ = WRITEPROFILESTRING ($FILE, $section, "OverwriteProfile", "No")
			$ = WRITEPROFILESTRING ($FILE, $section, "DefaultStore", "Service2")
			$section = "Service List" 
			$ = WRITEPROFILESTRING ($FILE, $section, "Service1", "Microsoft Outlook Client")
			$ = WRITEPROFILESTRING ($FILE, $section, "Service2", "Microsoft Exchange Server")
			$ = WRITEPROFILESTRING ($FILE, $section, "Service3", "Outlook Address Book")
			$section = "Service2" 
			$ = WRITEPROFILESTRING ($FILE, $section, "HomeServer", "$exserver")
			$ = WRITEPROFILESTRING ($FILE, $section, "MailBoxName", "@userid")
			$ = WRITEPROFILESTRING ($FILE, $section, "OfflineAddressBookPath", "%userprofile%\Local Settings\Application Data\Microsoft\Outlook")
			$section = "Service3"
			$ = WRITEPROFILESTRING ($FILE, $section, "Ben", "True")
			$section = "Service4" 
			$ = WRITEPROFILESTRING ($FILE, $section, "Ben", "True")
			? "		Creating New Outlook Profile..."
			SHELL "$logon\newprof.exe -P $File -x"		;Creates the Messaging profile
			DEL "$File" 					;Delete temp file
			ENDIF

---