Ver Mensaje Individual
  #1  
Antiguo 25-01-2010
mcsebas mcsebas is offline
Miembro
 
Registrado: feb 2008
Posts: 78
Reputación: 19
mcsebas Va por buen camino
Problemas para insertar con Zeos y MySQL

Holas a todos nuevamente resulta que estoy haciendo un programa y utilizo MySQL como gestor de base de datos, hasta ahi todo bien, pero a la hora de insertar datos en una tabla de la base de datos no puedo agregarlos.

Utilizo los componentes ZConnection y ZQuery. Mi consulta es:

¿Como puedo hacer la insercion con estos dos componentes o se necesita de un data source o ztable?

Este es el codigo que utilizo:
Código Delphi [-]
                try
                   Conexion:=TZConnection.Create(nil);
                   with Conexion do
                        begin
                              User:='root';
                              Password:='mcsebas';
                              HostName:='localhost';
                              Database:='despacho';
                              Protocol:='mysql-5';
                              Port:=3306;
                              Connected:=true;
                        end;

                   ComInsertar:=TZQuery.Create(nil);
                   with ComInsertar do
                        begin
                              Connection:=Conexion;
                              SQL.Clear;
                              SQL.Text:='insert into reparticion (idrep, nomreparticion, codrep) values (null,:NombreRep,:CodigoRep);';
                              ParamByName('NombreRep').AsString:=txtNombre.Text;
                              ParamByName('CodigoRep').AsString:=txtCodigo.Text;
                              Active;
                              ExecSQL;

                        end;


                Except
                  on e:Exception do

                end;

Gracias
Responder Con Cita