Discussion :

[RoBout]

Bonjour tout le monde,

Je suis en train de faire une application et j'ai un souci sur la fonction Recordset.Clone. J'ai commencé avec un FindFirst mais j'ai deux critères à prendre en compte donc je suis passé par Recordset.Clone.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub N°doc_AfterUpdate()
    ' Rechercher l'enregistrement correspondant au contrôle.
    Dim rs As Recordset
 
    Set rs = Me.RecordsetClone
    criteria = "[N° doc] = '" & Me![N°doc] & "'" And "[Rév#] = '" & Me![Rév#] & "'"
 
    rs.FindFirst criteria
 
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
 
    rs.Close
    Set rs = Nothing
 
End Sub

Je m'excuse d'avance si je fait des erreurs de vocabulaire ou autre car j'ai appris par moi même donc j'utilise mes mots , mais la je suis vraiment bloqué.

Merci d'avance

[Ric500]

Bonjour,

Pour moi le problème se situe dans le fait que tu ne positionnes pas le recordsetclone au début avant le "FindFirst":

tu devrais avoir, je pense:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
rs.movefirst
rs.FindFirst criteria

Bonne continuation...

[RoBout]

Merci pour ta réponse Ric500

Je viens d'essayer se que tu m'a dit mais ça ne marche pas.
Tout se bloque au niveau de la ligne 6 de mon extrait de code.

Encore merci de ton aide

[loufab]

Bonjour,

Pour moi c'est ton critère qui est foireux.

un petit debogage s'impose :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

debug.print "[N° doc] = '" & Me![N°doc] & "'" And "[Rév#] = '" & Me![Rév#] & "'"

Cordialement,

[alassanediakite]

Salut
La ligne 6 doit être remplacée par...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

criteria = "[N° doc] = '" & Me![N°doc] & "' And [Rév#] = '" & Me![Rév#] & "'"

Je ne comprends pas comment le caractère # se retrouve dans les noms de champs?
@+

[RoBout]

Bonjour à tous,

Bon déjà désolé du retard de ma réponse.
-> Loufab: j'ai essayer debug.print mais je n'ai pas très bien compris rien ne c'est passé, du coup...
-> Alassanediakite: j'ai essayé ce que tu m'a dit et c'est bon ça passe.

Pour précision les # dans le nom de certains champs font simplement partie des nom du champs ils ne sont en rien des parties du code. Les personnes qui ont créé ces noms voulais je pense m’embrouiller un peu plus, merci à eux!! .

En tout cas merci à tous et surement à très bientôt pour des questions toujours aussi facile pour vous

[loufab]

le debug.print donne le résultat dans la fenêtre d'exécution. Pour un débogage...
Donc si tu attendais un effet quelconque sur l'exécution, c'est rapé.
Les #, sympa ! ça t'oblige à borner tes champs avec des crochets.

y a vraiment des gens qui devraient rester sur Tetris au lieu de se meler des affaires des grands