Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Unhappy Insertar datos en una base de datos desde delphi con sql

Hola a todos,

Soy nuevo en delphi, y tengo un dilema, por favor me podrian ayudar con esto:

Lo que pasa es que tengo form en el cual tengo mis edits y un boton para guardar en una base de datos, la base la tengo en el localhost que se genera cuando instalas elapperv.

el problema es que no se como empezar alguien me podria ayudar y todo esto lo quiero hacer o lo necesito con sql.
Responder Con Cita
  #2  
Antiguo 06-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración
Responder Con Cita
  #3  
Antiguo 07-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Red face Gracias...

Mushcas gracias, ya lei el apartado que me remendaste acerca del foro, y tienen razon.

por tal replanteo mi dilema, alguien me podria decir por favor por que tengo un error de sintaxis en es linea,

Código Delphi [-]
zquery1.Close;
zquery1.SQL.Clear;
zquery1.SQL.Add('INSERT INTO empleado(numemp,nombre,apepat,apemat,direccion,telcasa,telcel,puesto,fechan,edad)');
zquery1.SQL.Add('VALUES(+nemp+,'+nom+','+paterno+','+materno+','+direc+','+telca+','+telce+','+pues+  ','+nacim+',+edad+,+hoy+)');
zquery1.ExecSQL;
les explico, tengo un form en delphi 7 con varios edit y un boton de guardar, ya hice la conexion con la base de datos con los componentes Zoes, pero al presionar el boton me dice que hay un error de sintaxis en la linea del insert into, me imagino que es por que los campos de:

nemp, edad son numericos y no se escriben asi, otro es que el campo de hoy es de tipo fecha, les falta algo a lo mejor me podrian yudar? por favor, muchisimas gracias por su tiempo y ayuda.

Última edición por Casimiro Notevi fecha: 07-05-2012 a las 22:15:54.
Responder Con Cita
  #4  
Antiguo 07-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Recuerda poner los tags al código fuente, ejemplo:



Gracias
Responder Con Cita
  #5  
Antiguo 07-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Parece que falta una comilla casi al final:
Código Delphi [-]
+hoy+)');
Código Delphi [-]
+hoy+')');
¿Además se supone que esos nombres son variables, campos, componentes, etc. ?
Responder Con Cita
  #6  
Antiguo 07-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Error en la sintaxis

Bueno, son variables lo que va dentro del values, por que los valores que resiven los edit y los combobox que tengo en el form se los asigno a las variables.

ahora cuando manda el mensaje de error me pone la linea con la informacion que se va a guardar pero los campos numericos y el date no pone nada, por ejemplo:

(,miguel,servantes,najera,presilla No. 56,55342134,supervisor,1/nov/1987,+edad,+hoy+).

por favor por que pasa eso me pueden decir, gracias...
Responder Con Cita
  #7  
Antiguo 07-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Está claro, los campos de texto y la fecha deben ir entre comillas. Ejemplo:

Código Delphi [-]
QuotedStr(nombre) +','+ QuotedStr(direccion)  +','+ ......
Responder Con Cita
  #8  
Antiguo 07-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Red face

Hola de nuevo pues no es eso,sigue apareciendo el mismo error, por favor alguien sabe que pasa con la sintaxis, gracias por los que entran y ponen sus respuestas.
Responder Con Cita
  #9  
Antiguo 07-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Red face

ya verifique la query quitando las varibles de tipo "int" del query y si me guarda los datos en la base de datos, pero entonces cual es la sintaxis cuando una variable es de tipo entera y fecha.

poor favor me podrian decir, gracias...
Responder Con Cita
  #10  
Antiguo 07-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Voy a tener que recordarte nuestra guía de estilo
No tenemos bola de cristal, ni somos adivinos ¡¡¡pon el código, dinos exactamente el error, cuéntanos más, danos más pistas!!!
Responder Con Cita
  #11  
Antiguo 07-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Red face

ok, lo vuelvo a poner una disculpa

Código Delphi [-]
zquery1.Close;
zquery1.SQL.Clear; 
zquery1.SQL.Add('INSERT INTO empleado(numemp,nombre,apepat,apemat,direccion,telcasa,telcel,puesto,fechan,edad,fingreso)');
zquery1.SQL.Add('VALUES(+nemp+,'+nom+','+paterno+','+materno+','+direc+','+telca+','+telce+','+pues+  ','+nacim+',+edad+,+hoy+)');
zquery1.ExecSQL;

las variables de tipo entero son nemp, edad y la variable de tipo fecha es hoy

gracias por la atencion

Última edición por Casimiro Notevi fecha: 08-05-2012 a las 00:39:34. Razón: Poner etiquetas [delphi] [/delphi]
Responder Con Cita
  #12  
Antiguo 08-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Te recuerdo lo de poner los tags al código fuente, ejemplo:



Gracias
Responder Con Cita
  #13  
Antiguo 08-05-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Si te fijas en el código verás que sigue estando mal las comillas, que no has puesto los campos texto y fecha entre comillas, etc.
O sea, que no estás haciendo nada de lo que te he comentado.
Si no ayudas a que te ayuden... pues nada, amigo, tú mismo
Responder Con Cita
  #14  
Antiguo 08-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Red face

ok ya hice lo que me comentaron que la variable de tipo entera la pusiera entre apostrofes y pero me marca un error de:

incompatible types:'String' and 'Integer', por tal motivo como se pone la variable correctamente.
Código Delphi [-]
zquery1.Close;
zquery1.SQL.Clear;
zquery1.SQL.Add('INSERT INTO empleado(numemp,nombre,apepat,apemat,direccion,telcasa,puesto,fechan)');
zquery1.SQL.Add('VALUES('+nemp+','+QuotedStr(nom)+','+QuotedStr(paterno)+','+QuotedStr(materno)+','+QuotedStr(direc)+','+QuotedStr(t  elca)+','+QuotedStr(pues)+','+QuotedStr(nacim)+,'+edad+','+hoy+')');
zquery1.ExecSQL;
por favor me podrian decir que pasa todavia, muchas gracias por el apoyo

Última edición por ecfisa fecha: 08-05-2012 a las 08:10:23. Razón: Acomodar etiquetas [delphi]
Responder Con Cita
  #15  
Antiguo 08-05-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola angelvazv.

El error es de conversión, estás intentando asignar un valor de tipo Integer en una variable que puede almacenar el tipo string. Lamentablemente no pusiste la declaración de variables así que voy a tentar la suerte...

Te pongo un código un poco diferente, utilizando parámetros. Que a mi criterio, le otorga seguridad, claridad y simplicidad:
Código Delphi [-]
  with zquery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('INSERT INTO empleado(numemp, nombre, apepat, apemat,');
    SQL.Add('direccion, telcasa, telcel, puesto, fechan, edad, fingreso)');
    SQL.Add('VALUES(:nemp, :nom, :paterno, :materno, :direc, :telca,');
    SQL.Add(':telcel, :pues, :nacim, :edad, :hoy)');
    ParamByName('nemp').AsInteger:= nemp;
    ParamByName('nom').AsString:= nom;
    ParamByName('paterno').AsString:= paterno;
    ParamByName('materno').AsString:= materno;
    ParamByName('direc').AsString:= direc;
    ParamByName('telca').AsString:= telca;
    ParamByName('telcel').AsString:= telcel;
    ParamByName('pues').AsString:= pues;
    ParamByName('nacim').AsString(nacim);
    ParamByName('edad').AsInteger:= edad;
    ParamByName('hoy').AsInteger:= hoy;
    ExecSQL
  end;
Si te fijas, en tres líneas usé AsInteger, sospecho que en esos casos estás asignando un Integer a un TStringField (pero podrían ser más).

Si declaras una variable de tipo Integer como por ejemplo nemp (creo que es integer), no podés asignarla a un campo de tipo TStringField sin hacer antes las conversiones necesarias.
Sin el uso de parámetros tendrías que hacer algo parecido a:
Código Delphi [-]
  zquery1.Close;
  zquery1.SQL.Clear;
  zquery1.SQL.Add('INSERT INTO empleado(numemp,nombre,apepat,apemat,direccion,telcasa,telcel,puesto,fechan,edad)');
  zquery1.SQL.Add('VALUES(' + QuotedStr(IntToStr(nemp)) + ',' + QuotedStr(nom) + ',' + QuotedStr(paterno) + ',' +
    QuotedStr(materno) + ',' + QuotedStr(direc) + ',' + QuotedStr(telca) + ',' + QuotedStr(telcel)+ ',' +
    QuotedStr(pues) + ',' + QuotedStr(nacim)  + ',' + QuotedStr(IntToStr(edad)) + ',' + QuotedStr(IntToStr(hoy)) + ')');
  zquery1.ExecSQL;
¨
Encerrando entre comillas y convirtiendo a cadena mediante la función correspondiente, a cada variable de tipo entera o flotante que utilices.

Como verás, es un código mucho más complejo, difícil de leer y propenso a errores.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 08-05-2012 a las 10:42:08.
Responder Con Cita
  #16  
Antiguo 08-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
Thumbs up

Excelente muhisimas gracias ahora una pregunta mas como se pone para las variable tipos fecha por que la variable hoy es de este tipo, asi como esta no me marcar error al ejecutar el programa pero cuando presiono para cuardarlo en la base es donde marca el error de las variable.

ParamByName('hoy').AsDate:= hoy;

y muchas gracias por la ayuda.
Responder Con Cita
  #17  
Antiguo 08-05-2012
angelvazv angelvazv is offline
Registrado
NULL
 
Registrado: may 2012
Posts: 9
Poder: 0
angelvazv Va por buen camino
esa parte ya esta muchisimas gracias a todos lo que me ayudaron, este foro es lo maximo.

y nuevamente muchisimas gracias.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Crear una base de Datos de MS SQL desde Delphi agalvan_kit SQL 3 03-08-2015 22:27:56
Insertar combo con datos a Excel desde Delphi capo979 Varios 4 04-06-2008 15:26:09
Insertar Datos a un campo de la base de datos desde un DBEdit saltamirano Varios 11 12-12-2007 18:29:35
Crear base de datos y cargar datos desde delphi Albano MySQL 4 17-05-2007 21:01:18
Insertar datos en archivo word desde aplicacion Delphi JulioGO Servers 1 24-02-2007 23:43:16


La franja horaria es GMT +2. Ahora son las 17:06:14.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi