Problem with database

[fanfalveto]

I created a database with a table (table1) with Sqlite expert, but with the following code tells me the table1 does not exist, if I open the database with Sqlite is okay.
Please if you can help me.
thanks

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("culturilla")
SQL1.Initialize(File.DirInternal, "base.db", True)
la1=SQL1.ExecQuery("SELECT pregunta FROM table1 WHERE id=1")
Label1.Text=la1
End Sub

 

[klaus]

You must be careful:
How many results are you expecting.
- SQL.ExecQuery returns a Cursor object with multiple results
- SQL.ExecQuerySingleResult returns a single value

I think in your case you should use SQL.ExecQuerySingleResult.

Best regards.

 

[fanfalveto]

The problem is the same with ExecQuerySingleResult,this is the log:

android.database.sqlite.SQLiteException: no such table: table1: , while compiling: SELECT pregunta FROM table1 WHERE id=1

but table1 exist,sure.I can see the table in the database with sqlite expert.
Thanks

 

[klaus]

Couldn't you post your project as a zip file with the database so we could test it ?

Best regards.

 

[fanfalveto]

thank you very much.
i put the database (base.db) in files folder

 

[barx]

I haven't looked at your project but did you add the file to your project in the b4a ide? and you must, in your code, copy the database to a writeable location.

Search the forum for DBUtils, this helps simplify the process a bit.

 

[klaus]

barx is right, you didn't copy the database to the File.DirInternal folder.
This code works having the database file in the Files folder of the project:

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("culturilla")
    If FirstTime = True AND File.Exists(File.DirInternal, "base.db") = False Then
        File.Copy(File.DirAssets, "base.db", File.DirInternal, "base.db")
    End If
    
    SQL1.Initialize(File.DirInternal, "base.db", True)
    
    la1=SQL1.ExecQuerySingleResult("SELECT pregunta FROM table1 WHERE id=1")
    
    Label1.Text=la1
End Sub

 

[fanfalveto]

i try with dbutils,but i think the problem is with the database.I don´t know why.
Thank you anyway

 

[fanfalveto]

I´m sorry Klaus but i can´t work your code.
The error is the same:no such table:table1

 

[fanfalveto]

i delete the database and create other again,now runs ok.
Thank you very much

 

[klaus]

Before I posted my code I tested it and it worked !

Best regards.