Concloo LotusScript Essentials Beispiele
Beispiele: CNCL_IsBase64url
Überprüft, ob der übergebene Text T das Format Base64url hat.
Rückgabewert ist True für Base64-kodierte Texte, ansonnsten wird False zurückgegeben
Dim txt As String
Dim kodiert As String
txt = "Wer reitet so spät durch Nacht und Wind?"
kodiert = CNCL_Base64urlEncode(txt, True)
Print txt
If CNCL_IsBase64url(txt) Then
Print |Die Variable "txt" ist Base64url kodiert|
Else
Print |Die Variable "txt" ist nicht Base64url kodiert|
End If
Print kodiert
If CNCL_IsBase64url(kodiert) Then
Print |Die Variable "kodiert" ist Base64url kodiert|
Else
Print |Die Variable "kodiert" ist nicht Base64url kodiert|
End If
Ausgabe:
Wer reitet so spät durch Nacht und Wind?
Die Variable "txt" ist nicht Base64url kodiert
V2VyIHJlaXRldCBzbyBzcOR0IGR1cmNoIE5hY2h0IHVuZCBXaW5kPw==
Die Variable "kodiert" ist Base64url kodiert