Ureader.com  
Microsoft software help and Community
   home   |   control panel login   |   archive   |  
 
Exchange
2000.active.directory
2000.admin
2000.announcements
2000.app.conversion
2000.applications
2000.clients
2000.clustering
2000.connectivity
2000.development
2000.documentation
2000.general
2000.information.store
2000.interop
2000.kms
2000.misc
2000.protocols
2000.realtime.collabo.
2000.setup
2000.transport
2000.win2000
admin
application.conversion
applications
clients
clustering
connectivity
design
development
misc
mobility
setup
tools
  
 
date: Thu, 1 Jun 2006 20:32:01 -0700,    group: microsoft.public.exchange2000.misc        back       


Exch 2003 VCard script stopped working after critical updates   
Help!

I have a customer whose public web site collects lead registrations and 
stores them in vcard files.  Then every 30 minutes a CDOEX script runs on the 
Exchange server system which reads in the vcard files and puts them into a 
contacts-style public folder.

After working for years, this script suddenly stopped working in mid April 
and I can't figure out why.  I suspect it was because of the install of a 
recent Exchange or Windows critical update.  I have tried the same script on 
2 other Exchange 2003 servers at different customer sites which also have all 
current critical updates, and the script fails in the same way.  I don't have 
access to older Exchange servers for testing, but like I said this script ran 
flawlessly since 2004 until just recently.

The script is extremely simple and it fails right at the beginning; I've 
enclosed a stripped-down version.  It creates a CDO.Person object and then 
gets the Vcard stream so it can read a Vcard.  The fetch of the Vcard stream 
is what is failing.  I could understand if a save failed or something because 
security is always getting tighter, but this failure happens when we are just 
creating an empty person object in memory!

My customer is eager to start processing sales leads again.  Can you give me 
any tips on how to see why this failing or how to fix it?  If you have an 
up-to-date Exchange server, it's easy to try this yourself.

Thanks for any help you can give me!

Regards,
Mike Gilbert

Here's the script that fails - save this as vcard.vbs and double click it to 
see the error:
    'Create New Contact object and fill it in from the vcard.
    Dim oContact, vStream
    set oContact = CreateObject("CDO.Person")
    if err.number <> 0 then wscript.quit

    'the line below fails with 80040201 after latest Exchange/Win 2003 updates
    set vStream = oContact.GetvCardStream
    'vStream.LoadFromFile(vCardFile.Path)

Here's the example that the script followed:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss/_cdo_creating_a_contact_from_a_vcard_stream.asp
date: Thu, 1 Jun 2006 20:32:01 -0700   author:   Mike Gilbert

Google
 
Web ureader.com


    COPYRIGHT 2007, YARDI TECHNOLOGY LIMITED, ALL RIGHT RESERVE  |   contact us