recuperer le champ date d'e'xpiration d'un AD

[dubidon]

Bonjour a tous,

je travaille sur un agent de synchro entre un AD et un annuaire notes et je rencontre un problème de "type mismatch" lors de la récupération du champ "accountexpires".


j'ai testé pas mal de truc mais j'ai toujours un type mismatch ou l'instance n'existe pas.

Ce qui est sur c'est que je récupère bien la valeur de l'objet mais je bloque sur la conversion.

Si quelqu'un a une idée je suis preneur

D'avance merci


Dubidon

Code : Tout sélectionner

            Set w_datexpires = objRecordSet.Fields(w_ADDate_Expiration)
            
            Dim test As variant
            
            If Not w_datexpires Is Nothing Then
               If Not IsNull(w_datexpires.value) Then      
                  'MsgBox DataType(w_datexpires.value)
                  Dim date1 As NotesDateTime
                  'Set date1 = w_datexpires.value
                  
                  Set date1 = New NotesDateTime(CStr(w_datexpires.value))

                  
                  'test = w_datexpires.value            
                  'msgbox CStr(test)
               End If

            End If

[Michael DELIQUE]

salut

déjà insérer une gestion des erreurs histoire d'avoir qqc de plus précis => viewtopic.php?f=49&t=12054

ensuite un petit msgbox CStr(w_datexpires.value) histoire de voir ce que tu récupère.

[dubidon]

bonjour, pour info j'ai bien une gestion des erreurs mais j'ai mis juste la partie du code ou il y a l'erreur.

et pour les msgbox, ma gestion d'erreur me dit "erreur type mismatch"

et quand je regarde le datatype comme cela : MsgBox DataType(w_datexpires.value)

alors j'obtiens la valeur 9 qui correspond à un objet.

Dubidon

[Michael DELIQUE]

alors il faut que tu regardes les propriétés de l'objet...

ou alors c'est qu'il connais la méthode values

[dubidon]

la méthode "values" est celle que j'utilise pour tous les autres champs qui ne contiennent pas de date et j'obtiens bien la valeur du champ. Le problème est que quand je le fait pour un champ date, il me dit type mismatch.

Quand je regarde le type de monobjet.values, j'obtiens 1 quand c'est un champ non date et 9 lorsque c'est un champ date.

C'est comme ci mon objet.values etait lui même un objet ...

je reste preneur de toutes idées

Dubidon