Ersetzen Schlüsselwörter

Question

In meiner DB habe ich eine Longtext-Spalte, die eine E-Mail-Vorlage speichert.

Ich habe eine Reihe von Schlüsselwörtern in der Vorlage, d. H. <<PersonName>> oder <<ExpiryDate>>, die mit den einzelnen Details wie im aktuellen Datensatz zur Verfügung gestellt ersetzt werden.

Gibt es eine einfache Möglichkeit, eine Liste von Schlüsselwörtern durchzugehen und sie dynamisch zu ersetzen. Mein erster Ansatz war, den KeyWord-Namen, den Platzhaltertext und den entsprechenden Spaltennamen zu haben.

Dann machen Sie eine einfache Replace-Schleife?

Danke!

Answer 1

Ja, Sie könnten es so tun - eine Abfrage mit Schlüsselwort, Platzhalter und Wert Felder und dann so etwas wie;

Dim strTempate as string 
Dim rst as Recordset 

strTemplate = <value of template field> 

With rst 
    Do Until .EOF 
     strTemplate = Replace(strTemplate, Nz(!Placeholder,""), Nz(!Value,"")) 
     .Movenext 
    Loop 
End With 

Welche schlingt sich durch Ihre Keywords und machen die Ersetzungen in Ihrer E-Mail-Vorlage