diff --git a/server_example.pb b/server_example.pb
index 2501528..db56f1f 100644
--- a/server_example.pb
+++ b/server_example.pb
@@ -121,9 +121,13 @@ Procedure.s Formular_Test(Map Header.s(), ContentData.s)
Wend
lhs_log::Out("TBD:"+TBD)
lhs_log::Out("contentData:"+ContentData)
- Text = "
"+TBD+"
ConentJSON
"+ContentData+""
- *Text = AllocateMemory(StringByteLength(Text))
- PokeS(*Text, Text)
+ ContentData = URLDecoder(ContentData, #PB_UTF8)
+ Text = ~"" +
+ "" +
+ ~"" +
+ "Alle Client Headers"+TBD+"
ConentJSON
"+ContentData+""
+ *Text = AllocateMemory(StringByteLength(Text, #PB_UTF8))
+ PokeS(*Text, Text, -1, #PB_UTF8)
lhs_log::Out("Unencoded:"+PeekS(*Text, -1 , #PB_UTF8))
Encoded = Base64Encoder(*Text, MemorySize(*Text))
lhs_log::Out("Encoded: " + Encoded)
@@ -155,8 +159,8 @@ Procedure.s Php_Test(Map Header.s(), ContentData.s)
CloseProgram(Php) ; Schließt die Verbindung zum Programm
EndIf
Text = Phpresult
- *Text = AllocateMemory(StringByteLength(Text))
- PokeS(*Text, Text)
+ *Text = AllocateMemory(StringByteLength(Text, #PB_UTF8))
+ PokeS(*Text, Text, -1, #PB_UTF8)
lhs_log::Out("Unencoded:"+PeekS(*Text, -1 , #PB_UTF8))
Encoded = Base64Encoder(*Text, MemorySize(*Text))
lhs_log::Out("Encoded: " + Encoded)