Das Datenmodell sieht im Beziehungen-Fenster wie in Bild 1 aus.<\/p>\n
![\"Die](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_001.png\")
<\/p>\n
Bild 1: Die Tabellen der Datenbank in der Übersicht<\/span><\/b><\/p>\n Um die Tabellen anzulegen, fügst Du nach dem Erstellen einer neuen, leeren Access-Datenbank mit dem Ribbon-Befehl Erstellen|Tabellen|Tabellenentwurf <\/b>jeweils eine neue Tabelle in der Entwurfsansicht an.<\/p>\n Für die Tabelle tblKunden<\/b> fügst Du die Felder mit den Feldnamen und den Felddatentypen wie in Bild 2 hinzu.<\/p>\n Bild 2: Die Tabelle tblKunden in der Entwurfsansicht<\/span><\/b><\/p>\n Die Tabelle tblMailItems<\/b> soll die Felder wie in Bild 3 enthalten. Für das Feld EntryID <\/b>haben wir einen eindeutigen Index definiert, damit jede E-Mail nur einmal zu dieser Tabelle hinzugefügt werden kann. Um das Feld KundeID<\/b> mit der Tabelle tblKunden <\/b>zu verknüpfen, verwenden wir das Beziehungsfenster. Hier fügen wir die beiden Tabellen wie in der obigen Abbildung hinzu und ziehen dann das Feld KundeID <\/b>der einen Tabelle auf das gleichnamige Feld der anderen Tabelle.<\/p>\n Bild 3: Die Tabelle tblMailItems in der Entwurfsansicht<\/span><\/b><\/p>\n Im nun erscheinenden Dialog Beziehungen bearbeiten <\/b>kannst Du noch die referentielle Integrität festlegen (siehe Bild 4).<\/p>\n Bild 4: Einstellungen für die angelegte Beziehung<\/span><\/b><\/p>\n Das einzige Formular der Anwendung soll jeweils einen Kundendatensatz anzeigen sowie dessen E-Mails, die ihm per Drag and Drop zugewiesen wurden. Dazu benötigen wir ein Haupt- und ein Unterformular.<\/p>\n Das Unterformular soll die Daten der Tabelle tblMailItems<\/b> anzeigen. Dazu fügen wir mit dem Ribbonbefehl Erstellen|Formulare|Formularentwurf <\/b>ein neues Formular in der Entwurfsansicht hinzu. Für seine Eigenschaft Datensatzquelle <\/b>legen wir die Tabelle tblMailItems <\/b>fest. Danach können wir über Formularentwurf|Tools|Vorhandene Felder hinzufügen <\/b>die Felder Betreff <\/b>und ErhaltenAm <\/b>in den Formularentwurf ziehen. Damit die Daten in der Datenblattansicht angezeigt werden, stellen wir die Eigenschaft Standardansicht <\/b>auf Datenblatt <\/b>ein. Vor dem Schließen speichern wir das Formular unter dem Namen sfmKundenEMails<\/b>.<\/p>\n Anschließend legen wir ein weiteres Formular an, dem wir die Tabelle tblKunden <\/b>als Datensatzquelle <\/b>hinzufügen. Aus dieser ziehen wir alle Felder außer dem Primärschlüsselfeld KundeID <\/b>in den Detailbereich des Formularentwurfs und ordnen diese nach Wunsch an.<\/p>\n Anschließend ziehen wir das bereits geschlossene Formular sfmKundenEMails <\/b>aus dem Navigationsbereich in den Formularentwurf.<\/p>\n Dieses arrangieren wir unter den übrigen Steuerelementen. Außerdem fügen wir darunter noch eine Schaltfläche hinzu, mit der wir die aktuell im Unterformular markierte E-Mail öffnen wollen. Das Zwischenergebnis sieht wie in Bild 5 aus.<\/p>\n Bild 5: Haupt- und Unterformular in der Entwurfsansicht<\/span><\/b><\/p>\n Dadurch, dass die in den beiden Formularen angezeigten Datensatzquellen über das Fremdschlüsselfeld KundeID <\/b>der Tabelle tblMailItems <\/b>miteinander verknüpft sind, erstellt Access automatisch auch eine Verknüpfung zwischen Haupt- und Unterformular. Diese sorgt dafür, dass das Unterformular nur solche Datensätze der Tabelle tblMailItems <\/b>anzeigt, die mit dem aktuell im Hauptformular angezeigten Datensatz der Tabelle tblKunden <\/b>verknüpft sind. Achtung: Dieses rudimentäre Beispiel ist nicht mit Funktionen ausgestattet, die verhindern, dass der Benutzer im Unterformular Daten anlegt, während das Hauptformular noch keinen Datensatz anzeigt. Solche Datensätze werden später nicht mehr angezeigt, weil sie mit keinem Kunden verknüpft sind.<\/p>\n Um E-Mails per Drag and Drop zum Formular hinzuzufügen, müssen wir noch einen Zielbereich definieren. Die eingebauten Formular- und Steuerelementklassen bieten leider keine Drag and Drop-Funktionalität, daher müssen wir zu einer Alternative greifen und etwas improvisieren. Also fügen wir dem Entwurf des Formulars ein ListView<\/b>-Steuerelement hinzu.<\/p>\n Prinzipiell bieten zwar auch andere Steuerelemente die Möglichkeit, auf Drag and Drop-Vorgänge zu reagieren, aber mit dem ListView<\/b>-Steuerelement können wir noch eine Bilddatei als Icon integrieren, die wir zur Kenntlichmachung der Funktion dieses Steuerelements nutzen können. Dazu sind jedoch einige weitere Schritte nötig.<\/p>\n Der erste Schritt ist das Hinzufügen des ListView<\/b>-Steuerelements. Dazu wechseln wir in die Entwurfsansicht des Formulars und betätigen im Ribbon unter Formularentwurf|Steuerelemente <\/b>die Schaltfläche zum Anzeigen weiterer Steuerelemente, wo wir den Eintrag ActiveX-Steuerelemente <\/b>finden (siehe Bild 6).<\/p>\n Bild 6: Hinzufügen eines ActiveX-Steuerelements<\/span><\/b><\/p>\n Dies öffnet den Dialog ActiveX-Steuerelement einfügen<\/b>, wo wir den Eintrag Microsoft ListView Control, version 6.0 <\/b>selektieren und auf OK<\/b> klicken (siehe Bild 7).<\/p>\n Bild 7: Auswahl des ListView-Steuerelements<\/span><\/b><\/p>\n Dies fügt das Steuerelement direkt zum Formular hinzu, sodass wir es nur noch platzieren und die Größe anpassen müssen. Außerdem stellen wir für die Eigenschaft Name <\/b>den Wert ctlMaildrop <\/b>ein. Danach erhalten wir den Stand aus Bild 8.<\/p>\n Bild 8: Platzieren und Benennen des ListView-Steuerelements<\/span><\/b><\/p>\n Wechseln wir in die Formularansicht, sehen wir allerdings nur ein leeres, weißes Steuerelement. Selbst für interne Zwecke wäre mir das zu spartanisch, und wenn andere Benutzer damit arbeiten sollen, müssen diese schon wissen, was mit dem Steuerelement anzufangen ist<\/p>\n Wir könnten nun eine Beschriftung über dem Steuerelement anlegen, die auf die Funktion hinweist, aber wir wollen es gleich richtig machen: Das Steuerelement selbst soll per Icon plus Text auf seine Funktion hinweisen und wenn der Benutzer mit einem gezogenen Element das Steuerelement überfährt, sollen sich Icon und Text entsprechend verändern.<\/p>\n Wer bereits mit dem TreeView<\/b>– oder dem ListView<\/b>-Steuerelement gearbeitet und dort Icons verwendet hat, der weiß, dass ohne ein weiteres Steuerelement nichts geht: Wir benötigen nämlich noch ein ImageList<\/b>-Steuerelement, um die Icons für das ListView<\/b>-Steuerelement verfügbar zu machen.<\/p>\n Dieses fügen wir auf dem gleichen Wege wie das ListView<\/b>-Steuerelement zum Formular hinzu und nennen es ctlImageList<\/b>. In der Liste der ActiveX-Steuerelemente heißt dieses Steuerelement Microsoft ImageList Control, version 6.0<\/b>. Nach dem Einfügen müssen wir dieses nicht anpassen, da es in der Formularansicht ohnehin nicht sichtbar ist (siehe Bild 9).<\/p>\n Bild 9: Das ImageList-Steuerelement<\/span><\/b><\/p>\n Bevor wir das ImageList<\/b>-Steuerelement weiter anpassen, erstellen wir zwei Bilddateien, die für die verschiedenen Zustände des ListView<\/b>-Steuerelements angezeigt werden sollen.<\/p>\n Für den normalen Zustand soll das Steuerelement ein Mail-Icon und den Text E-Mail hierhin ziehen <\/b>enthalten und für den Zustand, indem der Benutzer ein Element mit der Maus auf das ListView<\/b>-Steuerelement gezogen hat, den Text E-Mail fallen lassen<\/b>.<\/p>\n Diese Icons fügen wir nun dem ImageList<\/b>-Steuerelement hinzu. Dazu klicken wir dieses zunächst doppelt an, um seinen Eigenschaften-Dialog zu öffnen. Hier tragen wir die Größe der soeben erstellten Bilddateien ein, in diesem Fall mit einer Höhe von 50 <\/b>und einer Breite von 300<\/b> (siehe Bild 10). Achtung: Die Höhe kann nur angepasst werden, solange das Steuerelement noch keine Images enthält.<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>Tabellen anlegen<\/h2>\n
![\"Die](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_002.png\")
<\/p>\n![\"Die](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_003.png\")
<\/p>\n![\"Einstellungen](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_004.png\")
<\/p>\nFormulare erstellen<\/h2>\n
Unterformular zur Anzeige der E-Mails anlegen<\/h2>\n
Hauptformular für die Kundendaten anlegen<\/h2>\n
![\"Haupt-](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_005.png\")
<\/p>\nZiel für Drag and Drop hinzufügen<\/h2>\n
ListView als Drag and Drop-Ziel hinzufügen<\/h2>\n
![\"Hinzufügen](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_006.png\")
<\/p>\n![\"Auswahl](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_007.png\")
<\/p>\n![\"Platzieren](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_008.png\")
<\/p>\nIcons für das Steuerelement bereitstellen<\/h2>\n
![\"Das](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_009.png\")
<\/p>\n![\"Einstellen](\"..\/fileadmin\/_temp_\/2022_04\/pic_334_010.png\")
<\/p>\n
\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