Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/09/2005, 14:23
nadiesabenada
 
Fecha de Ingreso: septiembre-2005
Mensajes: 10
Antigüedad: 18 años, 8 meses
Puntos: 0
insertar txt en flexgrid

hola quiero cargar un txt en un flexgrid. El codigo es este:

On Error GoTo error
Directory$ = "c:\datos.txt"
Dim MyString As String
On Error GoTo error
Open Directory$ For Input As #1
While Not EOF(1)
Input #1, MyString$
DoEvents
MSFlexGrid1.AddItem MyString$
Wend
Close #1
Exit Sub
error: msgbox (error)

Pero el tema es que quiero cargar un txt que esta escrito de esta forma:

67, 09, 34, 15
45, 46, 12, 99

entonces que me cargue en la primera fila del flexgrid, 4 columnas con esos numeros (los que estan separados por coma), en la segunda fila que me cargue la segunda fila del txt separada en columnas, etc.. asi con cada fila del txt.. ¿como se puede hacer esto en lo posible usando el codigo que puse aca, ya que se me complicaria bastante hacer todo eso de modulos, sql, record no se que, y todas esas cosas "raras" para mi ya que entiendo poco...? Muchas gracias.... chau