Seite 1 von 1

und noch'n Mathe-Parser (dieses Mal mit COMate + VBS)

Verfasst: 15.11.2012 10:51
von Kiffi
Hoi,

Berechnung von mathematischen Termen via VbScript:

Code: Alles auswählen

IncludeFile "[PfadZuCOMatePlus]/comateplus.pbi" ; Anpassen

EnableExplicit

Define ScriptControl.COMateObject
Define VbScript.s
Define myResult.s

ScriptControl = COMate_CreateObject("ScriptControl")

ScriptControl\SetProperty("Language = 'VBScript'")

VbScript = "myResult = 1 + 2 * 3 - 4" 

ScriptControl\Invoke("AddCode('" + VbScript + "')")

myResult.s = ScriptControl\GetStringProperty("Eval('myResult')")

Debug "Result: " + myResult

ScriptControl\Release()
(benötigt COMatePlus)

Grüße ... Kiffi

Re: und noch'n Mathe-Parser (dieses Mal mit COMate + VBS)

Verfasst: 15.11.2012 12:26
von bobobo
Isch 'abe gar keinen Scripting-'ost .. und nu?

--

'ab zu früh genöhlt .. das geht auch ohne scripting- 'ost :mrgreen:

fragt sich nur warum :shock:

Re: und noch'n Mathe-Parser (dieses Mal mit COMate + VBS)

Verfasst: 15.11.2012 13:31
von Kiffi
bobobo hat geschrieben:fragt sich nur warum :shock:
it's magic! Bild

Re: und noch'n Mathe-Parser (dieses Mal mit COMate + VBS)

Verfasst: 15.11.2012 16:32
von bobobo
naja
ich dachte eigentlich, dass es u.U. brauchbarer wäre wenn nicht jede Applikation
mit dem Scriptingzeugs auf meinem Rechner Schindluder nach Belieben treiben darf.
Dafür der deaktivierte ScriptingHost.
Das deaktiviert allerdings wohl nur die Ausführung von vbs-dateien
aber nicht die scriptingmöglichkeit an sich.

Kein Wunder, dass Windows anfällig ist.

Dreckswindows :mrgreen:

AW: und noch'n Mathe-Parser (dieses Mal mit COMate + VBS)

Verfasst: 17.11.2012 23:12
von marco2007
Thx, Kiffi :-)