Ciao, come da titolo ho provato più volte a cercare un codice che mi esca fuori da un database sqlite i prodotti che sono all'interno e le volevo poi trasferire su un documento di testo, il database e composta da tabelle chaimate:
field1
field2
field3
field4
ad ogni tabella corrisponde:
data1
data2
data3
data4
ho chiesto a chatgpt di estrarre il tutto e di crearmi un documento di testo in questo modo:
Pizza margherita -Euro 6.50
Pizza Napoletana -Euro 7.00
e così via, praticamente chat gpt mi realizza tutto ma al richiamare questo documento nel log visualizzo:
errore nella lettura della tabella: field1
errore nella lettura della tabella: field2
ovviamente il database viene inzializzato
ma stranamente non va
allego il codice di chat gpt
qualcuno ha idea del perchè non vada?
ancora più strano e che all'apertura dell'app nella activity principale ho inserito un log che mi cercasse il file menu.txt
con una istruzione if e dei log sia se lo trova sia se non lo trova ma nel log non legge nemmeno i log che ho creato per capire cosa succede.
field1
field2
field3
field4
ad ogni tabella corrisponde:
data1
data2
data3
data4
ho chiesto a chatgpt di estrarre il tutto e di crearmi un documento di testo in questo modo:
Pizza margherita -Euro 6.50
Pizza Napoletana -Euro 7.00
e così via, praticamente chat gpt mi realizza tutto ma al richiamare questo documento nel log visualizzo:
errore nella lettura della tabella: field1
errore nella lettura della tabella: field2
ovviamente il database viene inzializzato
ma stranamente non va
allego il codice di chat gpt
B4X:
Private Sub btncreamenu_Click
dbSQL.Initialize(File.DirInternal, "comande.db", True)
EstraiTuttoIlMenu
End Sub
Private Sub btncreamenu_LongClick
Wait For (xui.Msgbox2Async("Sei sicuro di voler eliminare il menù veloce?", "ELIMINAZIONE MENU' VELOCE", "SI", "CANCELLA", "NO", Null)) Msgbox_Result (Result As Int)
If Result = xui.DialogResponse_Positive Then
mp1.Load(File.DirAssets,"click.wav")
mp1.Play
If File.Exists(File.DirInternal, "menu.txt") Then
File.Delete(File.DirInternal, "menu.txt")
MsgboxAsync("Menù veloce eliminato riavvia il programma","ESEGUITO")
Else
MsgboxAsync("Nessun Menù veloce da eliminare","AVVISO")
End If
End If
End Sub
Sub EstraiTuttoIlMenu
Dim output As StringBuilder
output.Initialize
' Estrai da field1 a field9
For i = 1 To 9
EstraiDaTabella("field" & i, "data" & i, output)
Next
' Estrai anche da field39
EstraiDaTabella("field39", "data39", output)
' Scrivi nel file menu.txt
File.WriteString(File.DirInternal, "menu.txt", output.ToString)
ToastMessageShow("File menu.txt creato!", True)
End Sub
Sub EstraiDaTabella(nomeTabella As String, nomeColonna As String, output As StringBuilder)
Try
Dim cursor1 As Cursor = SQL1.ExecQuery("SELECT " & nomeColonna & " FROM " & nomeTabella)
For r = 0 To cursor1.RowCount - 1
cursor1.Position = r
Dim voce As String = cursor1.GetString(nomeColonna)
output.Append(voce).Append(CRLF)
Next
cursor1.Close
Catch
Log("Errore nella lettura della tabella: " & nomeTabella)
End Try
End Sub
ancora più strano e che all'apertura dell'app nella activity principale ho inserito un log che mi cercasse il file menu.txt
con una istruzione if e dei log sia se lo trova sia se non lo trova ma nel log non legge nemmeno i log che ho creato per capire cosa succede.