Italian Leggete un file testo

[corrado]

Salve
Ho problemi a leggere una file testo (blocco note)
per caricare i dati in un database.

Corrado
HTC Desirè HD

 

[maxware]

Ciao Corrado
Dacci piu' info sul problema che incontri
Io per leggere un file con estensione csv utilizzo il seguente codice
Dim Reader As TextReader
Reader.Initialize(percorso, "file.csv"))
Dim line As String
Reader.ReadLine
line = Reader.ReadLine
Do While line <> Null
line = Reader.ReadLine
Loop

Ciaooo
Mamo

 

[corrado]

Ciao Corrado
Dacci piu' info sul problema che incontri
Io per leggere un file con estensione csv utilizzo il seguente codice
Dim Reader As TextReader
Reader.Initialize(percorso, "file.csv"))
Dim line As String
Reader.ReadLine
line = Reader.ReadLine
Do While line <> Null
line = Reader.ReadLine
Loop

Ciaooo
Mamo

Ciao Mamo
Questo è il codeice che uso.
Dim fl As Intent
fl.Initialize(fl.ACTION_VIEW, "File:" & File.DirAssets & "c:\android\prova.txt")
fl.SetType("application/*")
StartActivity(fl)

Mi da errore sull'ultima istruzione: non trova nessuna attività
Comunque io ho problemi nel comprendere come gestire i file
al di fuori dell'ambiente BASIC4ANDROID.
Quel file prova.txt l'ho copiato manualmente nella cartella android.
Vorrei leggere i dati e caricarli in un DB.

Spero di essere stato chiaro.
Ciao
Corrado

 

[maxware]

Ciao Corrado
ci sono un paio di errori nel tuo codice ( che comune ti permette di aprire il file prova.txt ma non di leggere i dati per poi scricarli sul db)
Primo errore: "File:" & File.DirAssets & "c:\android\prova.txt"). non esiste un c:\ in android quindi "File:" & File.DirRootExternal & "/android/prova.txt"
Poi sostituisci la riga fl.SetType("application/*") con In.SetType("text/plain")

 

[maxware]

Scusa ho scritto in.settype(.... metti fl.settype(....

 

[corrado]

Ciao Corrado
ci sono un paio di errori nel tuo codice ( che comune ti permette di aprire il file prova.txt ma non di leggere i dati per poi scricarli sul db)
Primo errore: "File:" & File.DirAssets & "c:\android\prova.txt"). non esiste un c:\ in android quindi "File:" & File.DirRootExternal & "/android/prova.txt"
Poi sostituisci la riga fl.SetType("application/*") con In.SetType("text/plain")

Ciao Mamo
La seconda fase dileggere i dati e caricarli in un DB la devo
aggiungere.
Mi sono fermato alla primafase di apertura file, e anche con le tue
correzioni si ferma sempre nell'istruzione: StartActivity(fl),
rispondendo: Activity not found
Codice:
Dim fl As Intent
fl.Initialize(fl.ACTION_VIEW, "File:" & File.DirRootExternal
& "/android/prova.txt")
fl.SetType("text/plain")
StartActivity(fl)
Ciao
Corrado

 

[maxware]

Ciao Corrado
Provato ora questo codice sul mio Note e funziona:
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
End Sub

Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Dim Button1 As Button
Dim v_path As String
End Sub

Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
'Activity.LoadLayout("pan1")
v_path=File.DirRootExternal & "/android/"
Dim file_pdf As Intent
file_pdf.Initialize(file_pdf.ACTION_VIEW, "file:" & v_path & "prova.txt")
file_pdf.SetType("text/plain")
StartActivity(file_pdf)
End Sub
Ciaooo
Mamo

 

[corrado]

Ciao Corrado
Provato ora questo codice sul mio Note e funziona:
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
End Sub

Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Dim Button1 As Button
Dim v_path As String
End Sub

Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
'Activity.LoadLayout("pan1")
v_path=File.DirRootExternal & "/android/"
Dim file_pdf As Intent
file_pdf.Initialize(file_pdf.ACTION_VIEW, "file:" & v_path & "prova.txt")
file_pdf.SetType("text/plain")
StartActivity(file_pdf)
End Sub
Ciaooo
Mamo

Ciao Mamo
Il tuo codice nella forma è diverso dal mio, nella sostanza sono uguali,
tranne la parola "file:" che nel mio codice era scritta così "File:" con la
f maiuscola.
Questa differenza faceva bloccare l'esecuzione su StartActivity(file_pdf).

Detto questo ti ringrazio per la tua pazienza.
Una prima domanda: Il codice lo hai eseguito nell'emulatore?
Mi da questo errore strano: Webpage not avilable
the webpage at content?//sdcard/android/prova.txt ecc. ecc.
non capisco cose c'entra webpage.
poi ho fatto una prova: ho copiato prova.txt nella cartella files della
cartella di progetto.
ho modificato la DirRootExternal in DirAssets & "prova.txt"
e nel device funziona per una sola volta.
La secondavolta non funziona

Ciao
Corrado