Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
captura_de_pantalla_de_2013_10_25_10_45_00
Buen Dia
quisiera una ayuda referente a mi codigo de como ingresar un registro a mi base de datos este es mi codigo creo que mi problema esta en la sentencia SQl

PUBLIC SUB Button1_Click()
  IF TextBox2.Text <> "" AND TextBox3.Text <> "" THEN
    IF TextBox2.Text = TextBox3.Text THEN
      Message.Info("Se puede Realizar el Registro")
      ConectarBase()
      
      TRY hConn.Exec("insert into Usuario values (&!)", TextBox2.Text)
    ELSE
      Message.Error("las Claves no Coinciden")
    ENDIF
  
  ELSE
    Message.Error("No se Puede Dejar los Espacios en Blanco")
  ENDIF

END
 



 
GJhean - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
  TRY hConn.Exec("insert into Usuario values (&!)", TextBox2.Text)
    ELSE
 


¿Es una admiración lo que has puesto después de &? Debe ser un 1

  TRY hConn.Exec("insert into Usuario values (&1)", TextBox2.Text)
    ELSE


Siempre y cuando tu tabla sólo tenga un campo, claro, y no tenga claves, claro, y la conexión esté bien hecha, claro. Si no das más detalles...

Suerte.
 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
tengo la Tabla Usuario
con los Campos Ususario que es la llave primaria de auto incremento y Password
la conexión la tengo porque al momento de ejecutar el programa me muestra los registros almacenados en la Base de datos y si era un error lo del ! debe ser el 1
lo corregì pero nada no me registra los datos en la tabla


shordi escribió:  
  TRY hConn.Exec("insert into Usuario values (&!)", TextBox2.Text)
    ELSE
 


¿Es una admiración lo que has puesto después de &? Debe ser un 1

  TRY hConn.Exec("insert into Usuario values (&1)", TextBox2.Text)
    ELSE


Siempre y cuando tu tabla sólo tenga un campo, claro, y no tenga claves, claro, y la conexión esté bien hecha, claro. Si no das más detalles...

Suerte.

 



 
GJhean - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
Citar:
TRY hConn.Exec


Y como se llama tu modulo de conexion?, tienes modulo?

puede ser que necesites decir conexion.hconn.Exec("insert into Usuario values (&1!)", TextBox2.Text)
 



 
jousseph - Ver perfil del usuarioEnviar mensaje privadoVer la galería personal del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
muchas gracias Problema Solucionado
 



 
última edición por GJhean el Viernes, 25 Octobre 2013, 20:17; editado 1 vez 
GJhean - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
Oye mira yo registro asi:

Public Sub Form_Open()----------UNA FORMA OPEN PARA HACER ESTA FUNCION AL INICIO DEL FORMULARIO
TextBox1.SetFocus
  If coneccion.conectarbase() ---------------------FIJATE AQUI BIEN MI MODULO SE LLAMA CONECCIO.CONECTARBASE, LUEGO LA USO ABAJO EN EL LLENADO
Endif
End

Public Sub Button1_Click()----------------------------BOTON DE LLENADO!
  If TextBox2.Text = "" Then
   MESSAGE.INFO("POR FAVOR COMPLETE EL CAMPO DE NOMBRE!")
   Else
  If TextBox3.Text = "" Then
   MESSAGE.INFO("POR FAVOR COMPLETE EL CAMPO DE CONTRASEÑA!")
   Else
  If TextBox4.Text = "" Then
   MESSAGE.INFO("POR FAVOR COMPLETE EL CAMPO DE MASCOTA!")
 Else
Try coneccion.junincon.EXEC("insert into acceso values(&1,&2,&3,&4)",--FJATE BIEN QUE MI MODULO SE LLAMA CONECCION, QUE LUEGO queda coneccion.junincon!!.
TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox4.Text)
If Error Then
 Message.Error("NO SE PUDIERON GUARDAR LOS DATOS")
 Else
 Message.Info("SU REGISTRO SE HA AGREGADO EXITOSAMENTE, \n SI QUIERE VER LOS REGISTROS DE CLICK AL BOTON VER REGISTROS")
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox2.SetFocus
'Me.Close
ver_nombre_usuario.Close
registro_usuarios.Show
 Endif
 Endif
 Endif
 Endif
End


Analiza bien!

Citar:
IF TextBox2.Text <> "" AND TextBox3.Text <> "" THEN


Esta parte de aqui no la entiendo <>"" como es eso? que sea menor o mayor a nada?    mejor seria if TextBox2.Text ="" and TextBox3.Text ="" then
message.info("debe llenar los campos requeridos").
else
lo demas y finalizas con endif abajo a lo ultimo despues que cumplas todas las sentencias.
 



 
última edición por jousseph el Viernes, 25 Octobre 2013, 20:12; editado 2 veces 
jousseph - Ver perfil del usuarioEnviar mensaje privadoVer la galería personal del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
De todas formas, esta forma de tratar la base de datos tiene un inconveniente que ahora os puede parecer más o menos insignificante, pero que es muy serio si aspiras a hacer algo más o menos profesional:

Estás atando tu programa al tipo, marca y, a veces, versión de la base de datos. Basta que tu cliente cambie de base de datos, basta que la Oracle haga una actualización extraña, para que tu programa necesite ser reescrito.

Es mucho mejor el aislar el código de la estructura de la base de datos. ¿Cómo? Utilizando los objetos de Gambas.

Te he adjunto un ejemplo que añade registros a una tabla de usuarios similar a la tuya. Para el ejemplo te crea una base sqlite en tu home y la utiliza, pero cambiando los parámetros del formulario, puedes utilizar tu base de datos MySQL sin tener que cambiar una sóla línea de código.

Espero que te sirva. Aunque la experiencia me dice que si lo que ahora has hecho te funciona, no lo vas a cambiar... pero bueno, ahí queda el consejo para quien quiera aceptarlo y el ejemplo para quien quiera mirarlo.
 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Problemas Ingresar Registros En Una Base De Datos Tipo MySql Con Gambas2 
 
He hecho el ejemplo en Gambas2, que es lo que dices que usas, pero no creo que Gambas3 tenga ningún problema en convertirlo.

Saludos.
 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
10.00 10 10 1
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Conexion Base De Datos MYSQL Con Gambas2 kbza Bases de Datos 12 Sabado, 10 Octobre 2009, 11:39 Ver último mensaje
CanihoJR
No hay nuevos mensajes Paquetes MySql Adicionales Para Gambas2 In... bvillamanyan Instalación 2 Martes, 27 Septiembre 2011, 20:48 Ver último mensaje
jsbsan
No hay nuevos mensajes Problemas Para Ingresar Informacion En Un ... v3ctor Aplicaciones/Fragmentos de Código 3 Lunes, 12 May 2014, 23:43 Ver último mensaje
jsbsan
No hay nuevos mensajes Que Tipo De Base De Datos Me Conviene? v3ctor Bases de Datos 19 Sabado, 28 Febrero 2015, 16:30 Ver último mensaje
jsbsan
 

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
No puede descargar archivos
No puede publicar eventos en el calendario