[VBA] find methode

[BartBlackMagic]

VBA:

code:

Private Sub testrichard()
Dim rsttest As New ADODB.Recordset

rsttest.Open "Item", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rsttest.Find "IField = 'SMTP Weergavenaam'" And "ReportID = '8'"
Debug.Print rsttest!ivalue
End Sub

Ik moet in een Access-database op meerdere criteria zoeken, maar het lukt nooit.
Zoals het elders in dit forum is aangegeven i.v.m. VB, lukt het niet bij mij.
Als ik enkel dit geef:

code:

rsttest.Find "IField = 'SMTP Weergavenaam'"

dan lukt het wel.
Kan iemand mij a.u.b. helpen?
MVG Bart

[Lister]

Volgens mij staan je quotes verkeerd.
Als je nu eens dit probeer:

code:

rsttest.Find "IField = 'SMTP Weergavenaam' And ReportID = '8'"

[BartBlackMagic]

Ook deze methode werkt niet

[Verwijderd]

[quote]BartBlackMagic schreef op 18 april 2004 @ 18:29:
.............Als ik enkel dit geef:

code:

rsttest.Find "IField = 'SMTP Weergavenaam'"

dan lukt het wel...........


Als je nu eens alleen die andere (Report_ID = ...) probeert, wat doet hij dan??

[ Voor 11% gewijzigd door Verwijderd op 19-04-2004 13:00 ]