[Chrisi99]

ich habe jetzt zum ändern folgenden (praktischen ) code

Sub ändern()

Dim oAcc As New Access.Application
oAcc.OpenCurrentDatabase ("J:\PROJEKT\PIS\test\test.mdb")
oAcc.Visible = False 'fürs entwickeln angenehm
Dim db As DAO.Database
Dim rs As DAO.Recordset


Set db = oAcc.CurrentDb
Set rs = db.OpenRecordset("Autos", dbOpenDynaset)


    'einen Datensatz suchen
    rs.FindFirst "PNR=" & var & ""
    If rs.NoMatch Then
    'Nix gefunden
    Else
    'Datensatz ändern
    rs.Edit
    rs!Marke = car
    rs.Update
    End If
    rs.Close
    Set db = Nothing

[gekürzt]

kann ich dieses Konstrukt auch zum Auslesen verwenden? (damit ich ein einheitliches System habe)?

so gaaaanz langsam bekomm ich einen Plan von der Geschichte... aber nur langsam

mfg