I'm interested, what was the mistake and your fix for this.
dot
> -----Original Message-----
> From: Sammy Rashid [SMTP:[EMAIL PROTECTED]]
> Sent: Wednesday, July 03, 2002 5:17 AM
> To: Exchange Discussions
> Subject: RE: VB - Retrieving contacts from Exchange Server
>
> I am trying to use the code you sent and it seems to fail on the line :
> Set olGAL = olNS.AddressLists("Global Address List")
>
> Here is my code, please advise me on what I am doing wrong:
> Public objRecipients As MAPI.Recipients
> Public olGal As Object
> Public objSession As MAPI.Session
> ' MAPI session object
> Public objInfoStore As MAPI.InfoStore ' Infostore
> object
> Public objInbox As MAPI.Folder ' Folder
> object
> Public objFolder As MAPI.Folder ' Folder
> object
> Public objAddressLists As MAPI.AddressLists ' Address list
> collection
> Public objAddressList As MAPI.AddressList ' Address list
> object
> Public objAddressEntries As MAPI.AddressEntries ' Address
> entry collection
> Public objAddressEntry As MAPI.AddressEntry ' Address
> entry object
> Public objContactEntry As MAPI.AddressEntry ' Contact
> address entry object ' Recipients collection
> Public objRecipient As MAPI.Recipient ' Recipient
> object
> Public objMessages As MAPI.Messages ' Message
> collection
> Public objMessage As MAPI.Message ' Message
> object
> Public objFields As MAPI.Fields ' Fields
> collection
> Public objField As MAPI.Field ' Field object
> Public Const CdoPR_DISPLAY_NAME = &H3001001F
> Public Const CdoPR_ENTRYID = &HFFF0102
> ' Entry ID
> Public Const CdoPR_STORE_ENTRYID = &HFFB0102
> ' Information store entry ID
> Public Const CdoPR_CONTAINER_CLASS = &H3613001E
> ' Folder type
>
> ' Name MAPI property tags
>
> Public Const CdoPR_TITLE = &H3A17001F
> ' Item.JobTitle
> Public Const CdoPR_COMPANY_NAME = &H3A16001F
> ' Item.CompanyName
> Public Const CdoPR_DISPLAY_NAME_PREFIX = &H3A45001E
> ' Item.Title
> Public Const CdoPR_SURNAME = &H3A11001E
> ' Item.LastName
> Public Const CdoPR_MIDDLE_NAME = &H3A44001F
> ' Item.MiddleName
> Public Const CdoPR_GIVEN_NAME = &H3A06001F
> ' Item.FirstName
> Public Const CdoPR_GENERATION = &H3A05001E
> ' Item.Suffix
> Public Const CdoPR_BUSINESS_HOME_PAGE = &H3A51001F
> ' Item.BusinessHomePage
> Public Const CdoPR_PERSONAL_HOME_PAGE = &H3A50001F
> ' Item.PersonalHomePage
> Public Const CdoPR_FTP_SITE = &H3A4C001E
> ' Item.FTPSite
> Public Const CdoPR_INITIALS = &H3A0A001E
> ' Item.Initials
>
> ' Non-documented name contact property tags
> Public Const CdoContact_WebPage =
> "{0420060000000000C000000000000046}0x802B" '
> Item.WebPage
> Public Const CdoContact_FileUnder =
> "{0420060000000000C000000000000046}0x8005" '
> Item.FileAs
> Public Const CdoContact_CompanyAndFullName =
> "{0420060000000000C000000000000046}0x8018" '
> Item.CompanyAndFullName
> Public Const CdoContact_CompanyLastFirstNoSpace =
> "{0420060000000000C000000000000046}0x8032" '
> Item.CompanyLastFirstNoSpace
> Public Const CdoContact_CompanyLastFirstSpaceOnly =
> "{0420060000000000C000000000000046}0x8033" '
> Item.CompanyLastFirstSpaceOnly
> Public Const CdoContact_FullNameAndCompany =
> "{0420060000000000C000000000000046}0x8019" '
> Item.FullNameAndCompany
> Public Const CdoContact_LastFirstAndSuffix =
> "{0420060000000000C000000000000046}0x8036" '
> Item.LastFirstAndSuffix
> Public Const CdoContact_LastFirstNoSpace =
> "{0420060000000000C000000000000046}0x8030" '
> Item.LastFirstNoSpace
> Public Const CdoContact_LastFirstNoSpaceCompany =
> "{0420060000000000C000000000000046}0x8034" '
> Item.LastFirstNoSpaceCompany
> Public Const CdoContact_LastFirstSpaceOnly =
> "{0420060000000000C000000000000046}0x8031" '
> Item.LastFirstSpaceOnly
> Public Const CdoContact_LastFirstSpaceOnlyCompany =
> "{0420060000000000C000000000000046}0x8035" '
> Item.LastFirstSpaceOnlyCompany
> Public Const CdoContact_LastNameAndFirstName =
> "{0420060000000000C000000000000046}0x8017" '
> Item.LastNameandFirstName
>
> ' Non-documented e-mail contact property tags
> Public Const CdoContact_EmailOriginalDisplayName =
> "{0420060000000000C000000000000046}0x8084" '
> Item.EMail1DisplayName
> Public Const CdoContact_EmailEmailAddress =
> "{0420060000000000C000000000000046}0x8083" '
> Item.EMail1Address
> Public Const CdoContact_EmailAddrType =
> "{0420060000000000C000000000000046}0x8082" '
> Item.EMail1AddressType
> Public Const CdoContact_EmailOriginalEntryID =
> "{0420060000000000C000000000000046}0x8085" '
> Item.EMail1EntryID
> Public Const CdoContact_Email2OriginalDisplayName =
> "{0420060000000000C000000000000046}0x8094" ' Item.EMail2DisplayName
> Public Const CdoContact_Email2EmailAddress =
> "{0420060000000000C000000000000046}0x8093" '
> Item.EMail2Address
> Public Const CdoContact_Email2AddrType =
> "{0420060000000000C000000000000046}0x8092" '
> Item.EMail2AddressType
> Public Const CdoContact_Email2OriginalEntryID =
> "{0420060000000000C000000000000046}0x8095" ' Item.EMail2EntryID
> Public Const CdoContact_Email3OriginalDisplayName =
> "{0420060000000000C000000000000046}0x80A4" ' Item.EMail3DisplayName
> Public Const CdoContact_Email3EmailAddress =
> "{0420060000000000C000000000000046}0x80A3" '
> Item.EMail3Address
> Public Const CdoContact_Email3AddrType =
> "{0420060000000000C000000000000046}0x80A2" '
> Item.EMail3AddressType
> Public Const CdoContact_Email3OriginalEntryID =
> "{0420060000000000C000000000000046}0x80A5" ' Item.EMail3EntryID
>
> ' Note that the selected phone property is a multivalued property and
> needs special handling
> Public Const CdoContact_ItemData =
> "{0420060000000000C000000000000046}0x8007"
>
> ' Phone MAPI property tags
> Public Const CdoPR_ASSISTANT_TELEPHONE_NUMBER = &H3A2E001F
> ' Item.AssistantTelephoneNumber
> Public Const CdoPR_BUSINESS_TELEPHONE_NUMBER = &H3A08001F
> ' Item.BusinessTelephoneNumber
> Public Const CdoPR_BUSINESS2_TELEPHONE_NUMBER = &H3A1B001F
> ' Item.Business2TelephoneNumber
> Public Const CdoPR_BUSINESS_FAX_NUMBER = &H3A24001F
> ' Item.BusinessFaxNumber
> Public Const CdoPR_CALLBACK_TELEPHONE_NUMBER = &H3A02001F
> ' Item.CallbackTelephoneNumber
> Public Const CdoPR_CAR_TELEPHONE_NUMBER = &H3A1E001F
> ' Item.CarTelephoneNumber
> Public Const CdoPR_COMPANY_MAIN_PHONE_NUMBER = &H3A57001F
> ' Item.CompanyMainTelephoneNumber
> Public Const CdoPR_HOME_TELEPHONE_NUMBER = &H3A09001F
> ' Item.HomeTelephoneNumber
> Public Const CdoPR_HOME2_TELEPHONE_NUMBER = &H3A2F001F
> ' Item.Home2TelephoneNumber
> Public Const CdoPR_HOME_FAX_NUMBER = &H3A25001F
> ' Item.HomeFaxNumber
> Public Const CdoPR_ISDN_NUMBER = &H3A2D001F
> ' Item.ISDNNumber
> Public Const CdoPR_MOBILE_TELEPHONE_NUMBER = &H3A1C001F
> ' Item.MobileTelephoneNumber
> Public Const CdoPR_OTHER_TELEPHONE_NUMBER = &H3A1F001F
> ' Item.OtherTelephoneNumber
> Public Const CdoPR_PRIMARY_FAX_NUMBER = &H3A23001F
> ' Item.OtherFaxNumber
> Public Const CdoPR_PAGER_TELEPHONE_NUMBER = &H3A21001F
> ' Item.PagerNumber
> Public Const CdoPR_PRIMARY_TELEPHONE_NUMBER = &H3A1A001F
> ' Item.PrimaryTelephoneNumber
> Public Const CdoPR_RADIO_TELEPHONE_NUMBER = &H3A1D001F
> ' Item.RadioTelephoneNumber
> Public Const CdoPR_TELEX_NUMBER = &H3A2C001F
> ' Item.TelexNumber
> Public Const CdoPR_TTYTDD_PHONE_NUMBER = &H3A4B001F
> ' Item.TTYTDDTelephoneNumber
>
> ' Address MAPI property tags
> Public Const CdoPR_POSTAL_ADDRESS = &H3A15001F
> ' Item.PostalAddress
> Public Const CdoPR_HOME_ADDRESS_CITY = &H3A59001E
> ' Item.HomeAddressCity
> Public Const CdoPR_HOME_ADDRESS_STREET = &H3A5D001E
> ' Item.HomeAddressStreet
> Public Const CdoPR_HOME_ADDRESS_STATE_OR_PROVINCE = &H3A5C001E
> ' Item.HomeAddressState
> Public Const CdoPR_HOME_ADDRESS_COUNTRY = &H3A5A001E
> ' Item.HomeAddressCountry
> Public Const CdoPR_HOME_ADDRESS_POST_OFFICE_BOX = &H3A5E001E
> ' Item.HomeAddressPostOfficeBox
> Public Const CdoPR_HOME_ADDRESS_POSTAL_CODE = &H3A5B001E
> ' Item.HomeAddressPostalCode
> Public Const CdoPR_OTHER_ADDRESS_CITY = &H3A5F001E
> ' Item.OtherAddressCity
> Public Const CdoPR_OTHER_ADDRESS_STREET = &H3A63001E
> ' Item.OtherAddressStreet
> Public Const CdoPR_OTHER_ADDRESS_STATE_OR_PROVINCE = &H3A62001E
> ' Item.OtherAddressState
> Public Const CdoPR_OTHER_ADDRESS_COUNTRY = &H3A60001E
> ' Item.OtherAddressCountry
> Public Const CdoPR_OTHER_ADDRESS_POSTAL_CODE = &H3A61001E
> ' Item.OtherAddressPostalCode
> Public Const CdoPR_OTHER_ADDRESS_POST_OFFICE_BOX = &H3A64001E
> ' Item.OtherAddressPostOfficeBox
>
> ' Non-documented address contact property tags
> Public Const CdoContact_HomeAddress =
> "{0420060000000000C000000000000046}0x801A" '
> Item.HomeAddress
> Public Const CdoContact_BusinessAddress =
> "{0420060000000000C000000000000046}0x801B" '
> Item.BusinessAddress
> Public Const CdoContact_OtherAddress =
> "{0420060000000000C000000000000046}0x801C" '
> Item.OtherAddress
> Public Const CdoContact_BusinessAddressCity =
> "{0420060000000000C000000000000046}0x8046" '
> Item.BusinessAddressCity
> Public Const CdoContact_BusinessAddressStreet =
> "{0420060000000000C000000000000046}0x8045" '
> Item.BusinessAddressStreet
> Public Const CdoContact_BusinessAddressState =
> "{0420060000000000C000000000000046}0x8047" '
> Item.BusinessAddressState
> Public Const CdoContact_BusinessAddressCountry =
> "{0420060000000000C000000000000046}0x8049" '
> Item.BusinessAddressCountry
> Public Const CdoContact_BusinessAddressPostalCode =
> "{0420060000000000C000000000000046}0x8048" '
> Item.BusinessAddressPostalCode
> Public Const CdoContact_BusinessAddressPostOfficeBox =
> "{0420060000000000C000000000000046}0x804A" '
> Item.BusinessAddressPostOfficeBox
>
> ' Misc MAPI property tags
> Public Const CdoPR_DEPARTMENT_NAME = &H3A18001F
> ' Item.Department
> Public Const CdoPR_MANAGER_NAME = &H3A4E001F
> ' Item.ManagerName
> Public Const CdoPR_OFFICE_LOCATION = &H3A19001F
> ' Item.Location
> Public Const CdoPR_ASSISTANT = &H3A30001F
> ' Item.AssistantName
> Public Const CdoPR_PROFESSION = &H3A46001F
> ' Item.Profession
> Public Const CdoPR_NICKNAME = &H3A4F001F
> ' Item.NickName
> Public Const CdoPR_BIRTHDAY = &H3A420040
> ' Item.Birthday
> Public Const CdoPR_SPOUSE_NAME = &H3A48001F
> ' Item.SpouseName
> Public Const CdoPR_WEDDING_ANNIVERSARY = &H3A410040
> ' Item.Anniversary
> Public Const CdoPR_ACCOUNT = &H3A00001E
> ' Item.Account
> Public Const CdoPR_COMPUTER_NETWORK_NAME = &H3A49001E
> ' Item.ComputerNetworkName
> Public Const CdoPR_CHILDRENS_NAMES = &H3A58101E
> ' Item.Children
> Public Const CdoPR_CUSTOMER_ID = &H3A4A001E
> ' Item.CustomerID
> Public Const CdoPR_GENDER = &H3A4D0002
> ' Item.Gender
> Public Const CdoPR_GOVERNMENT_ID_NUMBER = &H3A07001E
> ' Item.GovernmentIDNumber
> Public Const CdoPR_HOBBIES = &H3A43001E
> ' Item.Hobby
> Public Const CdoPR_LANGUAGE = &H3A0C001E
> ' Item.Language
> Public Const CdoPR_LOCATION = &H3A0D001E
> ' Item.OfficeLocation
> Public Const CdoPR_ORGANIZATIONAL_ID_NUMBER = &H3A10001E
> ' Item.OrganizationalIDNumber
> Public Const CdoPR_REFERRED_BY_NAME = &H3A47001E
> ' Item.ReferredBy
>
> ' Non-documented misc. contact property tags
> Public Const CdoContact_SelectedAddress =
> "{0420060000000000C000000000000046}0x8022"
> Public Const CdoContact_BillingInformation =
> "{0820060000000000C000000000000046}0x8535" '
> Item.BillingInformation
> Public Const CdoContact_InternetFreeBusyAddress =
> "{0420060000000000C000000000000046}0x80D8" '
> Item.InternetFreeBusyAddress
> Public Const CdoContact_Mileage =
> "{0820060000000000C000000000000046}0x8534" '
> Item.Milage
> Public Const CdoContact_UserField1 =
> "{0420060000000000C000000000000046}0x804F" '
> Item.UserField1
> Public Const CdoContact_UserField2 =
> "{0420060000000000C000000000000046}0x8050" '
> Item.UserField2
> Public Const CdoContact_UserField3 =
> "{0420060000000000C000000000000046}0x8051" '
> Item.UserField3
> Public Const CdoContact_UserField4 =
> "{0420060000000000C000000000000046}0x8052" '
> Item.UserField4
> Public Const CdoContact_Private =
> "{0820060000000000C000000000000046}0x8506"
> Public Const CdoContact_LinkNames =
> "{0820060000000000C000000000000046}0x8586"
>
> 'STRING VALUES
>
> Public strAddressListDN As String
> Public strFullName As String
> Public strFirstName As String
> Public strLastName As String
> Public strMiddleName As String
> Public strTitle As String
> Public strSuffix As String
> Public strJobTitle As String
> Public strCompany As String
> Public strFileAs As String
> Public strAssistantPhone As String
> Public strBusinessPhone As String
> Public strBusiness2Phone As String
> Public strBusinessFax As String
> Public strCallbackPhone As String
> Public strCarPhone As String
> Public strCompanyPhone As String
> Public strHomePhone As String
> Public strHome2Phone As String
> Public strHomeFax As String
> Public strISDNPhone As String
> Public strMobilePhone As String
> Public strOtherPhone As String
> Public strOtherFax As String
> Public strPager As String
> Public strPrimary As String
> Public strRadio As String
> Public strTelex As String
> Public strTTYTDD As String
> Public strPostalAddress As String
> Public strBusinessAddress As String
> Public strBusinessAddressStreet As String
> Public strBusinessAddressCity As String
> Public strBusinessAddressState As String
> Public strBusinessAddressPostalCode As String
> Public strBusinessAddressCountry As String
> Public strHomeAddress As String
> Public strHomeAddressStreet As String
> Public strHomeAddressCity As String
> Public strHomeAddressState As String
> Public strHomeAddressPostalCode As String
> Public strHomeAddressCountry As String
> Public strOtherAddress As String
> Public strOtherAddressStreet As String
> Public strOtherAddressCity As String
> Public strOtherAddressState As String
> Public strOtherAddressPostalCode As String
> Public strOtherAddressCountry As String
> Public strEMail1DisplayName As String
> Public strEMail1Address As String
> Public strEMail1AddressType As String
> Public strEMail1EntryID As String
> Public strEMail2DisplayName As String
> Public strEMail2Address As String
> Public strEMail2AddressType As String
> Public strEMail2EntryID As String
> Public strEMail3DisplayName As String
> Public strEMail3Address As String
> Public strEMail3AddressType As String
> Public strEMail3EntryID As String
> Public strWebPage As String
> Public strLastModDate As String
> Public chkIsMailingAddress As Boolean
> Public strDepartment As String
> Public strLinkNames As String
> Public strOffice As String
> Public strProfession As String
> Public strManager As String
> Public strAssistant As String
> Public strNickName As String
> Public datBirthday As Date
> Public datAnniversary As Date
> Public strNetMeetingServer As String
> Public strNetMeetingAlias As String
> Public intPhoneSelector As Integer
> Public varNetMeeting As Variant
> Public varPhoneSelection() As Variant
> Public varCategories() As Variant
>
> Sub Retrieve_Contacts()
>
> On Error GoTo error
>
> Set ol = New Outlook.Application
> Set olns = ol.GetNamespace("MAPI")
> Set olGal = olns.AddressLists("Gloabal Address List")
>
> Dim intContactItems As Integer
> Dim i As Integer
> Dim strmessageid As String
> Dim strContactname As String
> Dim strWebPage As String
>
> For Each olThisBox In olGal.AddressEntries
> If olThisBox.DisplayType = olUser Then
> Set mailbox = olns.CreateRecipient(olThisBox.name)
> End If
>
> mailbox.Resolve
>
> If mailbox.Resolved Then
> Set employeefolder = olns.GetSharedDefaultFolder(mailbox,
> olFolderContacts)
> End If
>
> intContactItems = employeefolder.Items.Count
>
> Set objContactitem = employeefolder.Items
>
> For i = 1 To intContactItems
>
> With objContactitem(i)
> If (DateDiff("d", .LastModificationTime, Now) < 7) Then
>
> 'Name details
> strFullName = .FullName
> strTitle = .Title
> strFirstName = .FirstName
> strMiddleName = .MiddleName
> strLastName = .LastName
> strSuffix = .Suffix
>
> 'FileAs
> strFileAs = .FileAs
>
> 'Business Details
> strJobTitle = .JobTitle
> strCompany = .CompanyName
>
> 'Telephone/contact information
> strBusinessPhone = .BusinessTelephoneNumber
> strAssistantPhone = .AssistantTelephoneNumber
> strBusiness2Phone = .Business2TelephoneNumber
> strBusinessFax = .BusinessFaxNumber
> strCallbackPhone = .CallbackTelephoneNumber
> strCarPhone = .CarTelephoneNumber
> 'strCompanyPhone = .companytelephonenumber
> strHomePhone = .HomeTelephoneNumber
> strHome2Phone = .Home2TelephoneNumber
> strHomeFax = .HomeFaxNumber
> strISDNPhone = .ISDNNumber
> strMobilePhone = .MobileTelephoneNumber
> strOtherPhone = .OtherTelephoneNumber
> strOtherFax = .OtherFaxNumber
> strPager = .PagerNumber
> strPrimary = .PrimaryTelephoneNumber
> strRadio = .RadioTelephoneNumber
> strTelex = .TelexNumber
> strTTYTDD = .TTYTDDTelephoneNumber
>
> 'Business Address
> strBusinessAddress = .BusinessAddress
> strBusinessAddressStreet = .BusinessAddressStreet
> strBusinessAddressCity = .BusinessAddressCity
> strBusinessAddressState = .BusinessAddressState
> strBusinessAddressCountry = .BusinessAddressCountry
> strBusinessAddressPostalCode = .BusinessAddressPostalCode
>
> 'Home Address
> strHomeAddress = .HomeAddress
> strHomeAddressStreet = .HomeAddressStreet
> strHomeAddressCity = .HomeAddressCity
> strHomeAddressState = .HomeAddressState
> strHomeAddressPostalCode = .HomeAddressPostalCode
> strHomeAddressCountry = .HomeAddressCountry
>
> 'Other Address
> strOtherAddress = .OtherAddress
> strOtherAddressStreet = .OtherAddressStreet
> strOtherAddressCity = .OtherAddressCity
> strOtherAddressState = .OtherAddressState
> strOtherAddressPostalCode = .OtherAddressPostalCode
> strOtherAddressCountry = .OtherAddressCountry
>
> 'Email addresses
> strEMail1Address = .Email1Address
> strEMail2Address = .Email2Address
> strEMail3Address = .Email3Address
>
> 'WebPage
> strWebPage = .WebPage
>
> strLastModDate = .LastModificationTime
> chkIsMailingAddress = .MailingAddress
> Debug.Print .MailingAddress
>
> End If
>
> End With
> Next
> Next
> retrieve_contacts_alldone:
> Exit Sub
> error:
> MsgBox Err.Description
> End Sub
>
>
>
> -----Original Message-----
> From: Jon Hill [mailto:[EMAIL PROTECTED]]
> Sent: 02 July 2002 17:01
> To: Exchange Discussions
> Subject: RE: VB - Retrieving contacts from Exchange Server
>
>
> Your code used the Outlook Object Model, so the following code should
> work:
>
> Set olNS = ol.GetNamespace("MAPI")
> Set olGAL = olNS.AddressLists("Global Address List")
>
> For Each olThisBox In olGAL.AddressEntries
> If olThisBox.DisplayType = olUser Then
> Set mailbox = olNS.CreateRecipient(outThisBox.Name)
> ...insert code here...
> End If
> Next
>
>
>
> It would probably run faster if you used the CDO model. The following
> might
> get you started:
>
>
>
> Sub FindMessageCDO()
> 'find all messages whose subject contains a particular line of text
> Dim strProfileInfo As String
> Dim cdoSession As New MAPI.Session
> Dim cdoGAL As MAPI.AddressList
> Dim cdoMailboxes As MAPI.AddressEntries
> Dim cdoThisBox As MAPI.AddressEntry
> Dim cdoInbox As MAPI.Folder
> Dim cdoInboxMsgs As MAPI.Messages
> Dim cdoInboxFilter As MAPI.MessageFilter
> Dim cdoThisMsg As MAPI.Message
> Dim cdoOtherSession As MAPI.Session
> Dim iBadMsgCount As Integer
> Dim dtmStart As Date
>
>
> Const strSUBJ = "Homepage"
>
> strExchServer="MyMailServer"
> strMailbox = "MyMailbox"
> strProfileInfo = strExchServer + vbLf + strMailbox
>
> Set cdoGAL = cdoSession.AddressLists("Global Address List")
>
> For Each cdoThisBox In cdoGAL.AddressEntries
>
> With cdoThisBox
> If .DisplayType = olUser Then
> iBadMsgCount = 0
>
> Set cdoOtherSession = Application.CreateObject("Mapi.Session")
>
> strProfileInfo = strExchServer + vbLf + .Address
> cdoOtherSession.Logon "", "", False, True, 0, True,
> strProfileInfo
>
> On Error Resume Next
> Set cdoInbox = cdoOtherSession.Inbox
> If Err = 0 Then
> On Error GoTo 0
> Set cdoInboxMsgs = cdoOtherSession.Inbox.Messages
> ...insert code here...
> Set cdoInboxMsgs = Nothing
> End If
> End If
> End With
> Next
>
>
> End Sub
>
> _________________________________________________________________
> List posting FAQ: http://www.swinc.com/resource/exch_faq.htm
> Archives: http://www.swynk.com/sitesearch/search.asp
> To unsubscribe: mailto:[EMAIL PROTECTED]
> Exchange List admin: [EMAIL PROTECTED]
>
> _________________________________________________________________
> List posting FAQ: http://www.swinc.com/resource/exch_faq.htm
> Archives: http://www.swynk.com/sitesearch/search.asp
> To unsubscribe: mailto:[EMAIL PROTECTED]
> Exchange List admin: [EMAIL PROTECTED]
_________________________________________________________________
List posting FAQ: http://www.swinc.com/resource/exch_faq.htm
Archives: http://www.swynk.com/sitesearch/search.asp
To unsubscribe: mailto:[EMAIL PROTECTED]
Exchange List admin: [EMAIL PROTECTED]
