Gangaufsicht_Reloaded 1.1.7

< VBL_Framework User Manual >

Utility_Methods

MyArray.ToText() <-- Converts into StringArray
MyArrayOfStr.ToLexika()  <-- Converts Richtext to Dictionary from Splitted Text
MyArrayOfStr.ToDataframe() <--  Converts Richtext to Key/ValuePairs from ScriptObject

CheckType(myObject) <-- Compare 2 TypeOf Variables
Check(myObject) <-- Proofe Variable for Null Value

myString.Say(optional:Volume as Integer) <-- TextToSpeach
SayAsync.Say(optional:Volume as Integer) <-- TextToSpeach(Async)
myString.Mp3() <-- Play Mp3_File
Zip(sourcepath, destination) <-- ZipFile Compression
Unzip(sourcepath, destination) <-- ZipFile Decompression

Json.fromJSON <-- Serialize: Object/ List-Array(Of Object) => Module
Json.toJSON() <-- Deserialize: Object/ List-Array(Of Object) => Module

EnergySaverPlans:

Initializing with Listbox

1. Receive Current Plan and Summary of Plans ESP.getEsp()
2. Set Esp by Name (Reference to Listbox,determines LBox Selection automatically)

With Event:

AddHandler OutputList.DoubleClick, Sub()
            ESP._OutputList_ = OutputList
            ESP.setESP(ESP.EspCode)
            End Sub

Or with FunctionCall:

	Sub SetEsp()
		ESP._OutputList_ = OutputList
		ESP.setESP(ESP.EspCode)
	End Sub

3. Display Changes OutputList.Text = ESP.CurrentESP OutputList.Items.AddRange(ESP.espList.Keys.ToArray)

Online Methods:

    server.Connect() <-- Receive Data via HTTP
    server.uploadJSONData() <-- Send Data via HTTP as JSON_String
    server.GetStrData() <-- Receive Data !Requires Pw!
        
    server.uploadStrData() <-- Send Data via HTTP as Pure_String !Requires Pw!
    server.uploadFTP() <-- Send Data via FTP as File !Requires Pw!

Scripting:

Initialize:

With Pure String

Dim Script script as new Script(codeBlock, optional: ownSyntax = false)

Via File Without/Without Argmuments:

Dim Script script as new Script("Path_Of_ScriptFile(.vbl)", optional: ownSyntax = false)
Dim Script script as new Script("Path_Of_ScriptFile(.vbl)", new Array{"arg1","args2" }, optional: ownSyntax = false)

Properties

Name, Method As String
ScriptArgs As (String, Object)() = {("method", Method)}
Args As String()
Output As Object() = {}
StatusResponse As Boolean
CodeSource As String()
Code As String
UseOwnSyntax as Boolean
MyNamespaces As String() = {System.IO", "Newtonsoft.Json"} <-- To Add Namespaces just add here then LoadImports()

Methods

Script.Start() <-- Do Script
Preload() <-- Load .NET Standart_Libraries into Script
LoadImports(myStringArray) <-- Load Own Namespaces into Script via Name
Syntaxing() <-- Translate Custumized Scriptcode into Lua