Hi
I'm trying to do VB.NET client for JRDC2 server using B4XSerializator
and no way to solve the problem with creating a "DBCommand".
Perhaps someone has already solved this problem?
Something like this:
B4X:
Dim CmdObj As New Dictionary(Of Object, Object)
CmdObj.Add("Sel_List", {2, 10, "", ""})
Dim CMD As New B4XType("DBCommand", CmdObj)
Dim B4xD As New Dictionary(Of Object, Object)
B4xD.Add("command", CMD)
B4xD.Add("UDev", DevID)
B4xD.Add("Appv", AppVer)
Dim ser As New B4XSerializator
ser.ConvertObjectToBytes(B4xD)
Dim CmdObj As New Dictionary(Of Object, Object)
CmdObj.Add("Name","Sel_List") '<-
CmdObj.Add("Parameters", {2, 10, "", ""}) ' <-
Dim CMD As New B4XType("DBCommand", CmdObj)
Dim B4xD As New Dictionary(Of Object, Object)
B4xD.Add("command", CMD)
B4xD.Add("UDev", DevID)
B4xD.Add("Appv", AppVer)
Dim ser As New B4XSerializator
ser.ConvertObjectToBytes(B4xD)