| Do you like this article? Please, rate it and write review! Rated: by Aspin.com users |
You can use two ways to manage windows 2003
pop3 service and it's email accounts. Microsoft has two basic ways to do it:
- using pop3 service snapin to mmc (p3server.msc) for interactive work
- using winpop.exe command line. The command line can be used to manage accounts from script, but you will have a lot of work with monitoring output, etc.
Better way is to use P3Admin.dll and it's programming interface. The DLL is not finished work (as you can see inside the DLL), but is is a better way for the task than command line.
You can manage the accounts locally or remotelly. You will need P3Admin.dll, P3Store.dll, Pop3Auth.dll, Pop3evt.dll, pop3perf.dll and pop3snap.dll DLLs (registerred using regsvr32)
Next function lets you add an user email account to windows 2003 pop3 service using script or other programming environment. The script bellow is written in VBA 6 (You can use it in Visual basic 6, Excel, Access, ...), you can simply modify the script for VB Script or VB.Net.
- using pop3 service snapin to mmc (p3server.msc) for interactive work
- using winpop.exe command line. The command line can be used to manage accounts from script, but you will have a lot of work with monitoring output, etc.
Better way is to use P3Admin.dll and it's programming interface. The DLL is not finished work (as you can see inside the DLL), but is is a better way for the task than command line.
You can manage the accounts locally or remotelly. You will need P3Admin.dll, P3Store.dll, Pop3Auth.dll, Pop3evt.dll, pop3perf.dll and pop3snap.dll DLLs (registerred using regsvr32)
Next function lets you add an user email account to windows 2003 pop3 service using script or other programming environment. The script bellow is written in VBA 6 (You can use it in Visual basic 6, Excel, Access, ...), you can simply modify the script for VB Script or VB.Net.
...
'next command creates 'franta@market.cz' pop3 account
' on 'hlavni' computer with '5koni' password.
AddPop3User "hlavni", "franta", "market.cz", "5koni"
...
'Adds an user account To a Windows 2003 POP3 service
'2005 Antonin Foller, http://tips.motobit.com
Public Function AddPop3User(MachineName As String, _
UserName As String, _
DomainName As String, _
Password As String) As P3ADMINLib.P3User
'get a configuration object.
Dim P3 As New P3ADMINLib.P3Config
'get the object from a VB Script/JScript
'Set P3 = CreateObject("P3Admin.P3Config")
'Connect To the remote computer.
If Len(MachineName) > 0 Then P3.MachineName = MachineName
Dim Domain As P3ADMINLib.P3Domain
Dim User As P3ADMINLib.P3User
'get the domain object
On Error Resume Next
Set Domain = P3.Domains.Item(DomainName)
If Err = &H80070003 Then
'The domain is registerred In SMTP
' but Not In POP3
ElseIf Err = &H8007054B Then
'the domain does Not exists. Create it.
On Error Resume Next
P3.Domains.Add DomainName
If Err <> 0 Then
'On Error GoTo 0
Err.Raise Err, , "Domain " & DomainName & " cannot be added."
End If
End If
'add a user account
On Error Resume Next
Domain.Users.AddEx UserName, Password
If Err = &H8007050 Then 'ERROR_FILE_EXISTS
'the user account already exists.
'do some action In this Case.
End If
'get the created user account
Set User = Domain.Users.Item(UserName)
Set AddPop3User = User
End Function
|
See also
for 'Add an email account to a windows 2003 pop3 service using script' article
Some support VBA functions for mailenable mail serverLets you create postoffice, mailboxes, logins, email adresses from VBA or VBScript.Check if a pop3 email account exists in a windows 2003 pop3 serviceLet's you check if a pop3 user email account exists in a windows 2003 pop3 service
Copyright and use this code
The source code on this page and other samples at http://www.motobit.com/tips/
are a free code, you can use it as you want: copy it, modify it, use it in your products, ...
If you use this code, please:
1. Leave the author note in the source.
or
2. Link this sample from you page.
<A Href="http://www.motobit.com/tips/detpg_add-pop3-user-account-windows/" Title="Let's you add pop3 user account to a windows 2003 pop3 service using script (VBScript) or Visual basic from WSH, ASP, office or ASP.Net." >Add an email account to a windows 2003 pop3 service using script</A>