diff options
author | Renato Botelho <renato@netgate.com> | 2015-09-08 09:31:23 -0300 |
---|---|---|
committer | Renato Botelho <renato@netgate.com> | 2015-09-08 09:31:23 -0300 |
commit | d112be74f26762e8b2273cb97d7e231f865a14c2 (patch) | |
tree | 0350f0996a2cf5db1da573122c71687096efde16 /config/spamd/spamd_exchexp.asp | |
parent | b250138e838ec7f0fc26b3cf9b8dc2b85386fb15 (diff) | |
parent | 9effc39ed1f07a50909d516cf797d3c7aa10b272 (diff) | |
download | pfsense-packages-d112be74f26762e8b2273cb97d7e231f865a14c2.tar.gz pfsense-packages-d112be74f26762e8b2273cb97d7e231f865a14c2.tar.bz2 pfsense-packages-d112be74f26762e8b2273cb97d7e231f865a14c2.zip |
Merge pull request #1038 from doktornotor/patch-11
Diffstat (limited to 'config/spamd/spamd_exchexp.asp')
-rw-r--r-- | config/spamd/spamd_exchexp.asp | 50 |
1 files changed, 0 insertions, 50 deletions
diff --git a/config/spamd/spamd_exchexp.asp b/config/spamd/spamd_exchexp.asp deleted file mode 100644 index 56b0c629..00000000 --- a/config/spamd/spamd_exchexp.asp +++ /dev/null @@ -1,50 +0,0 @@ -<% - -dim server -server = "SERVERNAME" - -Sub ExportUsers(oObject) - Dim oUser - For Each oUser in oObject - Select Case oUser.Class - Case "user" - If oUser.mail <> "" then - - for each email in oUser.proxyAddresses - If (lcase(left(email,4))="smtp") Then - 'userFile.WriteLine Mid(email,6) - document.write Mid(email,6) & vbCrLf - End If - next - End if - Case "organizationalUnit" , "container" - If UsersinOU (oUser) then - ExportUsers(oUser) - End if - End select - Next -End Sub - -Function UsersinOU (oObject) - Dim oUser - UsersinOU = False - for Each oUser in oObject - Select Case oUser.Class - Case "organizationalUnit" , "container" - UsersinOU = UsersinOU(oUser) - Case "user" - UsersinOU = True - - End select - Next -End Function - -Dim rootDSE, domainObject -Set rootDSE=GetObject("LDAP://" & server & "/RootDSE") -domainContainer = rootDSE.Get("defaultNamingContext") -Set domainObject = GetObject("LDAP://" & domainContainer) - -ExportUsers(domainObject) -Set oDomain = Nothing - -%>
\ No newline at end of file |