Dim req As DBRequestManagerRS = CreateRequest
Dim cmd As DBCommand = CreateCommand("select_schema", Array(nameTable))
Wait For (req.ExecuteQuery(cmd, 0, Null)) JobDone(j As HttpJob)
If j.Success Then
req.HandleJobAsync(j, "req")
Wait For (req) req_Result(res As DBResult)
Dim r As Int = 0
Dim schema As StringBuilder
schema.Initialize
For Each row() As Object In res.Rows
schema.Append(row(r)): r= r +1
Next
j.Release
Else
Starter.SaveLog($"${nameModule}.Select_Schema job.error: ${j.ErrorMessage}"$)
End If