Problème VB 2008 - Echange 2007 avec CDOEX

Signaler
Messages postés
1
Date d'inscription
mardi 17 mars 2009
Statut
Membre
Dernière intervention
18 juin 2009
-
Messages postés
1
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
23 juin 2009
-
Bjr,
je cherche à ajouter des RV dans l'agenda d'Exchange 2007, avec VB.

J'ai pris le code suivant sur le site microsoft.

' Creating an Appointment with CDOEx
Private Sub AddAppointment()
Dim strDomainName As String
Dim strLocalPath As String
Dim strContainerURL As String

Dim iAppointment As New CDO.Appointment

' Create the container URL.
strDomainName = "user1.subdomain.example.com"
strLocalPath = "MBX/user1/Calendar"
strContainerURL = "file://./backofficestorage/" & strDomainName & "/" & strLocalPath

' Set the appointment properties and save.
With iAppointment
.Subject = "CDO For Exchange Programming Discussion"
.Location = "My office"
.TextBody = "We will discuss CDO for Exchange 2000 programming"
.StartTime = "12/25/1999 11:00 AM"
.EndTime = "12/26/1999 11:00 AM"
.DataSource.SaveToContainer (strContainerURL)
End With

Set iAppointment = Nothing
End Sub


Mais quand je le met, j'ai l'erreur suivante : type 'CDO.Appointment' non défini.
J'ai pourtant ajouté dans le projet : la référence COM à la DLL cdosys.dll
C'est peut être cette DLL qui me pose problème car elle s'affiche en tant que :'Microsfot CDO form windows 2000 Library ! est-ce normal ?)

Quelqu'un peut m'aider parce que je galère vraiment !!!
Merci, à tous

1 réponse

Messages postés
1
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
23 juin 2009

Même problème...
Seules une partie des propriétés est publiée... comment retrouver appointment