Record einlesen und ausgeben

Computer: Software & Programmierung Visual Basic
#1

Hallo

  1. Ich will bei einer Accesdatenbank, der letzte Eintrag in Spalte 3 einer Access Tabelle Einlesen und einem Parameter imVBA Code zuweisen wie geht das? Hast Du ein Funktionierendes Codebeispiel?

  2. Möchte ich einen neuen Wert mittels VBA Code in eine Accesstabelle in die Dritte Zeile einfügen.

  3. Möchte ich den lezten Bestehenden Eintrag in der Access Tabelle, welcher in der 3. Zeile steht, mittels VBA Code verändern.

Wer kann mir Helfen?
Bitte um funktionierende Codebeispiele.

Besten Dank für deine Bemühungen

Gruss Sebastian

#2

Hallo,
Hier ist eine mögliche Lösung für Deine Fragen.

Dim cn As ADODB.Connection
Dim rs As New ADODB.Recordset
Dim parameter As Variant

Set cn = currentproject.Connection
cn.CursorLocation = adUseClient
rs.Open „“, cn, adOpenKeyset, adLockOptimistic,
adCmdTableDirect

'Code zu Frage1
rs.MoveLast
parameter = rs!Spalte3

'Code zu Frage 2
rs.AddNew
rs!Spalte3 = „neuer Eintrag“
rs.Update

'Code zu frage 3
rs.MoveLast
rs!Spalte3 = „neu“
rs.update

cn.Close
Set cn = Nothing