Hallo Leute,
ich möchte Datensätze, die in der Spalte ISIN den Eintrag „------------“ haben, gern löschen und habe das folgende Modul geschrieben.
Das funktioniert aber nicht, hat jemand eine Idee woran das liegt ?
Set recLesen = db.OpenRecordset(„Select * From ISIN_komplett_mit_NW_und_KW Order By ISIN“)
Do Until recLesen.EOF
recLesen.Edit
Debug.Print recLesen![ISIN]
If recLesen![ISIN] = „-------------“ Then
DeleteRecordset = True
End If
Gruß Christian
Moin, Christian,
das geht m.E. einfacher:
db.Execute „Delete from ISIN_komplett_mit_NW_und_KW where ISIN = ‚-------------‘“
Gruß Ralf
Hallo Ralf,
das klappt nicht,
wie heißt das komplette Modul ?
Muss ich nicht zunächst die Tabelle öffnen, um die Spalte ISIN auszulesen ? bevor ich sie löschen kann ?
Gruß Christian
Moin, Christian,
das klappt nicht,
so geht’s nicht. Schreib hier bitte die Fehlermeldung hin oder das genaue Verhalten des Dialogs.
wie heißt das komplette Modul ?
Was für ein Modul?
Gruß Ralf
Moin, Ralf,
so geht’s nicht. Schreib hier bitte die Fehlermeldung hin oder
das genaue Verhalten des Dialogs.
tut mir leid, dass ich Euch immer wieder vor solche blöden Beiträge stelle. Sollte mir klar sein, dass Ihr damit nichts anfangen könnt.
Was für ein Modul?
Ich lasse eine Prozedur über die Tabelle laufen die folgendermaßen aussieht.
Public Sub Leerzeilen()
Dim db As Database
Set db = DBEngine.Workspaces(0).Databases(0)
db.Execute „Delete from 20090701105951 where Feld1 = ‚-------------‘“
End Sub
Das Ergebnis ist, dass bei jedem gelöschten Datensatz in jeder Spalte dann „#Gelöscht“ steht.
Gruß Christian