danisan
Grünschnabel
Moin zusammen,
habe ein Problem mit meinem Datenbankzugriff unter
VB.net 2003.
Mit Hilfe einer Select-Abfrage in SQL kann ich
die Datensätze meiner Datenbank ohne
Probleme auslesen. Die DB ist relational angelegt.
Wenn ich nun aber versuche, neue Datensätze in die
Datenbank zu schreiben, gibt es ein Problem:
Mit folgender Befehlsfolge kann ich Daten hinzufügen:
INSERT INTO Tabelle1(Feld)
VALUES (Blabla)
Problem ist,dass ich net mehrere Einträge gleichzeitg
durchführen kann und zwar in mehrere Tabellen
gleichzeitig.
VB.net akzeptiert nicht meine Syntax.
Kann mir jemand einen Tip geben, wie ich in die
verschiedenen verknüpften Tabellen gleichzeitig
Werte schreiben kann?
Der bisherige Code lautet wie folgt:
Der SELECT-Befehl ist dieser, denn es sind wirklich viele Tabellen:
In diese Tabellen sollen nun neue Datensätze eingefügt werden.
Das lässt sich über die grafische Benutzeroberfläche handhaben.
Aber der gültige Befehl für das INSERT INTO
schlägt fehl.
Wär euch sehr dankbar, wenn ihr mir helfen könnt.
LG
danisan

habe ein Problem mit meinem Datenbankzugriff unter
VB.net 2003.
Mit Hilfe einer Select-Abfrage in SQL kann ich
die Datensätze meiner Datenbank ohne
Probleme auslesen. Die DB ist relational angelegt.
Wenn ich nun aber versuche, neue Datensätze in die
Datenbank zu schreiben, gibt es ein Problem:
Mit folgender Befehlsfolge kann ich Daten hinzufügen:
INSERT INTO Tabelle1(Feld)
VALUES (Blabla)
Problem ist,dass ich net mehrere Einträge gleichzeitg
durchführen kann und zwar in mehrere Tabellen
gleichzeitig.
VB.net akzeptiert nicht meine Syntax.
Kann mir jemand einen Tip geben, wie ich in die
verschiedenen verknüpften Tabellen gleichzeitig
Werte schreiben kann?
Der bisherige Code lautet wie folgt:
Code:
Dim _dt As New DataTable
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Datenbankverbindung deklarieren'
Dim Cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=meine_ Datenbank.mdb;" & "User ID=Admin;")
'Datenadapter mit den im Puffer gespeicherten Daten füllen
OleDbDataAdapter1.Fill(_dt)
Cn.Close()
DataGrid1.DataSource = _dt
'Konvertierung der Datensätze in eine Zeichenkette
DataGrid1.DataMember = _dt.ToString
End Sub
Der SELECT-Befehl ist dieser, denn es sind wirklich viele Tabellen:
Code:
SELECT Artikel.Artikelname, Einkaufspreis.Stückzahl, Einkaufspreis.Stückpreis, Lieferant.Name, Wareneingang.LieferNr, Wareneingang.Lieferdatum,
Verkaufspreis.Stückzahl AS Stck, Verkaufspreis.Stückpreis AS Stckpreis, Käufer.Nachname, Warenausgang.Rechnungsnr, Warenausgang.Datum,
Warenausgang.bezahlt
FROM (((((Warenausgang INNER JOIN
Käufer ON Warenausgang.KID = Käufer.KID) INNER JOIN
Wareneingang ON Warenausgang.LieferNr = Wareneingang.LieferNr) INNER JOIN
(Lieferant INNER JOIN
Einkaufspreis ON Lieferant.VID = Einkaufspreis.VID) ON Wareneingang.LieferNr = Einkaufspreis.LieferNr) INNER JOIN
Verkaufspreis ON Warenausgang.Rechnungsnr = Verkaufspreis.Rechnungsnr) INNER JOIN
Artikel ON Warenausgang.Artikelnr = Artikel.Artikelnr)
In diese Tabellen sollen nun neue Datensätze eingefügt werden.
Das lässt sich über die grafische Benutzeroberfläche handhaben.
Aber der gültige Befehl für das INSERT INTO
schlägt fehl.
Wär euch sehr dankbar, wenn ihr mir helfen könnt.
LG
danisan

