Solved

Email Address Already in use

Posted on 2004-09-23
4
249 Views
Last Modified: 2012-06-27
Hi all,

Yet another Question, I would like to know how to find out who is actually using a particular email address in the organisation.

Is there a way to find this info quickly rather than going thru everyones email aliases??

Cheers

IT
0
Comment
Question by:SynsealIT
  • 2
4 Comments
 
LVL 17

Accepted Solution

by:
Microtech earned 20 total points
ID: 12133183
Hi SynsealIT,
copy this text into a nodepad file and save as .VBS

Const Writable      = 2

Set objFSO           = CreateObject("Scripting.FileSystemObject")
Set objLog          = objFSO.OpenTextFile("c:\proxydump.csv", Writable, True)
Set cn               = CreateObject("ADODB.Connection")
Set cm               = CreateObject("ADODB.Command")
Set rs               = CreateObject("ADODB.RecordSet")


With cn
     .Provider     = "ADsDSOObject"
     .Open "Active Directory Provider"
End With

Set cm.ActiveConnection = cn

strDomainDN          = InputBox("Please Enter the Servername and Domain DN. " & vbCrLf & " Example: Myserver/DC=test,DC=lab ")

cm.CommandText = "<LDAP://" & strDomainDN & ">;(&(objectCategory=user)(proxyAddresses=*));distinguishedName,mail,proxyAddresses;subtree"
cm.Properties("Page Size") = 1000

Set rs               = cm.Execute


While Not rs.EOF

     On Error Resume Next
     strUserDN     = rs.Fields("distinguishedName")
     strProxyAddress = rs.Fields("proxyAddresses")

     objLog.Write strUserDN
     objLog.Write ","
 
     For Each Item in strProxyAddress
          strTempAddr = Item
          objLog.Write Item & ";"
     Next

     objLog.Write vbCrLf

     rs.MoveNext
Wend
               

objLog.Close
msgbox "Export Complete to c:\proxydump.csv"


this will create a csv file on your c drive with all smtp addresses in your domain.

Hope This helps
0
 

Author Comment

by:SynsealIT
ID: 12134802
Thats mint matey!!! Bril :) only thing i it is a public folder i believe that has this alias. Is there any mods i can make to script that will allow this???

Thanks again

IT
0
 
LVL 104

Expert Comment

by:Sembee
ID: 12135710
I tend to just type the full email address in to Outlook's To: line and then wait to see what Outlook resolves it to.

Simon.
0
 
LVL 17

Expert Comment

by:Microtech
ID: 12199154
0

Featured Post

Want to promote your upcoming event?

Are you going to an event? Are you going to be exhibiting at a tradeshow? Talking at a conference? Using a promotional banner in your email signature ensures that your organization’s most important contacts stay in the know and can potentially spread the word about the event.

Join & Write a Comment

Check out this infographic on what you need to make a good email signature that will work perfectly for your organization.
Scam emails are a huge burden for many businesses. Spotting one is not always easy. Follow our tips to identify if an email you receive is a scam.
In this video we show how to create a User Mailbox in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: First we need to log into the Exchange Admin Center. Navigate to the Recipients >> Mailb…
In this video we show how to create an email address policy in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.:  First we need to log into the Exchange Admin Center. Navigate to the Mail Flow…

757 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

18 Experts available now in Live!

Get 1:1 Help Now