#108040 - 2003-11-18 05:19 PM
Re: Email adress
|
Scooterboy
Lurker
Registered: 2003-03-13
Posts: 4
Loc: United Kingdom
|
The following is the code i use for my popmeail accounts and is based on the user login id/mail address being the same. OS = Win2k MailClient = Outlook2000
$maildomain = "@@thedomain.com" $pop = "mail" $smtp = "mailout" $rc = AddKey("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "Account Name", "@DOMAIN", "REG_SZ") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "Connection Type", "0", "REG_DWORD") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "POP3 Prompt for Password", "0", "REG_DWORD") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "POP3 Server", "$POP", "REG_SZ") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "POP3 Use Sicily", "0", "REG_DWORD") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "POP3 User Name", "@USERID", "REG_SZ") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "SMTP Display Name", "@FULLNAME", "REG_SZ") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "SMTP Email Address", "@USERID" + "$maildomain", "REG_SZ") $rc = WriteValue("HKCU\Software\Microsoft\Office\Outlook\OMI Account Manager\Accounts\00000001", "SMTP Server", "$SMTP", "REG_SZ") ; ; Set the email sending and retrieval options - Office2k ; $rc = WriteValue("HKCU\Software\Microsoft\Office\9.0\Outlook\Options\Mail", "Always hide dialog", "1", "REG_DWORD") $rc = WriteValue("HKCU\Software\Microsoft\Office\9.0\Outlook\Options\Mail", "Poll For Mail", "1", "REG_DWORD") $rc = WriteValue("HKCU\Software\Microsoft\Office\9.0\Outlook\Options\Mail", "Poll For Mail Interval", "5", "REG_DWORD") $rc = WriteValue("HKCU\Software\Microsoft\Office\9.0\Outlook\Options\Mail", "Send Mail Immediately", "1", "REG_DWORD") ;
_________________________
I came, I saw, I fell asleep  )
|
|
Top
|
|
|
|
Moderator: Jochen, Allen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Arend_, Mart
|
0 registered
and 1452 anonymous users online.
|
|
|