Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > MySQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-02-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.048
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Código SQL [-]
INSERT into users (u_username, u_rolecode, u_password) 
VALUES ('User', 'Role', AES_ENCRYPT('Pass','abcd') )

Ejecuta esa sentencia con tu programa "manager" de msysql
Responder Con Cita
  #2  
Antiguo 27-02-2017
Avatar de chino150
chino150 chino150 is offline
Miembro
 
Registrado: dic 2007
Posts: 86
Poder: 17
chino150 Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
Código SQL [-]
INSERT into users (u_username, u_rolecode, u_password) 
VALUES ('User', 'Role', AES_ENCRYPT('Pass','abcd') )

Ejecuta esa sentencia con tu programa "manager" de msysql
funciona bien pero en delphi no
Responder Con Cita
  #3  
Antiguo 27-02-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.048
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Pues danos más información, no podemos trastear tu pc y tu código
Responder Con Cita
  #4  
Antiguo 27-02-2017
Avatar de chino150
chino150 chino150 is offline
Miembro
 
Registrado: dic 2007
Posts: 86
Poder: 17
chino150 Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
Pues danos más información, no podemos trastear tu pc y tu código
Código Delphi [-]
procedure TForm1.btnSafeClick(Sender: TObject);
var
User: String;
Role: String;
Pass: String;
begin

User := txtName.Text;
Role := cbRole.Text;
Pass := txtPassword.Text;

      Zquery1.Close;
      Zquery1.SQL.Clear;
      Zquery1.SQL.Add ('INSERT into users(u_username,u_rolecode,u_password)VALUES("User", "Role", AES_ENCRYPT("Pass", "abcd")');
      Zquery1.ExecSQL;

este es el código, uso delphi seattle, mysql 5.7.11 y zeos
Responder Con Cita
  #5  
Antiguo 27-02-2017
aposi aposi is offline
Miembro
 
Registrado: dic 2006
Posts: 146
Poder: 18
aposi Va por buen camino
passa todos los valores por parametro
Responder Con Cita
  #6  
Antiguo 27-02-2017
Avatar de chino150
chino150 chino150 is offline
Miembro
 
Registrado: dic 2007
Posts: 86
Poder: 17
chino150 Va por buen camino
Cita:
Empezado por aposi Ver Mensaje
passa todos los valores por parametro
Intenté hacerlo asi y me sale un error que los param's no existen
Responder Con Cita
  #7  
Antiguo 27-02-2017
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Poder: 18
jafera Va por buen camino
Yo cuento 4 parentesis a la izquierda "(" y tres a la dereacha ")"
A ver si es esto.

Saludos

Josep
Responder Con Cita
Respuesta



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
Mover datos de tabla en memoria a tabla mysql webmasterplc SQL 0 07-04-2014 05:12:33
Update de un campo, en funcion a datos de otra tabla oscarac SQL 3 08-02-2013 16:32:28
Problemas insertando en mysql delphi 2010 nickolas Conexión con bases de datos 9 20-08-2012 00:33:20
Error en funcion almacenada para insertar datos a tabla dark_monk9 PostgreSQL 3 16-01-2012 14:57:31
Insertando, editando y buscando datos en un mismo formulario canelita Conexión con bases de datos 6 05-09-2007 07:40:30


La franja horaria es GMT +2. Ahora son las 01:17:59.


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