This code works but it send only one record then have a error but k'now the error and the app close.
Any idea what is the problem
Thanks
Var sqlLocation As Text = App.mSessionURL + "/sql_fast"
Var v1,v2,v3,v4,v5,pic_as_text,er As Text
Var Rs As iOSSQLiteRecordSet
Var SqlStr As Text
SqlStr="Select * From AsambleaSocios Order BY numsocio"
Try
Rs=App.DBConn.SQLSelect(SqlStr)
Catch e As iOSSQLiteException
//ErrorLabel.Text = e.Reason
er= e.Reason
End Try
If Rs.RecordCount > 0 Then
Do
v1=Rs.Field("nombre"

v2=Rs.Field("numsocio"

v3=Rs.Field("fecha"

v4=Rs.Field("hora"

pic_as_text=Rs.Field("firma"

v5=Rs.Field("distrito"

Var sql As text = "INSERT INTO AsambleaSocios (nombre,numsocio,fecha,hora,firma,sync,distrito) VALUES ('"+ v1 + "','"+ v2 + "', '" + v3 + "', '" + v4 + "', '" + pic_as_text + "','Y','" +v5 + "')"
mSQLSocket.Start( App.mHost, App.mSessionID, sqlLocation, "SQLite", "ipadcrnew.db",sql)
Loop Until Rs.EOF=True
End If