Hello everybody,
When I want all select my data, db is NilObjet, Why ?
And I have an error : An exception of class NilObjetException was not handled. The application must shut down.
db is declare in properties like SQLiteDatabase
Somebody can help me with share screen or with TeamViewer ?
SKYPE : pierre-guy
Messages : pglecompte
Here is my code :
[code]If B_DataOpen Then
DataList.DeleteAllRows
Dim sql As String
sql = "SELECT * FROM PERSONNE"
Dim data As RecordSet
data = db.SQLSelect(sql)
If db.Error Then
MsgBox("DB Error: " + db.ErrorMessage)
Return
End If
If data <> Nil Then
While Not data.EOF
DataList.AddRow(_
data.Field("ID").StringValue, _
data.Field("Nom").StringValue, _
data.Field("Prenom").StringValue, _
data.Field("Naissance").StringValue,_
data.Field("CA").StringValue)
data.MoveNext
Wend
data.Close
End If
Else
MsgBox(“Create the database first, the table and add the data.”)
End If[/code]