Spanish Guardar Archivo como .csv

MEGUZMAN

New Member
Muy buenas.

Queria solicitarles ayuda por que no consigo guardar una lista como csv.

Agradeceria que alguien podria proporcionarme algun ejemplo de como hacerlo... Intente como indica en los ejemplos indicados en el foro pero no lo logro gracias.
 

bgsoft

Well-Known Member
Licensed User
Hola:

Sin algo del codigo de donde tienes el error es dificil ayudarte. No hace falta que pongas todo el codigo de tu programa, pero si como guardas la lista a un csv.


Saludos
 

MEGUZMAN

New Member
El codigo es el siguiente:

B4X:
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 Panel1 As Panel
    Dim EditText1 As EditText
    Dim Button1 As Button
    Dim ListView1 As ListView
    Dim tabla As List
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("Main")
    tabla.Initialize
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Button1_Click
    tabla.Add(EditText1.Text)
   
    ListView1.Clear
    For i=0 To tabla.Size -1
        ListView1.AddSingleLine(tabla.Get(i))
    Next
End Sub
Sub Button1_LongClick
    Dim sa As StringUtils
    sa.SaveCSV(File.DirRootExternal,"1.csv",";",tabla)
End Sub
Lo que hace es lo siguiente:
btn1 click: añadir el contenido de un edittext a un listview
btn1_longclick: guarda la lista con la extension csv.

lo que no sonsigo es hacer que cree el archivo csv y guarde el contenido de la lista con los elementos añadidos del listview.
 

bgsoft

Well-Known Member
Licensed User
Hola

El error está en que para guardar los datos los guardas como caracteres de un list, y tienes que guardarlos como string.
Por otro lado te recomiendo que cuando hagas pruebas no metas todo en un click y un LongClick, es dificil a veces saber cuando haces una u otra cosa, crea otro boton y es mas facil depurar el código. Y si lo prefieres hacer asi como lo has puesto, al menos pon LOG en los dos eventos y te aseguras que has realizado ese evento.

Cambia el codigo del button1_click por esto y te funcionará:

B4X:
Sub Button1_Click
  tabla.Add(Array As String(EditText1.Text)) ' aqui lo pones como string, no como caracter
  ListView1.AddSingleLine(EditText1.Text) 
End Sub
lo que no sonsigo es hacer que cree el archivo csv y guarde el contenido de la lista con los elementos añadidos del listview
El problema no era que no te creara el archivo csv, si no que con ese codigo te daba error, y logicamente no creaba el archivo, tenias que haber comentado que te daba un error al ejecutar el Button1_LongClick, que seria algo asi como: "String cannot be cast to java" , por que una cosa es que el programa te de un error y otra que no haga lo que tu quieres. Esto te lo comento simplemente para que a la hora de que alguien te responda sea mas facil analizar el problema que tienes, cuanto mas datos des del problema mas facil será resolverlo.

Saludos
 
Top