Dim commands As List
commands.Initialize
For i = 0 To CursorLog.RowCount - 1
CursorLog.Position = i
Dim cmd As DBCommand
cmd.Initialize
cmd.Name = "InsertCommand"
cmd.Parameters = Array(CursorLog.GetString("col1"), CursorLog.GetString("col2"))
commands.Add(cmd)
Next
reqManager.ExecuteBatch(commands, null)