ExecuteScriptByCode

Beschreibung:

Führt den übergebenen Scriptcode als internes Script aus.

Parameter:

Parametername

Typ

Beschreibung

ScriptCode

String

Quellcode als String

Rückgabewert:

Bool

Wert

Beschreibung

True

Ausführung erfolgreich

False

Ausführung nicht erfolgreich

Beispiel VBScript:

Dim oScriptContext : Set oScriptContext = cRM.CurrentProject.CreateScriptContext()

 

oScriptContext.SetProperty "prop0_key", "prop0_value"

MsgBox oScriptContext.GetPropertyKey(0) & " : " & oScriptContext.GetProperty("prop0_key", "prop0_default")

MsgBox oScriptContext.GetPropertyKey(0) & " : " & oScriptContext.GetProperty(0, "prop0_default")

 

' Dim sScriptCode : sScriptCode = "MsgBox WScript.Context.GetProperty(0)"

Dim sScriptCode : sScriptCode = "WScript.Context.SetProperty ""prop0_key"", ""prop0_value_new"""

 

Dim executed : executed = oScriptContext.ExecuteScriptByCode(sScriptCode)

MsgBox "executed: " & executed

 

MsgBox oScriptContext.GetPropertyKey(0) & " : " & oScriptContext.GetProperty("prop0_key", "prop0_default")

MsgBox oScriptContext.GetPropertyKey(0) & " : " & oScriptContext.GetProperty(0, "prop0_default")

 

Set oScriptContext = Nothing