Sorry, mal wieder BrettVorDemKopf.
Ich will in meiner Anwendung die Datenbank resetten können (User soll quasi mit leerer DB bei Null beginnen können). Das bedeutet, dass die ganzen Tabelleninhalte inner DB gelöscht werden sollen. Danach müssen gewisse Tabellen für den internen Gebrauch programmgesteuert wieder mit Standardwerten gefüllt werden. Bisher baue ich manuell eine Connection auf und fahre SQL-Commands direkt gegen die DB. Funktioniert auch, aber hey, wofür habe ich eigentlich ein typisiertes Dataset. Wollte ich also meine Funktion umschreiben und hab es so versucht:
(achso Hinweis: das DataSet spreche ich über die DBExtensions des EdR an).
Funktioniert aber nicht. Ich kriege zwar bei den .Clear-Aktionen keine Fehlermeldung, dafür aber beim Rows.Add. Nämlich, dass die Datensätze mit den gewählten Namen (handelt sich hierbei nämlich um die PrimKey-Spalte) schon vorhanden sind. Also klappt das Löschen wohl nicht richtig. Ich finde aber über IntelliSense und Google usw. nix anderes, was sich zum Löschen von Tabelleninhalten (das Schema soll ja erhalten bleiben) anbieten würde.
Kann mir jemand helfen?
Ich will in meiner Anwendung die Datenbank resetten können (User soll quasi mit leerer DB bei Null beginnen können). Das bedeutet, dass die ganzen Tabelleninhalte inner DB gelöscht werden sollen. Danach müssen gewisse Tabellen für den internen Gebrauch programmgesteuert wieder mit Standardwerten gefüllt werden. Bisher baue ich manuell eine Connection auf und fahre SQL-Commands direkt gegen die DB. Funktioniert auch, aber hey, wofür habe ich eigentlich ein typisiertes Dataset. Wollte ich also meine Funktion umschreiben und hab es so versucht:
VB.NET-Quellcode
- Private Sub Standardwerte()
- DsFinanzKnecht.Buchungsart.Clear()
- ...weitere Tables.Clear...
- DsFinanzKnecht.Save(Me)
- Dim BArow1 As dsFinanzKnecht.BuchungsartRow
- BArow1 = DsFinanzKnecht.Buchungsart.NewRow
- BArow1.Name = "Ausgabe"
- DsFinanzKnecht.Buchungsart.Rows.Add(BArow1)
- Dim BArow2 As dsFinanzKnecht.BuchungsartRow
- BArow2 = DsFinanzKnecht.Buchungsart.NewRow
- BArow2.Name = "Einnahme"
- DsFinanzKnecht.Buchungsart.Rows.Add(BArow2)
- ... (fülle auf diese Arte weitere Tables)...
(achso Hinweis: das DataSet spreche ich über die DBExtensions des EdR an).
Funktioniert aber nicht. Ich kriege zwar bei den .Clear-Aktionen keine Fehlermeldung, dafür aber beim Rows.Add. Nämlich, dass die Datensätze mit den gewählten Namen (handelt sich hierbei nämlich um die PrimKey-Spalte) schon vorhanden sind. Also klappt das Löschen wohl nicht richtig. Ich finde aber über IntelliSense und Google usw. nix anderes, was sich zum Löschen von Tabelleninhalten (das Schema soll ja erhalten bleiben) anbieten würde.
Kann mir jemand helfen?
![;(](https://www.vb-paradise.de/wcf/images/smilies/crying.png)
Ich code nur 'just for fun'! Damit kann ich jeden Mist entschuldigen, den mein Interpreter verdauen muss ![:D](https://www.vb-paradise.de/wcf/images/smilies/biggrin.png)
![:D](https://www.vb-paradise.de/wcf/images/smilies/biggrin.png)