{"id":55001125,"date":"2018-04-01T00:00:00","date_gmt":"2020-05-13T21:19:00","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=1125"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Daten_in_Properties_verstecken","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/","title":{"rendered":"Daten in Properties verstecken"},"content":{"rendered":"

\"\"<\/p>\n

Daten schreibt man in einer Datenbank üblicherweise in die Datensätze der enthaltenen Tabellen. Manchmal möchten Sie aber vielleicht wichtige Informationen, die nicht zu den vom Benutzer verwendeten Daten gehören, versteckt unterbringen. Ein gutes Beispiel dafür ist das Datum der ersten Anwendung einer Datenbank, für die der Benutzer nur über einen bestimmten Zeitraum benutzen darf. Dieser Artikel zeigt, wo Sie solche Daten unterbringen können und wie Sie diese wieder abrufen.<\/b><\/p>\n

Datenbank-Properties<\/h2>\n

Die erste Möglichkeit, Daten vor herkömmlichen Benutzern zu verstecken, ist eine einfache Datenbank-Property, also eine Datenbank-Eigenschaft. Diese erreichen Sie über die Auflistung Properties <\/b>des Database<\/b>-Objekts. Wenn Sie alle Datenbank-Eigenschaften der aktuellen Datenbank ausgeben möchten, nutzen Sie dazu die Auflistung Properties <\/b>des mit CurrentDb <\/b>ermittelten Database<\/b>-Objekts. Diese können Sie beispielsweise mit der folgenden Prozedur durchlaufen und im Direktbereich ausgeben lassen:<\/p>\n

Public Sub <\/span>GetAllProperties()\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Set<\/span> db = CodeDb\r\n     For Each prp In db.Properties\r\n         Debug.Print<\/span> prp.Name,\r\n         On Error Resume Next<\/span>\r\n         Debug.Print<\/span> prp.Value\r\n         If <\/span>Not<\/span> Err.Number = 0 Then<\/span>\r\n             Debug.Print<\/span> \"<Error>\"\r\n         End If<\/span>\r\n         On Error GoTo<\/span> 0\r\n     Next<\/span> prp\r\nEnd Sub<\/span><\/pre>\n
Gegebenenfalls tritt bei manchen Eigenschaften ein Fehler auf, den wir hier durch die Ausgabe von <\/b> umgehen. Das Ergebnis sieht beispielsweise wie in Bild 1 aus.<\/p>\n
\"Ausgabe<\/p>\n
Bild 1: Ausgabe der Properties einer Datenbank<\/span><\/b><\/p>\n
Benutzerdefinierte Eigenschaft setzen<\/h2>\n
Wenn Sie eine eigene Eigenschaft setzen wollen, können Sie die folgende Prozedur nutzen. Diese erwartet als Parameter den Namen der zu setzenden\/zu erzeugenden Eigenschaft sowie den Wert, den diese Eigenschaft annehmen soll. Wie Sie dem vorherigen Satz entnehmen können, prüft diese Prozedur indirekt, ob die Eigenschaft bereits vorhanden ist und legt diese nur an, falls dies nicht der Fall ist.<\/p>\n
Die Prozedur deklariert ein Database<\/b>– und ein Property<\/b>-Element und füllt das Database<\/b>-Objekt mit der Funktion CurrentDb<\/b>. Danach versucht sie dem Element der Properties<\/b>-Auflistung des aktuellen Database<\/b>-Objekts mit dem Namen aus strProperty <\/b>den Wert strValue <\/b>zuzuweisen. Ist diese Eigenschaft bereits vorhanden, gelingt dies ohne Probleme. Anderenfalls löst dies den Fehler mit der Nummer 3270 <\/b>aus. Da wir für den Fall eines Fehlers einen Sprung zu der Marke Fehler <\/b>vorgesehen haben, springt die Prozedur zu dieser Stelle und prüft, ob der ausgelöste Fehler die Fehlernummer 3270 <\/b>aufweist.<\/p>\n
Falls ja, steht fest, dass die gewünschte Eigenschaft schlicht noch nicht vorhanden ist und wir diese zunächst anlegen müssen. Das erledigen wir mit zwei Anweisungen. Die erste legt die neue Eigenschaft mit der CreateProperty<\/b>-Methode an, wobei wir dieser den Namen, den Typ (dbText<\/b>) und den Wert als Parameter übergeben. Anschließend hängen wir die Eigenschaft mit der Append<\/b>-Methode an die Liste der Eigenschaften der Datenbank an (db.Properties.Append<\/b>). Außerdem aktualisieren wir die Liste der Eigenschaften mit der Refresh<\/b>-Methode:<\/p>\n
Public Sub <\/span>SetProperty(strProperty As String<\/span>, _\r\n         strValue As String<\/span>)\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     On Error GoTo<\/span> Fehler\r\n     Set<\/span> db = CurrentDb\r\n     db.Properties(strProperty) = strValue\r\nEnde:\r\n     On Error Resume Next<\/span>\r\n     Exit Function<\/span>\r\nFehler:\r\n     If <\/span>Err.Number = 3270 Then<\/span>\r\n         Set<\/span> prp = db.CreateProperty(strProperty, _\r\n             dbText, strValue)\r\n         db.Properties.Append prp\r\n         db.Properties.Refresh\r\n     End If<\/span>\r\n     Resume Ende\r\nEnd Sub<\/span><\/pre>\n
Die Prozedur können wir auch etwas umformulieren:<\/p>\n
Public Function <\/span>SetProperty(strProperty As String<\/span>, _\r\n         strValue As String<\/span>)\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     Set<\/span> db = CurrentDb\r\n     On Error Resume Next<\/span>\r\n     Set<\/span> prp = db.CreateProperty(strProperty, _\r\n         dbText, strValue)\r\n     db.Properties.Append prp\r\n     db.Properties.Refresh\r\n     If <\/span>Not<\/span> Err.Number = 0 Then<\/span>\r\n         db.Properties(strProperty) = strValue\r\n     End If<\/span>\r\nEnd Function<\/span><\/pre>\n
<\/p>\n
In diesem Fall deaktivieren wir zunächst die Fehlerbehandlung und versuchen, die Eigenschaft neu zu erstellen und direkt zu füllen. Gelingt dies nicht, wird ein Fehler ausgelöst. Deshalb prüfen wir gleich im Anschluss, ob ein Fehler ausgelöst wurde. Falls ja, können wir davon ausgehen, dass die Eigenschaft bereits vorhanden ist und fügen den Wert durch einfache Zuweisung an db.Properties(strProperty)<\/b> hinzu. <\/p>\n
Eigenschaft auslesen<\/h2>\n
Das Auslesen einer speziellen Eigenschaft erfordert von der dafür vorgesehen Funktion wieder die Angabe eines Parameters, nämlich des Namens der auszugebenden Eigenschaft. Die folgende Funktion ermittelt bei deaktivierter Fehlerbehandlung den Wert der mit dem Parameter strProperty <\/b>angegebenen Eigenschaft. Ist diese nicht vorhanden, liefert die Funktion eine leere Zeichenkette zurück:<\/p>\n
Public Function <\/span>GetProperty(strProperty As String<\/span>) As String<\/span>\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Set<\/span> db = CurrentDb\r\n     On Error Resume Next<\/span>\r\n     Set<\/span> prp = db.Properties(strProperty)\r\n     On Error GoTo<\/span> 0\r\n     If <\/span>Not<\/span> prp Is Nothing Then<\/span>\r\n         GetProperty = prp.Value\r\n     End If<\/span>\r\nEnd Function<\/span><\/pre>\n
Daten per Fernzugriff ermitteln<\/h2>\n
Nun kann der Benutzer allerdings, selbst wenn Sie die Datenbank in eine .mde <\/b>oder .accde <\/b>umgewandelt haben, von anderen Datenbanken aus auf die Eigenschaften der Datenbank zugreifen. Dazu versehen wir die Prozedur GetAllProperties <\/b>mit einem Parameter, nämlich einem Verweis auf die zu untersuchende Datenbank:<\/p>\n
Public Sub <\/span>GetAllProperties(db As <\/span>DAO.Database)\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     For Each prp In db.Properties\r\n         Debug.Print<\/span> prp.Name,\r\n         On Error Resume Next<\/span>\r\n         Debug.Print<\/span> prp.Value\r\n         If <\/span>Not<\/span> Err.Number = 0 Then<\/span>\r\n             Debug.Print<\/span> \"<Error>\"\r\n         End If<\/span>\r\n         On Error GoTo<\/span> 0\r\n     Next<\/span> prp\r\nEnd Sub<\/span><\/pre>\n
Danach können Sie die Eigenschaften einer anderen Datenbank mit der folgenden Prozedur auslesen. Dazu tragen Sie einfach für die Variable strPfad <\/b>den Pfad zu der gesuchten Datenbank ein:<\/p>\n
Public Sub <\/span>Fernzugriff()\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Dim <\/span>strPfad As String<\/span>\r\n     strPfad = \"C:\\...\\Freischaltungsschluessel_II.accdb\"\r\n     Set<\/span> db = DBEngine.OpenDatabase(strPfad)\r\n     GetAllProperties db\r\nEnd Sub<\/span><\/pre>\n
Das Ergebnis: Die Methode gibt die Eigenschaften der Datenbank samt der Werte genauso aus, als ob sich die Prozedur in der Zieldatenbank selbst befinden würde. Der versierte Benutzer könnte also sensible Informationen wie ein Startdatum der ersten Benutzung der Anwendung leicht auslesen, wenn er sich ein wenig auskennt.<\/p>\n
Was können wir dagegen tun Wir könnten die Information zum Beispiel an anderen Stellen verbergen, beispielsweise in den Eigenschaften eines Feldes einer Tabelle.<\/p>\n
Information in Eigenschaften eines Tabellenfeldes schreiben<\/h2>\n
Wenn wir beispielsweise eine Tabelle namens tblOptionen <\/b>in der Anwendung nutzen, deren Primärschlüsselfeld ID <\/b>heißt, können wir die Eigenschaften dieses Feldes mit der folgenden Prozedur ausgeben:<\/p>\n
Public Sub <\/span>GetFieldProperties()\r\n     Dim <\/span>tdf As <\/span>DAO.TableDef\r\n     Dim <\/span>fld As <\/span>DAO.Field\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Set<\/span> db = CurrentDb\r\n     Set<\/span> tdf = db.TableDefs(\"tblOptionen\")\r\n     Set<\/span> fld = tdf.Fields(\"ID\")\r\n     For Each prp In fld.Properties\r\n         On Error Resume Next<\/span>\r\n         Debug.Print<\/span> prp.Name & \": \" & prp.Value\r\n         On Error GoTo<\/span> 0\r\n     Next<\/span> prp\r\n     Set<\/span> fld = Nothing\r\n     Set<\/span> tdf = Nothing\r\n     Set<\/span> db = Nothing\r\nEnd Sub<\/span><\/pre>\n
Eigenschaft für Tabellenfeld anlegen<\/h2>\n
Mit der folgenden Prozedur können Sie nun eine Eigenschaft anlegen und füllen beziehungsweise einer bereits bestehenden Eigenschaft einen Wert zuweisen:<\/p>\n
Public Function <\/span>SetFieldProperty(strProperty As String<\/span>, _\r\n         strValue As String<\/span>)\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Dim <\/span>tdf As <\/span>DAO.TableDef\r\n     Dim <\/span>fld As <\/span>DAO.Field\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     Set<\/span> db = CurrentDb\r\n     Set<\/span> tdf = db.TableDefs(\"tblOptionen\")\r\n     Set<\/span> fld = tdf.Fields(\"ID\")\r\n     On Error Resume Next<\/span>\r\n     Set<\/span> prp = db.CreateProperty(strProperty, _\r\n         dbText, strValue)\r\n     fld.Properties.Append prp\r\n     fld.Properties.Refresh\r\n     If <\/span>Not<\/span> Err.Number = 0 Then<\/span>\r\n         fld.Properties(strProperty) = strValue\r\n     End If<\/span>\r\nEnd Function<\/span><\/pre>\n
Auf diese Weise können Sie nun auch eine Eigenschaft in die Properties<\/b>-Liste eines Feldes einer Tabelle schreiben. Dieses dürfte der unbedarfte Benutzer kaum ausfindig machen.<\/p>\n
Eigenschaft aus Tabellenfeld abrufen<\/h2>\n
Zum Abrufen der so angelegten Eigenschaften verwenden Sie die folgende Funktion, welche die mit dem Parameter strProperty <\/b>übergebene Eigenschaft aus der Properties<\/b>-Liste des Feldes ID <\/b>der Tabelle tblOptionen <\/b>ausliest:<\/p>\n
Public Function <\/span>GetFieldProperty(strProperty As String<\/span>) _\r\n         As String<\/span>\r\n     Dim <\/span>prp As <\/span>DAO.Property\r\n     Dim <\/span>db As <\/span>DAO.Database\r\n     Dim <\/span>tdf As <\/span>DAO.TableDef\r\n     Dim <\/span>fld As <\/span>DAO.Field\r\n     Set<\/span> db = CodeDb\r\n     Set<\/span> tdf = db.TableDefs(\"tblOptionen\")\r\n     Set<\/span> fld = tdf.Fields(\"ID\")\r\n     On Error Resume Next<\/span>\r\n     Set<\/span> prp = fld.Properties(strProperty)\r\n     On Error GoTo<\/span> 0\r\n     If <\/span>Not<\/span> prp Is Nothing Then<\/span>\r\n         GetFieldProperty = prp.Value\r\n     End If<\/span>\r\nEnd Function<\/span><\/pre>\n
Wenn Sie die zuvor beschriebenen Routinen flexibler einsetzen wollen, können Sie die Angabe des Tabellen- und des Feldnamens auch per Parameter erledigen. Die Prozedur SetFieldProperty <\/b>ändert sich dann wie folgt:<\/p>\n
Public Function <\/span>SetFieldProperty(strProperty As String<\/span>,  strValue As String<\/span>, strTable As String<\/span>, strField As <\/span> String)\r\n     ,,,\r\n     Set<\/span> tdf = db.TableDefs(strTable)\r\n     Set<\/span> fld = tdf.Fields(strField)\r\n     ...\r\nEnd Function<\/span><\/pre>\n
Die Funktion GetFieldProperty <\/b>ändert sich bei Verwendung von Parametern für den Tabellen- und den Feldnamen wie folgt:<\/p>\n
Public Function <\/span>GetFieldProperty(strProperty As String<\/span>,  strTable As String<\/span>, strField As String<\/span>) As String<\/span>\r\n     ...\r\n     Set<\/span> tdf = db.TableDefs(strTable)\r\n     Set<\/span> fld = tdf.Fields(strField)\r\n     ...\r\nEnd Function<\/span><\/pre>\n
Dabei ist in beiden Routinen keine Fehlerbehandlung für den Fall vorgesehen, dass die angegebene Tabelle oder das angegebene Feld nicht vorhanden sind.<\/p>\n
Zusammenfassung und Ausblick<\/h2>\n
Dieser Beitrag hat gezeigt, wie Sie sensible Daten in den Eigenschaften der Datenbank oder auch in den Eigenschaften des Feldes einer Tabelle unterbringen können. Diese findet der Benutzer hier nicht so schnell wie etwa in der Registry oder in den Tabellen Ihrer Datenbank, wo die Information offen zugänglich sind.<\/p>\n
Downloads zu diesem Beitrag<\/h3>\n
Enthaltene Beispieldateien:<\/p>\n
DatenInPropertiesVerstecken.accdb<\/p>\n
Download<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"
Daten schreibt man in einer Datenbank üblicherweise in die Datensätze der enthaltenen Tabellen. Manchmal möchten Sie aber vielleicht wichtige Informationen, die nicht zu den vom Benutzer verwendeten Daten gehören, versteckt unterbringen. Ein gutes Beispiel dafür ist das Datum der ersten Anwendung einer Datenbank, für die der Benutzer nur über einen bestimmten Zeitraum benutzen darf. Dieser Artikel zeigt, wo Sie solche Daten unterbringen können und wie Sie diese wieder abrufen.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[66022018,662018,44000025],"tags":[],"class_list":["post-55001125","post","type-post","status-publish","format-standard","hentry","category-66022018","category-662018","category-VBA_und_Programmiertechniken"],"yoast_head":"\nDaten in Properties verstecken - Access im Unternehmen<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Daten in Properties verstecken\" \/>\n<meta property=\"og:description\" content=\"Daten schreibt man in einer Datenbank üblicherweise in die Datensätze der enthaltenen Tabellen. Manchmal möchten Sie aber vielleicht wichtige Informationen, die nicht zu den vom Benutzer verwendeten Daten gehören, versteckt unterbringen. Ein gutes Beispiel dafür ist das Datum der ersten Anwendung einer Datenbank, für die der Benutzer nur über einen bestimmten Zeitraum benutzen darf. Dieser Artikel zeigt, wo Sie solche Daten unterbringen können und wie Sie diese wieder abrufen.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/\" \/>\n<meta property=\"og:site_name\" content=\"Access im Unternehmen\" \/>\n<meta property=\"article:published_time\" content=\"2020-05-13T21:19:00+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/vg06.met.vgwort.de\/na\/5700f8b334664b7b90a0556b8780d3c9\" \/>\n<meta name=\"author\" content=\"Andr\u00e9 Minhorst\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Verfasst von\" \/>\n\t<meta name=\"twitter:data1\" content=\"Andr\u00e9 Minhorst\" \/>\n\t<meta name=\"twitter:label2\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data2\" content=\"8\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/\"},\"author\":{\"name\":\"Andr\u00e9 Minhorst\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\"},\"headline\":\"Daten in Properties verstecken\",\"datePublished\":\"2020-05-13T21:19:00+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/\"},\"wordCount\":1017,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/5700f8b334664b7b90a0556b8780d3c9\",\"articleSection\":[\"2\\\/2018\",\"2018\",\"VBA und Programmiertechniken\"],\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/\",\"name\":\"Daten in Properties verstecken - Access im Unternehmen\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#primaryimage\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/5700f8b334664b7b90a0556b8780d3c9\",\"datePublished\":\"2020-05-13T21:19:00+00:00\",\"breadcrumb\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#primaryimage\",\"url\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/5700f8b334664b7b90a0556b8780d3c9\",\"contentUrl\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/5700f8b334664b7b90a0556b8780d3c9\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Daten_in_Properties_verstecken\\\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Daten in Properties verstecken\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"name\":\"Access im Unternehmen\",\"description\":\"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access\",\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\\\/\\\/access-im-unternehmen.de\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"de\"},{\"@type\":\"Organization\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\",\"name\":\"Andr\u00e9 Minhorst Verlag\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"contentUrl\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"width\":370,\"height\":111,\"caption\":\"Andr\u00e9 Minhorst Verlag\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\",\"name\":\"Andr\u00e9 Minhorst\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"caption\":\"Andr\u00e9 Minhorst\"}}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","yoast_head_json":{"title":"Daten in Properties verstecken - Access im Unternehmen","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/","og_locale":"de_DE","og_type":"article","og_title":"Daten in Properties verstecken","og_description":"Daten schreibt man in einer Datenbank üblicherweise in die Datensätze der enthaltenen Tabellen. Manchmal möchten Sie aber vielleicht wichtige Informationen, die nicht zu den vom Benutzer verwendeten Daten gehören, versteckt unterbringen. Ein gutes Beispiel dafür ist das Datum der ersten Anwendung einer Datenbank, für die der Benutzer nur über einen bestimmten Zeitraum benutzen darf. Dieser Artikel zeigt, wo Sie solche Daten unterbringen können und wie Sie diese wieder abrufen.","og_url":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/","og_site_name":"Access im Unternehmen","article_published_time":"2020-05-13T21:19:00+00:00","og_image":[{"url":"http:\/\/vg06.met.vgwort.de\/na\/5700f8b334664b7b90a0556b8780d3c9","type":"","width":"","height":""}],"author":"Andr\u00e9 Minhorst","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Andr\u00e9 Minhorst","Gesch\u00e4tzte Lesezeit":"8\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#article","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/"},"author":{"name":"Andr\u00e9 Minhorst","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f"},"headline":"Daten in Properties verstecken","datePublished":"2020-05-13T21:19:00+00:00","mainEntityOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/"},"wordCount":1017,"commentCount":0,"publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#primaryimage"},"thumbnailUrl":"http:\/\/vg06.met.vgwort.de\/na\/5700f8b334664b7b90a0556b8780d3c9","articleSection":["2\/2018","2018","VBA und Programmiertechniken"],"inLanguage":"de","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/","url":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/","name":"Daten in Properties verstecken - Access im Unternehmen","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#primaryimage"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#primaryimage"},"thumbnailUrl":"http:\/\/vg06.met.vgwort.de\/na\/5700f8b334664b7b90a0556b8780d3c9","datePublished":"2020-05-13T21:19:00+00:00","breadcrumb":{"@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#primaryimage","url":"http:\/\/vg06.met.vgwort.de\/na\/5700f8b334664b7b90a0556b8780d3c9","contentUrl":"http:\/\/vg06.met.vgwort.de\/na\/5700f8b334664b7b90a0556b8780d3c9"},{"@type":"BreadcrumbList","@id":"https:\/\/access-im-unternehmen.de\/Daten_in_Properties_verstecken\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/access-im-unternehmen.de\/"},{"@type":"ListItem","position":2,"name":"Daten in Properties verstecken"}]},{"@type":"WebSite","@id":"https:\/\/access-im-unternehmen.de\/#website","url":"https:\/\/access-im-unternehmen.de\/","name":"Access im Unternehmen","description":"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access","publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/access-im-unternehmen.de\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"de"},{"@type":"Organization","@id":"https:\/\/access-im-unternehmen.de\/#organization","name":"Andr\u00e9 Minhorst Verlag","url":"https:\/\/access-im-unternehmen.de\/","logo":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/","url":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","contentUrl":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","width":370,"height":111,"caption":"Andr\u00e9 Minhorst Verlag"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f","name":"Andr\u00e9 Minhorst","image":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","caption":"Andr\u00e9 Minhorst"}}]}},"_links":{"self":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55001125","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/comments?post=55001125"}],"version-history":[{"count":0,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55001125\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/media?parent=55001125"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/categories?post=55001125"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/tags?post=55001125"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}