You are here:
ActiveXperts.com > ActiveXperts Network Monitor > WindowsManagement > Scripts > IIS > IIS 6.x > POP3
Quicklinks
You can use any of the VBScript programs below in ActiveXperts Network Monitor. Click here for an explanation about how to include scripts in ActiveXperts Network Monitor.
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3Sessions")
For Each objItem in colItems
Wscript.Echo "Name: " & objItem.Name
Next
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3Service")
For Each objItem in colItems
Wscript.Echo "Accept Pause: " & objItem.AcceptPause
Wscript.Echo "Accept Stop: " & objItem.AcceptStop
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CheckPoint: " & objItem.CheckPoint
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Desktop Interact: " & _
objItem.DesktopInteract
Wscript.Echo "Display Name: " & objItem.DisplayName
Wscript.Echo "Error Control: " & objItem.ErrorControl
Wscript.Echo "Exit Code: " & objItem.ExitCode
Wscript.Echo "Installation Date: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Path Name: " & objItem.PathName
For Each strSource in objItem.Pop3RoutingSources
Wscript.Echo "Pop3 Routing Sources: " & strSource
Next
Wscript.Echo "Pop3 Service Version: " & _
objItem.Pop3ServiceVersion
Wscript.Echo "ProcessId: " & objItem.ProcessId
Wscript.Echo "Service Specific Exit Code: " & _
objItem.ServiceSpecificExitCode
Wscript.Echo "Service Type: " & objItem.ServiceType
Wscript.Echo "Started: " & objItem.Started
Wscript.Echo "Start Mode: " & objItem.StartMode
Wscript.Echo "Start Name: " & objItem.StartName
Wscript.Echo "State: " & objItem.State
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "Tag Id: " & objItem.TagId
Wscript.Echo "Wait Hint: " & objItem.WaitHint
Next
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3Server")
For Each objItem in colItems
Wscript.Echo "Name: " & objItem.Name
For Each strSource in objItem.Pop3RoutingSources
Wscript.Echo "Pop3 Routing Sources: " & strSource
Next
Wscript.Echo "Pop3 Service Version: " & _
objItem.Pop3ServiceVersion
Wscript.Echo "Server State: " & objItem.ServerState
Next
strComputer = "LocalHost"
Set objIIS = GetObject("IIS://" & strComputer & "/POP3SVC/1")
Wscript.Echo "Access Execute: " & objIIS.AccessExecute
Wscript.Echo "Access Flags: " & objIIS.AccessFlags
Wscript.Echo "Access No Physical Directory: " & _
objIIS.AccessNoPhysicalDir
Wscript.Echo "Access No Remote Execute: " & _
objIIS.AccessNoRemoteExecute
Wscript.Echo "Access No Remote Read: " & objIIS.AccessNoRemoteRead
Wscript.Echo "Access No Remote Script: " & _
objIIS.AccessNoRemoteScript
Wscript.Echo "Access No Remote Write: " & objIIS.AccessNoRemoteWrite
Wscript.Echo "Access Read: " & objIIS.AccessRead
Wscript.Echo "Access Script: " & objIIS.AccessScript
Wscript.Echo "Access Source: " & objIIS.AccessSource
Wscript.Echo "Access SSL: " & objIIS.AccessSSL
Wscript.Echo "Access SSL 128: " & objIIS.AccessSSL128
Wscript.Echo "Access SSL Flags: " & objIIS.AccessSSLFlags
Wscript.Echo "Access SSL Map Certificate: " & objIIS.AccessSSLMapCert
Wscript.Echo "Access SSL Negotiate Certificate: " & _
objIIS.AccessSSLNegotiateCert
Wscript.Echo "Access SSL Require Certifcate: " & _
objIIS.AccessSSLRequireCert
Wscript.Echo "Access Write: " & objIIS.AccessWrite
For Each strACL in objIIS.AdminACLBin
Wscript.Echo "Admin ACL Bin: " & strACL
Next
Wscript.Echo "Authentication Anonymous: " & objIIS.AuthAnonymous
Wscript.Echo "Authentication Basic: " & objIIS.AuthBasic
Wscript.Echo "Authentication Flags: " & objIIS.AuthFlags
Wscript.Echo "Authentication MD5: " & objIIS.AuthMD5
Wscript.Echo "Authentication NTLM: " & objIIS.AuthNTLM
Wscript.Echo "Authentication Passport: " & objIIS.AuthPassport
Wscript.Echo "Az Enable: " & objIIS.AzEnable
Wscript.Echo "Az Scope Name: " & objIIS.AzScopeName
Wscript.Echo "Az Store Name: " & objIIS.AzStoreName
Wscript.Echo "ConnectionT imeout: " & objIIS.ConnectionTimeout
Wscript.Echo "Default Logon Domain: " & objIIS.DefaultLogonDomain
Wscript.Echo "Don't Log: " & objIIS.DontLog
Wscript.Echo "Log Ext File Bytes Received: " & _
objIIS.LogExtFileBytesRecv
Wscript.Echo "Log Ext File Bytes Sent: " & objIIS.LogExtFileBytesSent
Wscript.Echo "Log Ext File Client IP: " & objIIS.LogExtFileClientIp
Wscript.Echo "Log Ext File Computer Name: " & _
objIIS.LogExtFileComputerName
Wscript.Echo "Log Ext File Cookie: " & objIIS.LogExtFileCookie
Wscript.Echo "Log Ext File Date: " & objIIS.LogExtFileDate
Wscript.Echo "Log Ext File Flags: " & objIIS.LogExtFileFlags
Wscript.Echo "Log Ext File Host: " & objIIS.LogExtFileHost
Wscript.Echo "Log Ext File Http Status: " & _
objIIS.LogExtFileHttpStatus
Wscript.Echo "Log Ext File Http SubStatus: " & _
objIIS.LogExtFileHttpSubStatus
Wscript.Echo "Log Ext File Method: " & objIIS.LogExtFileMethod
Wscript.Echo "Log Ext File Protocol Version: " & _
objIIS.LogExtFileProtocolVersion
Wscript.Echo "Log Ext File Referer: " & objIIS.LogExtFileReferer
Wscript.Echo "Log Ext File Server IP: " & objIIS.LogExtFileServerIp
Wscript.Echo "Log Ext File Server Port: " & objIIS.LogExtFileServerPort
Wscript.Echo "Log Ext File Site Name: " & objIIS.LogExtFileSiteName
Wscript.Echo "Log Ext File Time: " & objIIS.LogExtFileTime
Wscript.Echo "Log Ext File Time Taken: " & objIIS.LogExtFileTimeTaken
Wscript.Echo "Log Ext File URI Query: " & objIIS.LogExtFileUriQuery
Wscript.Echo "Log Ext File URI Stem: " & objIIS.LogExtFileUriStem
Wscript.Echo "Log Ext File User Agent: " & objIIS.LogExtFileUserAgent
Wscript.Echo "Log Ext File User Name: " & objIIS.LogExtFileUserName
Wscript.Echo "Log Ext File Win32 Status: " & _
objIIS.LogExtFileWin32Status
Wscript.Echo "Log File Directory: " & objIIS.LogFileDirectory
Wscript.Echo "Log File Period: " & objIIS.LogFilePeriod
Wscript.Echo "Log File Truncate Size: " & objIIS.LogFileTruncateSize
Wscript.Echo "Log Odbc Data Source: " & objIIS.LogOdbcDataSource
Wscript.Echo "Log Odbc Password: " & objIIS.LogOdbcPassword
Wscript.Echo "Log Odbc Table Name: " & objIIS.LogOdbcTableName
Wscript.Echo "Log Odbc User Name: " & objIIS.LogOdbcUserName
Wscript.Echo "Log Plugin Clsid: " & objIIS.LogPluginClsid
Wscript.Echo "Log Type: " & objIIS.LogType
Wscript.Echo "Maximum Bandwidth: " & objIIS.MaxBandwidth
Wscript.Echo "Maximum Connections: " & objIIS.MaxConnections
Wscript.Echo "Maximum Endpoint Connections: " & _
objIIS.MaxEndpointConnections
Wscript.Echo "Name: " & objIIS.Name
Wscript.Echo "NT Authentication Providers: " & _
objIIS.NTAuthenticationProviders
Wscript.Echo "Pop3 Clear Text Provider: " & _
objIIS.Pop3ClearTextProvider
Wscript.Echo "Pop3 Default Domain: " & objIIS.Pop3DefaultDomain
Wscript.Echo "Pop3 Expire Delay: " & objIIS.Pop3ExpireDelay
Wscript.Echo "Pop3 Expire Mail: " & objIIS.Pop3ExpireMail
Wscript.Echo "Pop3 Expire Start: " & objIIS.Pop3ExpireStart
Wscript.Echo "Pop3 Mail Expiration Time: " & _
objIIS.Pop3MailExpirationTime
Wscript.Echo "Pop3 Routing Dll: " & objIIS.Pop3RoutingDll
For Each strBinding in objIIS.SecureBindings
Wscript.Echo "Secure Bindings: " & strBinding
Next
Wscript.Echo "Server AutoStart: " & objIIS.ServerAutoStart
For Each strBinding in objIIS.ServerBindings
Wscript.Echo "Server Bindings: " & strBinding
Next
Wscript.Echo "Server Comment: " & objIIS.ServerComment
Wscript.Echo "Server Listen Backlog: " & _
objIIS.ServerListenBacklog
Wscript.Echo "Server Listen Timeout: " & _
objIIS.ServerListenTimeout
Wscript.Echo "Win32 Error: " & objIIS.Win32Error
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3ServerSetting")
For Each objItem in colItems
Wscript.Echo "Access Execute: " & objItem.AccessExecute
Wscript.Echo "Access Flags: " & objItem.AccessFlags
Wscript.Echo "Access No Physical Directory: " & _
objItem.AccessNoPhysicalDir
Wscript.Echo "Access No Remote Execute: " & _
objItem.AccessNoRemoteExecute
Wscript.Echo "Access No Remote Read: " & _
objItem.AccessNoRemoteRead
Wscript.Echo "Access No Remote Script: " & _
objItem.AccessNoRemoteScript
Wscript.Echo "Access No Remote Write: " & _
objItem.AccessNoRemoteWrite
Wscript.Echo "Access Read: " & objItem.AccessRead
Wscript.Echo "Access Script: " & objItem.AccessScript
Wscript.Echo "Access Source: " & objItem.AccessSource
Wscript.Echo "Access SSL: " & objItem.AccessSSL
Wscript.Echo "Access SSL 128: " & objItem.AccessSSL128
Wscript.Echo "Access SSL Flags: " & objItem.AccessSSLFlags
Wscript.Echo "Access SSL Map Certificate: " & _
objItem.AccessSSLMapCert
Wscript.Echo "Access SSL Negotiate Certificate: " & _
objItem.AccessSSLNegotiateCert
Wscript.Echo "Access SSL Require Certifcate: " & _
objItem.AccessSSLRequireCert
Wscript.Echo "Access Write: " & objItem.AccessWrite
Wscript.Echo "Admin ACL Bin: " & objItem.AdminACLBin
Wscript.Echo "Authentication Anonymous: " & _
objItem.AuthAnonymous
Wscript.Echo "Authentication Basic: " & objItem.AuthBasic
Wscript.Echo "Authentication Flags: " & objItem.AuthFlags
Wscript.Echo "Authentication MD5: " & objItem.AuthMD5
Wscript.Echo "Authentication NTLM: " & objItem.AuthNTLM
Wscript.Echo "Authentication Passport: " & _
objItem.AuthPassport
Wscript.Echo "Az Enable: " & objItem.AzEnable
Wscript.Echo "Az Scope Name: " & objItem.AzScopeName
Wscript.Echo "Az Store Name: " & objItem.AzStoreName
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "ConnectionT imeout: " & _
objItem.ConnectionTimeout
Wscript.Echo "Default Logon Domain: " & _
objItem.DefaultLogonDomain
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Don't Log: " & objItem.DontLog
Wscript.Echo "Log Ext File Bytes Received: " & _
objItem.LogExtFileBytesRecv
Wscript.Echo "Log Ext File Bytes Sent: " & _
objItem.LogExtFileBytesSent
Wscript.Echo "Log Ext File Client IP: " & _
objItem.LogExtFileClientIp
Wscript.Echo "Log Ext File Computer Name: " & _
objItem.LogExtFileComputerName
Wscript.Echo "Log Ext File Cookie: " & _
objItem.LogExtFileCookie
Wscript.Echo "Log Ext File Date: " & objItem.LogExtFileDate
Wscript.Echo "Log Ext File Flags: " & objItem.LogExtFileFlags
Wscript.Echo "Log Ext File Host: " & objItem.LogExtFileHost
Wscript.Echo "Log Ext File Http Status: " & _
objItem.LogExtFileHttpStatus
Wscript.Echo "Log Ext File Http SubStatus: " & _
objItem.LogExtFileHttpSubStatus
Wscript.Echo "Log Ext File Method: " & _
objItem.LogExtFileMethod
Wscript.Echo "Log Ext File Protocol Version: " & _
objItem.LogExtFileProtocolVersion
Wscript.Echo "Log Ext File Referer: " & _
objItem.LogExtFileReferer
Wscript.Echo "Log Ext File Server IP: " & _
objItem.LogExtFileServerIp
Wscript.Echo "Log Ext File Server Port: " & _
objItem.LogExtFileServerPort
Wscript.Echo "Log Ext File Site Name: " & _
objItem.LogExtFileSiteName
Wscript.Echo "Log Ext File Time: " & objItem.LogExtFileTime
Wscript.Echo "Log Ext File Time Taken: " & _
objItem.LogExtFileTimeTaken
Wscript.Echo "Log Ext File URI Query: " & _
objItem.LogExtFileUriQuery
Wscript.Echo "Log Ext File URI Stem: " & _
objItem.LogExtFileUriStem
Wscript.Echo "Log Ext File User Agent: " & _
objItem.LogExtFileUserAgent
Wscript.Echo "Log Ext File User Name: " & _
objItem.LogExtFileUserName
Wscript.Echo "Log Ext File Win32 Status: " & _
objItem.LogExtFileWin32Status
Wscript.Echo "Log File Directory: " & objItem.LogFileDirectory
Wscript.Echo "Log File Period: " & objItem.LogFilePeriod
Wscript.Echo "Log File Truncate Size: " & _
objItem.LogFileTruncateSize
Wscript.Echo "Log Odbc Data Source: " & _
objItem.LogOdbcDataSource
Wscript.Echo "Log Odbc Password: " & objItem.LogOdbcPassword
Wscript.Echo "Log Odbc Table Name: " & objItem.LogOdbcTableName
Wscript.Echo "Log Odbc User Name: " & objItem.LogOdbcUserName
Wscript.Echo "Log Plugin Clsid: " & objItem.LogPluginClsid
Wscript.Echo "Log Type: " & objItem.LogType
Wscript.Echo "Maximum Bandwidth: " & objItem.MaxBandwidth
Wscript.Echo "Maximum Connections: " & objItem.MaxConnections
Wscript.Echo "Maximum Endpoint Connections: " & _
objItem.MaxEndpointConnections
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NT Authentication Providers: " & _
objItem.NTAuthenticationProviders
Wscript.Echo "Pop3 Clear Text Provider: " & o_
bjItem.Pop3ClearTextProvider
Wscript.Echo "Pop3 Default Domain: " & objItem.Pop3DefaultDomain
Wscript.Echo "Pop3 Expire Delay: " & objItem.Pop3ExpireDelay
Wscript.Echo "Pop3 Expire Mail: " & objItem.Pop3ExpireMail
Wscript.Echo "Pop3 Expire Start: " & objItem.Pop3ExpireStart
Wscript.Echo "Pop3 Mail Expiration Time: " & _
objItem.Pop3MailExpirationTime
Wscript.Echo "Pop3 Routing Dll: " & objItem.Pop3RoutingDll
Wscript.Echo "Server AutoStart: " & objItem.ServerAutoStart
Wscript.Echo "Server Comment: " & objItem.ServerComment
Wscript.Echo "Server Listen Backlog: " & _
objItem.ServerListenBacklog
Wscript.Echo "Server Listen Timeout: " & _
objItem.ServerListenTimeout
Wscript.Echo "Setting ID: " & objItem.SettingID
Wscript.Echo "Win32 Error: " & objItem.Win32Error
Next
Returns information about the POP3 service settings configured on a POP3 server.
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3ServiceSetting")
For Each objItem in colItems
Wscript.Echo "Access Execute: " & objItem.AccessExecute
Wscript.Echo "Access Flags: " & objItem.AccessFlags
Wscript.Echo "Access No Physical Directory: " & _
objItem.AccessNoPhysicalDir
Wscript.Echo "Access No Remote Execute: " & _
objItem.AccessNoRemoteExecute
Wscript.Echo "Access No Remote Read: " & objItem.AccessNoRemoteRead
Wscript.Echo "Access No Remote Script: " & _
objItem.AccessNoRemoteScript
Wscript.Echo "Access No Remote Write: " & _
objItem.AccessNoRemoteWrite
Wscript.Echo "Access Read: " & objItem.AccessRead
Wscript.Echo "Access Script: " & objItem.AccessScript
Wscript.Echo "Access Source: " & objItem.AccessSource
Wscript.Echo "Access SSL: " & objItem.AccessSSL
Wscript.Echo "Access SSL 128: " & objItem.AccessSSL128
Wscript.Echo "Access SSL Flags: " & objItem.AccessSSLFlags
Wscript.Echo "Access SS LMapCert: " & objItem.AccessSSLMapCert
Wscript.Echo "Access SSL Negotiate Certificate: " & _
objItem.AccessSSLNegotiateCert
Wscript.Echo "Access SSL Require Certificate: " & _
objItem.AccessSSLRequireCert
Wscript.Echo "Access Write: " & objItem.AccessWrite
Wscript.Echo "Admin ACL Bin: " & objItem.AdminACLBin
Wscript.Echo "Authentication Anonymous: " & objItem.AuthAnonymous
Wscript.Echo "Authentication Basic: " & objItem.AuthBasic
Wscript.Echo "Authentication Flags: " & objItem.AuthFlags
Wscript.Echo "Authentication MD5: " & objItem.AuthMD5
Wscript.Echo "Authentication NTLM: " & objItem.AuthNTLM
Wscript.Echo "Authentication Passport: " & objItem.AuthPassport
Wscript.Echo "Az Enable: " & objItem.AzEnable
Wscript.Echo "Az Scope Name: " & objItem.AzScopeName
Wscript.Echo "Az Store Name: " & objItem.AzStoreName
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Connection Timeout: " & objItem.ConnectionTimeout
Wscript.Echo "Default Logon Domain: " & _
objItem.DefaultLogonDomain
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Don't Log: " & objItem.DontLog
Wscript.Echo "Log Ext File Bytes Received: " & _
objItem.LogExtFileBytesRecv
Wscript.Echo "Log Ext File Bytes Sent: " & _
objItem.LogExtFileBytesSent
Wscript.Echo "Log Ext File Client IP: " & _
objItem.LogExtFileClientIp
Wscript.Echo "Log Ext File Computer Name: " & _
objItem.LogExtFileComputerName
Wscript.Echo "Log Ext File Cookie: " & objItem.LogExtFileCookie
Wscript.Echo "Log Ext File Date: " & objItem.LogExtFileDate
Wscript.Echo "Log Ext File Flags: " & objItem.LogExtFileFlags
Wscript.Echo "Log Ext File Host: " & objItem.LogExtFileHost
Wscript.Echo "Log Ext File Http Status: " & _
objItem.LogExtFileHttpStatus
Wscript.Echo "Log Ext File Http SubStatus: " & _
objItem.LogExtFileHttpSubStatus
Wscript.Echo "Log Ext File Method: " & objItem.LogExtFileMethod
Wscript.Echo "Log Ext File Protocol Version: " & _
objItem.LogExtFileProtocolVersion
Wscript.Echo "Log Ext File Referer: " & objItem.LogExtFileReferer
Wscript.Echo "Log Ext File Server IP: " & _
objItem.LogExtFileServerIp
Wscript.Echo "Log Ext File Server Port: " & _
objItem.LogExtFileServerPort
Wscript.Echo "Log Ext File Site Name: " & _
objItem.LogExtFileSiteName
Wscript.Echo "Log Ext File Time: " & objItem.LogExtFileTime
Wscript.Echo "Log Ext File Time Taken: " & _
objItem.LogExtFileTimeTaken
Wscript.Echo "Log Ext File URI Query: " & _
objItem.LogExtFileUriQuery
Wscript.Echo "Log Ext File URI Stem: " & objItem.LogExtFileUriStem
Wscript.Echo "Log Ext File User Agent: " & _
objItem.LogExtFileUserAgent
Wscript.Echo "Log Ext File User Name: " & _
objItem.LogExtFileUserName
Wscript.Echo "Log Ext File Win32 Status: " & _
objItem.LogExtFileWin32Status
Wscript.Echo "Log File Directory: " & objItem.LogFileDirectory
Wscript.Echo "Log File Period: " & objItem.LogFilePeriod
Wscript.Echo "Log File Truncate Size: " & _
objItem.LogFileTruncateSize
Wscript.Echo "Log Module List: " & objItem.LogModuleList
Wscript.Echo "Log Odbc Data Source: " & objItem.LogOdbcDataSource
Wscript.Echo "Log Odbc Password: " & objItem.LogOdbcPassword
Wscript.Echo "Log Odbc Table Name: " & objItem.LogOdbcTableName
Wscript.Echo "Log Odbc User Name: " & objItem.LogOdbcUserName
Wscript.Echo "Log Plugin Clsid: " & objItem.LogPluginClsid
Wscript.Echo "Log Type: " & objItem.LogType
Wscript.Echo "Maximum Bandwidth: " & objItem.MaxBandwidth
Wscript.Echo "Maximum Connections: " & objItem.MaxConnections
Wscript.Echo "Maximum Endpoint Connections: " & _
objItem.MaxEndpointConnections
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "NT Authentication Providers: " & o_
bjItem.NTAuthenticationProviders
Wscript.Echo "Pop3 Clear Text Provider: " & _
objItem.Pop3ClearTextProvider
Wscript.Echo "Pop3 Default Domain: " & objItem.Pop3DefaultDomain
Wscript.Echo "Pop3 Expire Delay: " & objItem.Pop3ExpireDelay
Wscript.Echo "Pop3 Expire Mail: " & objItem.Pop3ExpireMail
Wscript.Echo "Pop3 Expire Start: " & objItem.Pop3ExpireStart
Wscript.Echo "Pop3 Mail Expiration Time: " & _
objItem.Pop3MailExpirationTime
Wscript.Echo "Pop3 Routing Dll: " & objItem.Pop3RoutingDll
Wscript.Echo "Server AutoStart: " & objItem.ServerAutoStart
Wscript.Echo "Server Comment: " & objItem.ServerComment
Wscript.Echo "Server Listen Backlog: " & _
objItem.ServerListenBacklog
Wscript.Echo "Server Listen Timeout: " & _
objItem.ServerListenTimeout
Wscript.Echo "Setting ID: " & objItem.SettingID
Next
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3ServiceSetting")
For Each objItem in colItems
objItem.AuthAnonymous = FALSE
objItem.Put_
Next
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3ServerSetting")
For Each objItem in colItems
objItem.AuthPassport = TRUE
objItem.Put_
Next
strComputer = "."
Set objWMIService = GetObject _
("winmgmts:{authenticationLevel=pktPrivacy}\\" _
& strComputer & "\root\microsoftiisv2")
Set colItems = objWMIService.ExecQuery _
("Select * from IIsPop3VirtualDirSetting")
For Each objItem in colItems
objItem.AccessSSLRequireCert = TRUE
objItem.Put_
Next