Outlook 2003 account settings

[jjg]

Hi,

a few days ago i started to look for outlook account settings to automate a process ...

After spending hours on internet i didn't find anything (except backup restore)

What i found by looking to multiple computers is that and on Internet:

In the registry key HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676

There is Always the account Settings

In the value {ED475418-B0D6-11D2-8C3B-00104B2A6676} you can find the "Default" outlook account (the first 2 digits)

You can then parse the account and translate hexa values in a human readable format

here is my first script with this :-)

;Script starting

#include <String.au3>

$var1=RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676", "{ED475418-B0D6-11D2-8C3B-00104B2A6676}")

$var2=StringLeft ( $var1, 2)

; set default profile registry path

$var3="000000"&$var2

; read registry key & value "Email"

$var4=RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676\"&$var3, "Email")

$var5= StringRegExpReplace ($var4,"00","")

; convert hexa string to ascii

$var6= _HexToString ($var5)

$emailaddress=$var6

$Pop3Server=RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676\"&$var3, "POP3 Server")

$Pop3Server= StringRegExpReplace ($Pop3Server,"00","")

$Pop3Server= _HexToString ($Pop3Server)

$ImapServer=RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676\"&$var3, "IMAP Server")

$ImapServer= StringRegExpReplace ($ImapServer,"00","")

$ImapServer= _HexToString ($ImapServer)

If $Pop3Server = "" Then

$Pop3Server="Unused"

EndIf

If $ImapServer= "" Then

$ImapServer="Unused"

EndIf

MsgBox(0, "Account settings", $emailaddress & @CRLF & "POP3 Server =" & $Pop3Server & @CRLF & "Imap Server =" & $ImapServer)

;Script end

Please say me if it works for you !!

It seems to work fine on office 2007 settings ....

[t0nZ]

Hi, I am developing a system for remote manage outlook accounts.

My exact situation is over a hundred of remote clients, vista e xp home, all outlook 2003.

I have terminated a a part that downloads via FTP a file with the parameters of all my accounts, and I compare a file in my client to known the exact account I am working.

Now i was wondering how to manage the account (and the right account ..) and I was thinking of working on the windows...

but i found your script , and I ask to you if it's possible to acquire (and modify) all the parameters of the account, password too.

Greetings , Nicola.