pb avc une dll vb6

bonjour à tous,

J'ai un petit pb avc une dll en vb6, elle est composée de 2 fonction public GET et  SET.Dejà g un souci avc le setVisitor, à la fin de cette fonction je recupère une valeur d'une variable sauf que cette valeur n'est pa retournée et je c pa pk?? dc si qq'un peut m'aider cel serait le bienvenue. voilà le code de la fonction :

Public Function setVisitor(ByVal firstName As Variant, ByVal lastName As Variant) As Variant
Dim maCon As ADODB.Connection
Dim monRs As ADODB.Recordset
Dim connectString As String

connectString = "DSN=visitors"
Set maCon = CreateObject("adodb.connection")
Set monRs = CreateObject("adodb.recordset")
maCon.Open connectString
monRs.Open "select * from siteVisitors", maCon, adOpenDynamic, adLockOptimistic

With monRs
    .AddNew
    .Fields("firstname") = firstName
    .Fields("lastname") = lastName
    .Fields("previousVisit") = Now()
    .Fields("totalVisits") = 1
    .Update
End With
setVisitor = monRs.Fields("cookieID")
monRs.Close
maCon.Close
Set monRs = Nothing
Set maCon = Nothing
End Function

Donc c là le souci : setVisitor = monRs.Fields("cookieID")

Salut
A première vue :
- Tu lis toute ta table -> RecordSet
- Tu insères un nouvel enregistrement
- Tu mets à jour ta DB
... et "cookieID", il va le chercher où ?
Tu n'as pas fait de sélection d'enregistrement à lire
Après un Update, où se trouve le 'curseur' ?
Au début ? à la fin ? sur l'enregistrement ajouté ?
En tous les cas, difficile de savoir d'où il pourrait venir

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)

En fait le cookieID est un champ dans ma table de type numAuto et le principe est de récupèrer son numéro après l'ajout de la ligne dans la table sauf que cette récupération ne fonctionne pas. le souci c'est c un exemple sur lequel je travail dans le cadre d'une formation à l'asp dc c a manipule une dll et ds le bouquin c codé ainsi.

Disons que de cette manière, c'est normal que tu ne le récupères pas.
Après le Update, il faudrait refaire une requète de lecture du genre :
"Select cookieID " & _
"   From siteVisitors " & _
"   Where firstname = '" & firstname & "' " & _
"      And lastname = '" & lastName & "' "

Il faudra que tu penses à tester si ces données n'existent pas déjà dans ta DB avant d'insérer, sinon, ça finira par coincer !

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)

c'est une façon de faire aussi...mais ce que je comprenais pa c'est pk l'exemple du bouquin ne fonctionner pa?? mais je ne vais pas bloké dessus..Merci à toi Jack