RE: Extracting information from Exchange
- From: "Mulnick, Al" <Al.Mulnick@xxxxxxxxxx>
- To: "[ExchangeList]" <exchangelist@xxxxxxxxxxxxx>
- Date: Tue, 15 Mar 2005 11:01:40 -0500
This is a snippet that can get you started. Outside of writing it yourself
or hiring it done, I don't know of any particular apps that exist to do
this. Maybe somebody else here does?
Const CdoDefaultFolderContacts = 5
dim iCount
GetContacts()
wscript.echo "Number of contacts updated:" & iCount
Sub GetContacts()
iCount = 0
Dim objSession 'As MAPI.Session
Set ol = CreateObject ("MAPI.Session")
ol.Logon "%USERNAME%"
oContItems = ol.GetDefaultFolder(olFolderContacts)
oContItems = ol.GetDefaultFolder(CdoDefaultFolderContacts)
wscript.echo oContItems.Count
For Each oCurItem in oContItems
iCount = iCount + 1
wscript.echo oCurItem '//Write this out to a file or DB if needed
Next
Set oContItems = Nothing
ol.Logoff
Set olns = Nothing
Set ol = Nothing
End Sub
-----Original Message-----
From: Sonya [mailto:sonya.mcneal@xxxxxxxx]
Sent: Tuesday, March 15, 2005 10:15 AM
To: [ExchangeList]
Subject: [exchangelist] RE: Extracting information from Exchange
http://www.MSExchange.org/
I've seen some scripting but I'm not sure on how to use them because I am
not a programmer. I've done a little scripting but with ActiveX for DTS (SQL
Server).
I went to the link that you provided but doesn't really help. Any other
suggestions?
------------------------------------------------------
List Archives: http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Exchange Newsletters: http://www.msexchange.org/pages/newsletter.asp
Exchange FAQ: http://www.msexchange.org/pages/larticle.asp?type=FAQ
------------------------------------------------------
Other Internet Software Marketing Sites:
World of Windows Networking: http://www.windowsnetworking.com Leading
Network Software Directory: http://www.serverfiles.com
No.1 ISA Server Resource Site: http://www.isaserver.org Windows Security
Resource Site: http://www.windowsecurity.com/ Network Security Library:
http://www.secinf.net/ Windows 2000/NT Fax Solutions:
http://www.ntfaxfaq.com
------------------------------------------------------
You are currently subscribed to this MSEXchange.org Discussion List as:
al.mulnick@xxxxxxxxxx To unsubscribe visit
http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Report abuse to listadmin@xxxxxxxxxxxxxx
Other related posts:
