Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

SQL
Autor: Vlad
Datum: 29.07.02 12:59
Hallo, habe folgendes Problem: Ich will Datensätze aus meiner Datenbank löschen, die DB besteht aus mehreren Tabellen die miteinander verknüpft sind. Das Problem ist dass "er" nur den Datensatz der letzten Tabelle löscht und nicht aus allen Tabellen. Hier mein Code: Dim sSearch As String On Error GoTo ErrDel Set RecTemp = New ADODB.Recordset sSearch = "SELECT * FROM Auftragsdaten LEFT JOIN(Pos_Brennteil LEFT JOIN Walznr ON Pos_Brennteil.[idPos] = Walznr.[idPos]) ON Auftragsdaten.[idAuftrag] =Pos_Brennteil.[idAuftrag] WHERE strAuftrag='" + CStr(mvarAuftrag) + "' AND idKunde=" + CStr(mvaridKunde) + "" RecTemp.Open sSearch, ConTemp, adOpenStatic, adLockOptimistic, adCmdText If RecTemp.RecordCount <= 0 Then MsgBox "Die Datenbank hat keine Einträge! ", vbInformation RecTemp.Close Exit Sub End If RecTemp.Delete RecTemp.Close Set RecTemp = Nothing Exit Sub ErrDel: MsgBox "Fehler! " + vbCrLf + Error, vbCritical, "Fehler" Set RecTemp = Nothing End Sub

SQL	59	Vlad	29.07.02 12:59
Re: SQL	207	Dieter	29.07.02 13:08
Re: SQL	33	Vlad	29.07.02 13:20

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen