[Hussl]

Hallo, ich nage schon seit einiger Zeit an folgendem Problem:

Ich will eine dynamische Webseite erstellen, die auf einem Template basiert. Den Content hab ich in einer DB gespeichert. Natürlich funktioniert es nicht, wenn ich ein Skript ebenfalls in der DB speichere.

Ich hab also z.B. folgenden Text in der Tabelle stehen:

"Das ist ein kleiner Test. ={FunctionA}"

Nun hab ich mir gedacht, dass ich beim Ausgeben per mit pattern schaue, ob ={FunctionA} oder andere darin enthalten sind. Das mach ich so:

Function ParseContent(strContent)
	dim strOutput, regEx, Match, Matches
	Set regEx = new RegExp
	regEx.Pattern = "={.*}"
	regEx.IgnoreCase = true
	Set Matches = regEx.Execute(strContent)
	for each Match in Matches
		strOutput = strOutput & regEx.Replace(strContent, Cstr(Execute(Mid(Match.Value, 3, InStr(Match.Value, "}")-3))))
	next
	set Matches = Nothing
	set regEx   = Nothing
	ParseContent = strOutput
End Function

Die dazugehörige FunctionA hab ich einfach in einer Include-Datei eingefügt. Wenn er einen Eintrag findet, dann will ich den Text ={FunctionA} durch den String, der von der FunctionA zurückkommt ersetzen. Das sollte in der folgenden Zeile passieren:

strOutput = strOutput & regEx.Replace(strContent, Execute(Mid(Match.Value, 3, InStr(Match.Value, "}")-3)))

FunctionA:

Function FunctionA
    FunctionA = "Hallo Welt"
End Function

Doch leider passiert hier nichts. Er ersetzt den Text durch Nichts. Gibt einfach nix zurück.

Hat jemand eine Ahnung was ich falsch mache, bzw. was ich besser machen könnte??

mfg
Hussl