aboutsummaryrefslogtreecommitdiffstats
path: root/config
diff options
context:
space:
mode:
authordoktornotor <notordoktor@gmail.com>2015-09-04 13:22:27 +0200
committerdoktornotor <notordoktor@gmail.com>2015-09-04 13:22:27 +0200
commitfc8132ded92be96b280660cc9f4ab289ec322107 (patch)
tree12205901a04375921b5c10662b57be8313c488c7 /config
parenta6ff855e75fa5e5a57d455f7a97f8c41677cc76b (diff)
downloadpfsense-packages-fc8132ded92be96b280660cc9f4ab289ec322107.tar.gz
pfsense-packages-fc8132ded92be96b280660cc9f4ab289ec322107.tar.bz2
pfsense-packages-fc8132ded92be96b280660cc9f4ab289ec322107.zip
Delete spamd_exchexp.asp
Not used anywhere, useless dead code.
Diffstat (limited to 'config')
-rw-r--r--config/spamd/spamd_exchexp.asp50
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