vba:access:functions:persist
Differences
This shows you the differences between two versions of the page.
| Both sides previous revision Previous revision Next revision | Previous revision | ||
|
vba:access:functions:persist [09.10.2014 16:50:53] yaslaw [Beispiele zu den verschiedenen Anwendungsformaen] |
vba:access:functions:persist [04.09.2019 11:57:48] (current) yaslaw |
||
|---|---|---|---|
| Line 1: | Line 1: | ||
| <const> | <const> | ||
| - | version=1.2.1 | + | version=1.4.1 |
| - | vdate=09.09.2014 | + | vdate=03.09.2019 |
| fname=udf_persist.bas | fname=udf_persist.bas | ||
| ns=%NAMESPACE% | ns=%NAMESPACE% | ||
| Line 7: | Line 7: | ||
| </const> | </const> | ||
| ====== [VBA][Access] persist() ====== | ====== [VBA][Access] persist() ====== | ||
| - | ==Version %%version%% (%%vdate%%)== | + | //Eine Funktion für ein einfacher INSERT INTO...ON DUPLICATE UPDATE// |
| - | Eine Funktion für ein einfacher INSERT INTO...ON DUPLICATE UPDATE | + | |
| + | ==Version %%version%% - %%vdate%%== | ||
| Die Funktion eignet sich gut, um schnell eine kleine Änderung (Add /Update) auf eine Tabelle anhand des %%PrimaryKey%% auszuführen. | Die Funktion eignet sich gut, um schnell eine kleine Änderung (Add /Update) auf eine Tabelle anhand des %%PrimaryKey%% auszuführen. | ||
| Line 118: | Line 118: | ||
| | 5 | Ruth | Peter |</code> | | 5 | Ruth | Peter |</code> | ||
| - | = | + | ==== Beispiele zu den verschiedenen Anwendungsformaen ==== |
| - | === Beispiele zu den verschiedenen Anwendungsformaen ==== | + | |
| Die Folgenden Beispiele bewirken alle dasselbe Resultat. Ein Datensatz mit einem Namen und einer externen System-ID wird abgefüllt und kriegt eine neue ID. | Die Folgenden Beispiele bewirken alle dasselbe Resultat. Ein Datensatz mit einem Namen und einer externen System-ID wird abgefüllt und kriegt eine neue ID. | ||
| Danach wird dieser Record um das Geburtstdatum ergänzt. | Danach wird dieser Record um das Geburtstdatum ergänzt. | ||
| Line 161: | Line 160: | ||
| 'Anstelle von "" im String kann auch ' verwendet werden | 'Anstelle von "" im String kann auch ' verwendet werden | ||
| Dim newId As Long | Dim newId As Long | ||
| - | newId = persist "T_USERS_INFO", "[user name]=""Stefan Erb"", [system-id] = 123" | + | newId = (persist "T_USERS_INFO", "[user name]=""Stefan Erb"", [system-id] = 123") |
| 'Datensatz anpassen | 'Datensatz anpassen | ||
| - | persist "t_users_info", "id=1, birthday = #6-1-1972#" | + | persist "t_users_info", "id=" & newId & ", birthday = #6-1-1972#" |
| </code> | </code> | ||
vba/access/functions/persist.1412866253.txt.gz · Last modified: 09.10.2014 16:50:53 by yaslaw
Page Tools
Except where otherwise noted, content on this wiki is licensed under the following license: GNU Free Documentation License 1.3
