Hello everybody. I import some csv data into a sqlite db with this code.
Code:
sub readcsv
Dim Reader As TextReader
Reader.Initialize(File.OpenInput(Main.PthIO, nomefilelocale))
Dim line As String
line = Reader.ReadLine
'nella prima linea c'è l'intestazione
line = Reader.ReadLine
Do While line <> Null
DoEvents
Dim sColumn() As String
sColumn = Regex.Split(";",...
from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/2byK69D
via IFTTT
Aucun commentaire:
Enregistrer un commentaire