Hallo,
ich habe folgenden Code geschrieben:
Jetzt weiß ich nicht weiter. Ich möchte festellen, ob es einen Dataensatz schon in der DB gibt, um den User zu fragen, ob dieser Datensatz gelöscht werden soll, oder eben nicht.
Wie kriege ich das mit ADO hin?
Gruß
Ralph
ich habe folgenden Code geschrieben:
Code:
' 'Verbindung und Datensätze einrichten ' Dim mdbConnection As New ADODB.Connection Dim mdbRecordset As New ADODB.Recordset ' 'Tabelle BESTELLUNG ansprechen ' mdbRecordset.Open "Bestellung", _ mdbConnection, _ CursorType:=adopenKeyset, _ LockType:=adLockOptimistic ' 'Nach der Auftragsnummer(2) suchen ' With mdbRecordset strSQL = "SELECT auftragsnummer2" & _ "FROM bestellung" & _ "WHERE auftragsnummer2 = 'auftragsnummer(2)'" Set rs = ???? a = msgbox("Eine Bestellung mit der Auftragsnummer " & auftragsnummer(2) & Chr(10) & _ "existiert schon." & Chr(10) & Chr(10) & "Soll der entsprechende Datensatz aus der" & _ Chr(10) & "Datenbank entfernt und durch die aktuelle" & Chr(10) & _ "Bestellung ersetzt werden?", vbYesNo) End With
Wie kriege ich das mit ADO hin?
Gruß
Ralph
Comment