wie liest ein Feld aus einem Datensatz

Ich weiß, ich bin über dieses denken, aber ich möchte, um zu überprüfen, einen einzigen Wert/Feld in einem einzigen Datensatz. Zum Beispiel möchte ich wissen, ob der Wert von "closedDate" - Feld in dem Datensatz mit dem Primärschlüssel der 33 null ist oder nicht.

Ich dachte so etwas wie:

dim db as DAO.Database
dim rs as DAO.Recordset
set db = CurrentDb
set rs = db.OpenRecordset("record_holdData")

If not isNull(rs.Fields("closedDate")) then
     'do nothing
Else
     'add a close date
End If

Aber ich glaube nicht, dass das richtig ist. Es nicht geben Sie die Datensatz-Nummer. In der Anwendung wird das Formular geöffnet ist, durch Bindung an den Datensatz in Frage, aber ich glaube nicht, dass CurrentDb nimmt Rücksicht und vielmehr verweist auf die gesamte Tabelle.

Meine Frage ist also, wie Sie tun, öffnen Sie das recordset auf diese Art und Referenz dieses Feld in einem bestimmten Datensatz nur?

InformationsquelleAutor Sinaesthetic | 2011-10-31
  1. 5

    Fand Sie die Antwort, die Sie wollte, aber ich würde das DLookup-Funktion statt.

    Dim db As DAO.Database
Dim strWhere As String
Dim varClosedDate As Variant
Set db = CurrentDb
strWhere = "id = 33"
varClosedDate = DLookup("closedDate","record_holdData",strWhere)
If IsNull(varClosedDate) = True Then
    'use today's date as closedDate
    db.Execute "UPDATE record_holdData Set closedDate = Date() WHERE " & strWhere
End If
    • hat sich das schon ein Benchmark für eine bessere Zeit?
    • Ich habe nicht Vergleich test. Mit einem index auf das Feld id, sowohl die recordset-Lösung und dies sollte man schnell sein. Wenn ich raten müsste, würde ich wählen Sie die Funktion DLookup als schneller, da es nicht den Aufwand zu erstellen das recordset-Objekt. Ich bezweifle jedoch, Sie würde einen Unterschied feststellen, ohne eine genaue Prüfmethode. Wenn Leistung wichtig ist in Ihrer situation, testen Sie beide.
    • cool danke. Ich habe ganz vergessen zu dlookup
    InformationsquelleAutor HansUp
  2. 3

    War ich unter dem Eindruck, dass das argument für die .OpenRecordset () - Methode, um eine Tabelle nur dem Namen nach. Aber es stellt sich heraus, schicken Sie es, eine Abfrage zu:

    set rs = db.OpenRecordset("select * from record_holdData where id = 33")
    InformationsquelleAutor Sinaesthetic
Schreibe einen Kommentar