"HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News")
EndIf
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "Accounts Checked", "00 00 00 00", "REG_BINARY")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "New group notification", "0", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "News Dialog Position", "2c 00 00 00 00 00 00 00 01
00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 84 00 00 00 60
00 00 00 f3 02 00 00 e2 01 00 00", "REG_BINARY")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "Show Header Info", "1", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "ShowHybridView", "1", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "SplitDir", "0", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "SplitHorzPct", "50", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\News", "SplitVertPct", "50", "REG_DWORD")
; Rules
$RC =
ExistKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Rules")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Rules")
EndIf
; Rules\Mail
$RC =
ExistKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Rules\Mail")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Rules\Mail")
EndIf
; Trident
$RC =
ExistKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Trident")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Trident")
EndIf
; Trident\Main
$RC =
ExistKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Trident\Main")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Trident\Main")
EndIf
; Trident\Settings
$RC =
ExistKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Trident\Settings")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Identities\"+$identity+"Software\Microsoft\Outlook
Express\5.0\Trident\Settings")
EndIf
; Internet Account Manager settings
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager", "Account Name", "2", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager", "Default Mail Account", "0001", "REG_SZ")
$RC = ExistKey("HKEY_CURRENT_USER\Software\Microsoft\Internet
Account Manager\Accounts")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts")
EndIf
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts", "ConnectionSettingsMigrated", "1", "REG_DWORD")
$RC = ExistKey("HKEY_CURRENT_USER\Software\Microsoft\Internet
Account Manager\Accounts\0001")
If $RC <> 0
AddKey("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts\0001")
EndIf
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts\0001", "Account Name", "imap.cybersmart.co.za",
"REG_SZ")
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts\0001", "Connection Type", "3", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts\0001", "IMAP Dirty", "0", "REG_DWORD")
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Account
Manager\Accounts\0001", "IMAP Poll