Comunidad Gambas-es

Hola a todos soy nuevo en este foro,y me gustaria que me echarais una mano con este problema.
Resulta que el ColumnView no muestra resultados, os pongo el codigo y los resultados del select en consola

en la tabla clientes deberia mostrar el siguiente registro
nombre telefono entrada salida trabajo precio acta terminado
JOHANA 923130451 26/7/2010 26/7/2010 BAJO PANTALON 2 € 2 N

desoljor escribió:  

en la tabla clientes deberia mostrar el siguiente registro
nombre telefono entrada salida trabajo precio acta terminado
JOHANA 923130451 26/7/2010 26/7/2010 BAJO PANTALON 2 € 2 N

Si como dices, debería mostrarse ese registro con el campo "terminado = N", entonces tienes que cambiar la consulta sql:



Ya que en tu código estás pidiendo que te liste todos los registros de la tabla clientes donde 'terminado' sea diferente a 'N' (terminado <> 'N').

Saludos

Gracias jguardon, es un error muy simple pero te juro que no lo veia, aveces lo más visible es lo mas dificil de ver

Que no quiere he cambiado la sentencia select como se puede ver aqui
Resultado = con.Exec("select * from clientes where terminado <> 'S'")
os pongo un pantallazo del formulario que contiene el ColunmView cuando se ejecuta la peticion

A quien le pueda ser de utilidad lo he solucionado investigando por mi cuenta.
os dejo el codigo por si alguien se ve en la misma situación que yo gracias por la ayuda prestada en este hilo.

PUBLIC SUB Form_Open()

DIM clave AS String
DIM Resultado AS result
DIM res AS Integer
DIM reg AS Integer

con = NEW Connection
con.Type = "mysql"
con.Host = "localhost"
con.User = "jorge"
con.password = "sandra.10"
con.Name = "taller"
con.Open
Tabla.Clear

Resultado = con.Exec("select * from clientes where terminado <> 'S'")

EtiquetaSos.Text = Resultado.Count & " Registros Encontrados "

IF con THEN
Message.Info("CONEXION ECHA")
ENDIF
Tabla.Columns.Count = 7
Tabla.Columns[0].Text = "NOMBRE"
Tabla.Columns[1].Text = "TELEFONO"
Tabla.Columns[2].Text = "ENTRADA"
Tabla.Columns[3].Text = "SALIDA"
Tabla.Columns[4].Text = "PRECIO"
Tabla.Columns[5].Text = "A CUENTA"
Tabla.Columns[6].Text = "TRABAJO"
Resultado = con.Exec("select * from clientes where terminado <> 'S'")
FOR reg = 0 TO Resultado.Count - 1 STEP +1
Tabla.Add(reg, Resultado!nombre)
Tabla[reg][1] = Resultado!telefono
Tabla[reg][2] = Resultado!entrada
Tabla[reg][3] = Resultado!salida
Tabla[reg][4] = Resultado!precio
Tabla[reg][5] = Resultado!acta
Tabla[reg][6] = Resultado!trabajo
Resultado.MoveNext
NEXT
Tabla.Refresh
con.Close
END

Compañero, deberías editar el primer post del hilo para colocar el solucionado, para que este se vea en el listado.
Saludos y disculpa el atrevimiento.

No hay nada que perdonar, al contrario perdonadme vosotros por haberlo puesto así, gracias