- \n
- Starten Sie LINQPad 5.<\/li>\n
- Klicken Sie im linken Bereich auf Add connection<\/b>.<\/li>\n
- Wechseln Sie im Dialog Choose Datacontext<\/b> aus Bild 1 zum unteren Bereich und wählen Sie dort den Eintrag Entity Framework (DbContext V4\/V5\/V6) <\/b>aus und klicken Sie auf Next<\/b>.<\/li>\n
![\"Einrichten](\"..\/fileadmin\/_temp_\/2020_04\/pic_227_001.png\")
<\/p>\nBild 1: Einrichten einer Datenquelle mit LINQ<\/span><\/b><\/p>\n
- Wählen Sie im Dialog Entity Framework dbContext Connection <\/b>die Dateien für die Eigenschaften Path to Custom Assembly <\/b>und Path to application config file <\/b>aus. Hier wählen Sie die .exe<\/b>-Datei aus, beispielsweise aus dem Ordner Rechnungsverwaltung <\/b>aus dem Download zu diesem Artikel. Nach der Auswahl der ersten Datei werden Sie in einem weiteren Dialog aufgefordert, die Datenbank-Context-Klasse auszuwählen.<\/li>\n
- Anschließend sieht der Dialog Entity Framework DbContext Connection <\/b>wie in Bild 2 aus. Hier können Sie mit der Schaltfläche Test <\/b>noch prüfen, ob die Verbindung hergestellt werden kann. Mit dem Aktivieren der Option Remember this connection <\/b>stellen Sie sicher, dass die Verbindung auch beim nächsten Start von LINQPad <\/b>noch vorhanden ist.<\/li>\n
![\"Einrichten](\"..\/fileadmin\/_temp_\/2020_04\/pic_227_002.png\")
<\/p>\nBild 2: Einrichten der Verbindungsinformationen<\/span><\/b><\/p>\n<\/ul>\n
Der linke Bereich zeigt nun die Entitäten und Felder der Verbindung an (siehe Bild 3). Mit einem Klick der rechten Maustaste auf eine der Entitäten öffnen Sie ein Kontextmenü, das bereits einige mögliche Befehle für diese Entität anzeigt. Klicken Sie einen dieser Einträge an, wird die passende LINQ-Abfrage im Query-Fenster eingefügt.<\/p>\n
![\"Die](\"..\/fileadmin\/_temp_\/2020_04\/pic_227_003.png\")
<\/p>\nBild 3: Die Entitäten der neuen Verbindung<\/span><\/b><\/p>\n
Standardmäßig zeigt dies nun eine C#-Abfrage an. Wenn Sie möchten, dass automatisch VB-Abfragen erstellt werden, öffnen Sie mit dem Menüeintrag Edit|Preferences <\/b>den Optionen-Dialog und stellen Sie auf der Seite Query <\/b>die Option Default Query Language <\/b>auf VBA Expression <\/b>oder VB Statement(s) <\/b>ein.<\/p>\n
Damit sind Sie nun auch bereit, eigene LINQ-Abfragen auf Basis der Entitäten des Entity Data Models abzusetzen. Diese geben Sie einfach auf einer Seite mit dem Wert VB Expression <\/b>im Auswahlfeld Language <\/b>ein. Sie können übrigens in LINQPad den Verweis auf die Context-Klasse des Entity Data Models weglassen.<\/p>\n
Ein Zugriff auf die Entitätslisten kann auch ohne Angabe dieser Klasse erfolgen. Allerdings ist das in Visual Studio nicht möglich, sodass wir in den folgenden Beispielen jeweils auf das Objekt dbContext <\/b>zugreifen. Die Deklaration und Initialisierung wollen wir jedoch nur einmal anführen:<\/p>\n
Dim <\/span>dbContext As <\/span>RechnungsverwaltungContext\r\ndbContext = New<\/span> RechnungsverwaltungContext<\/pre>\nEinen Datensatz hinzufügen<\/b><\/p>\n
Um einen Datensatz hinzuzufügen, benötigen wir noch nicht einmal einen LINQ-Ausdruck. Wir erstellen einfach ein neues Objekt des gewünschten Typs, hier Kunde<\/b>, und weisen diesem die Eigenschaftswerte zu. Dann fügen wir das neue Kunde<\/b>-Objekt mit der Add<\/b>-Methode zur Auflistung Kunden <\/b>hinzu und übernehmen die Änderungen durch einen Aufruf der SaveChanges<\/b>-Methode in die Datenbank. Schließlich geben wir als Nachweis des erfolgreichen Anlegens noch den Wert des Primärschlüsselfeldes des neuen Datensatzes aus:<\/p>\n
'###Beispiel 1\r\n'Einen Kunden hinzufügen\r\nDim <\/span>dbContext As <\/span>RechnungsverwaltungContext\r\ndbContext = New<\/span> RechnungsverwaltungContext\r\nDim <\/span>NeuerKunde As <\/span>Kunde\r\nNeuerKunde = New<\/span> Kunde\r\nWith<\/span> NeuerKunde\r\n .AnredeID = 1\r\n .Vorname = \"André\"\r\n .Nachname = \"Minhorst\"\r\nEnd With<\/span>\r\ndbContext.Kunden.Add(NeuerKunde)\r\ndbContext.SaveChanges\r\nDebug.Print<\/span>(NeuerKunde.ID)<\/pre>\nPlatzsparende Schreibweise für das Anlegen eines neuen Elements<\/b><\/p>\n
Wir können ein paar Zeilen Code sparen, wenn wir das Anlegen wie folgt programmieren:<\/p>\n
'###Beispiel 2\r\n'Kunde hinzufügen, Kurzfassung\r\nDim <\/span>NeuerKunde As <\/span>Kunde\r\nNeuerKunde = New<\/span> Kunde With<\/span> {.AnredeID = 1, .Vorname = \"André\", .Nachname = \"Minhorst\"}\r\ndbContext.Kunden.Add(NeuerKunde)\r\ndbContext.SaveChanges\r\nDebug.Print<\/span>(NeuerKunde.ID)<\/pre>\nMöchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Visual Basic Entwickler<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 200 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t - Wechseln Sie im Dialog Choose Datacontext<\/b> aus Bild 1 zum unteren Bereich und wählen Sie dort den Eintrag Entity Framework (DbContext V4\/V5\/V6) <\/b>aus und klicken Sie auf Next<\/b>.<\/li>\n