Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
No Introduce Los Datos Base De Datos
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje No Introduce Los Datos Base De Datos 
 
estoy experimentando con base de datos sqlite3 y me surgio un problema y es que no introduce datos nuevos si los modificados
mas abajo muestro la linea que me parece da el problema de sintaxis creo... alguna idea de cual sera el problema?


Public Sub BtnAceptar_Click()
If Editando Then
  Try hResul["id"] = TxtID.Text
  Try hResul["Cliente"] = TxtCliente.Text
  Try hResul["Direccion"] = TxtDireccion.Text
  Try hResul["Celular"] = TxtCelular.Text
  Try hResul["Fecha"] = TxtFecha.Text
  Try hResul.Update()
  Print " ingresando datos1" ' estos print son solo para saber por que camino tomo el if son sin importancia
  Else
'creo que esta es la linea problematica la parte de (&1,&2...... no se algo estoy haciendo mal
    Try hConn.Exec("insert into tablataller value (&0, &1, &2, &3, &4)", TxtID.Text, TxtCliente.Text, TxtDireccion.Text, TxtCelular.Text, CDate(TxtFecha.text))
  
    Print "ingresando datos2"
    Endif
    Me.Close()
  Catch
    Message.Error("No se pudo introducir los datos solicitados")
    
End


 

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: No Introduce Los Datos Base De Datos 
 
no veo que hagas de gran uso esa variable hResul y no la has declarado

porque no veo donde abres la coneccion de la base de datos. solo donde ejecutas para guardar

Conectarme.moduloconexion

Almacenar =Try hConn.Exec("insert into Producto values ('" & TextBox1.Text & "' , '" & TextBox2.text & "' "')")

 Message("Registro Guardado")

    Me.Close()
  Catch
    Message.Error("No se pudo introducir los datos solicitados")
    
End



ademas para almacenar solo puedes tomar o indicar las cajas de texto como el codigo de arriba
 



 
última edición por soldadozero el Miercoles, 26 Junio 2013, 23:04; editado 2 veces 
soldadozero - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: No Introduce Los Datos Base De Datos 
 
Hola v3ctor.

Creo que no es value, es values.

Una cuestión.¿ Como te fue cuando convertiste la fecha ?.

A mi este ejemplo me ha funcionado:
Public Sub btnAceptar_Click()

  If editando Then
      hResul["idcajon"] = txtNumcaj.Text
      hResul["TipoComponente"] = txtTipocomp.Text
      hResul["Nombre"] = txtNombre.Text    
      hResul["Referencia"] = txtRefer.Text
      hResul.Update()
  Else
      Try hConn.Exec("insert into Armario values (&1,&2,&3,&4)", txtNumcaj.Text, txtTipocomp.Text, txtNombre.Text, txtRefer.Text)                
  Endif
 
  Me.Close()
  
  Catch    
    Message.Info("Imposible introducie los datos solicitados")
    
End
 


Saludos
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Miercoles, 26 Junio 2013, 23:07; editado 2 veces 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: No Introduce Los Datos Base De Datos 
 
Shell escribió: [Ver mensaje]
Hola v3ctor.

Creo que no es value, es values.

Una cuestión.¿ Como te fue cuando convertiste la fecha ?.

Saludos


buen ojo! eso paso por alto


shell suele suceder cuando no analizas el codigo, algunas veces me ha sucedido pero no en este caso
 



 
última edición por soldadozero el Miercoles, 26 Junio 2013, 23:07; editado 1 vez 
soldadozero - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: No Introduce Los Datos Base De Datos 
 
soldadozero:

Puede que la conexión estuviese abierta antes.

Es que no esta todo el código.

Saludos
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Miercoles, 26 Junio 2013, 23:11; editado 1 vez 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: No Introduce Los Datos Base De Datos 
 
Shell escribió: [Ver mensaje]
soldadozero:

Puede que la conexión estuviese abierta antes.

Es que no esta todo el código.

Saludos



claro amigo pueda que si!

pero hay que ser detallista

Saludos
 



 
soldadozero - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: No Introduce Los Datos Base De Datos 
 
Creo que tu error está en los comodines, ya que arrancas por &0 y deberías arrancar por &1, y si es values y no value.
Saludos
 




===================
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: No Introduce Los Datos Base De Datos 
 
v3ctor escribió: [Ver mensaje]

'creo que esta es la linea problematica la parte de (&1,&2...... no se algo estoy haciendo mal
    Try hConn.Exec("insert into tablataller value (&0, &1, &2, &3, &4)", TxtID.Text, TxtCliente.Text, TxtDireccion.Text, TxtCelular.Text, CDate(TxtFecha.text))
[/code]


Efectivamente la palabra correcta es values, no value. Además los operadores de sustitución comienzan en 1 y no en 0, es decir &1, &2, &3, etc.

Otra cosa más, bastante importante porque te habría mostrado el motivo del error. Si usas la cláusula Catch no debes poner Try en la instrucción. En la cláusula Catch, muestras un mensaje en caso de error, pero uno genérico. Si además concatenas la clase Error con sus propiedades, puedes obtener la línea del error, la descripción del error incluso el backtrace. Así:

Catch
    Message.Error("Imposible introducir los datos solicitados\n" & Error.Text & "\n" & Error.Where)

Más información sobre la clase estática Error:

http://www.gambasdoc.org/help/comp/gb/error?v3

En caso de haber usado ese código, te hubieras dado cuenta enseguida de que el error era de sintaxis sql  

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
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Insertar Datos De Una Tabla De Base De Dat... Daniel_2901 Bases de Datos 3 Martes, 18 May 2010, 15:04 Ver último mensaje
chen_08
No hay nuevos mensajes Pasar Todos Los Datos De Un Table View A U... alan Instalación 7 Domingo, 27 Febrero 2011, 23:48 Ver último mensaje
alan
No hay nuevos mensajes Se Puede En Una Grilla Mostrar Los Datos D... metalgearxd General 5 Jueves, 28 Febrero 2013, 20:54 Ver último mensaje
shordi
No hay nuevos mensajes Como Puedo Modificar Datos De La Base De D... metalgearxd General 2 Viernes, 01 Marzo 2013, 13:40 Ver último mensaje
metalgearxd
 

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