Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Gambas No Me Muestra Los Registros De La Tabla[SOLUCIONADO]
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Gambas No Me Muestra Los Registros De La Tabla[SOLUCIONADO] 
 
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
' gambas class file

PUBLIC con AS Connection

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 = "********"
  con.Name = "taller"
  con.Open

  Tabla.Clear
  IF con THEN RETURN
  Tabla.Columns.Count = 6
  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"
  Resultado = con.Exec("select * from clientes where terminado <> 'N'")
  DO WHILE Resultado.Available
    clave = Resultado["nombre"]
    Tabla.Add(clave, clave)
    Tabla[clave][1] = Resultado["telefono"]
    Tabla[clave][2] = Resultado["entrada"]
    Tabla[clave][3] = Resultado["salida"]
    Tabla[clave][3] = Resultado["precio"]
    Tabla[clave][4] = Resultado["acta"]
    Tabla[clave][5] = Resultado["trabajo"]
    
    Resultado.MoveNext
  LOOP
  con.Close
END
 

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 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Gambas No Me Muestra Los Registros De La Tabla 
 
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:

Resultado = con.Exec("select * from clientes where terminado = 'N'")


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
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Gambas No Me Muestra Los Registros De La Tabla 
 
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
 



 
desoljor - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Gambas No Me Muestra Los Registros De La Tabla 
 
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
 



 
desoljor - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Gambas No Me Muestra Los Registros De La Tabla ( SOLUCIONADO ) 
 
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
 




===================
[img]http://www.gambas-es.org/files/images/990/bart_1280257146_713683.gif[/img] Estoy Donde He Llegado y He Llegadfo porque aquí Estoy
 
desoljor - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Gambas No Me Muestra Los Registros De La Tabla 
 
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.
 




===================
Migrando desde visual basic, el Gambas de Ms
Mi blog gambero
 
Dani26 - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Gambas No Me Muestra Los Registros De La Tabla 
 
No hay nada que perdonar, al contrario perdonadme vosotros por haberlo puesto así, gracias
 




===================
[img]http://www.gambas-es.org/files/images/990/bart_1280257146_713683.gif[/img] Estoy Donde He Llegado y He Llegadfo porque aquí Estoy
 
desoljor - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Gestor De Base De Datos En Ubuntu 9.10 No ... aristicol Instalación 7 Domingo, 24 Enero 2010, 15:31 Ver último mensaje
aristicol
No hay nuevos mensajes Boton Guardar Tabla Me Borro Los Registros ivanovichenco Bases de Datos 6 Sabado, 12 Marzo 2011, 20:28 Ver último mensaje
ivanovichenco
No hay nuevos mensajes Seleccionar Varios Registros En Una Tabla. Shell General 2 Martes, 09 Octobre 2012, 11:00 Ver último mensaje
Shell
No hay nuevos mensajes No Puedo Crear Tabla De Mysql En Gambas Po... desoljor Bases de Datos 3 Sabado, 05 Octobre 2013, 11:37 Ver último mensaje
desoljor
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron