Concloo LotusScript Essentials Beispiele
Beispiele: CNCL_Base64Decode
Dekodiert den übergebenen Code vom Format Base64 nach Text
Dim code As String
Dim txt As String
code = |V2VyIHJlaXRldCBzbyBzcOR0IGR1cmNoIE5hY2h0IHVuZCBXaW5kPwpFcyBpc3QgZGVyIFZhdGVy
IG1pdCBzZWluZW0gS2luZC4KRXIgaGF0IGRlbiBLbmFiZW4gd29obCBpbiBkZW0gQXJtLApFciBm
Yd90IGlobiBzaWNoZXI|
txt = CNCL_Base64Decode(code)
Print txt
Ausgabe:
Wer reitet so spät durch Nacht und Wind?
Es ist der Vater mit seinem Kind.
Er hat den Knaben wohl in dem Arm,
Er faßt ihn sicher, er hält ihn warm.