insertando datos en una tabla en mysql 5.7.11 con la función AES_ENCRYPT

[chino150]

Originally Posted by roman

Es como dice jafera. Falta el paréntesis de cierre del VALUES.

LineComment Saludos

Código Delphi [-]
 Zquery1.SQL.Add ('INSERT into users(u_username,u_rolecode,u_password)VALUES("User", "Role", AES_ENCRYPT("Pass", "abcd"))');

ok este codigo esta funcionando pero no guarda la información escrita en txtName y cbRole lo que está guardando es User y role

[Casimiro Noteví]

Originally Posted by chino150

ok este codigo esta funcionando pero no guarda la información escrita en txtName y cbRole lo que está guardando es User y role

Como dice Neftali: "A mejores preguntas, mejores respuestas"
Es que llevamos varios días "tirándote de la lengua" para que des información
Dices que no se guarda esos datos, así que la pregunta lógica es: ¿has verificado que esas variables tienen valores o acaso están vacías? ¿puede ser que alguna sea campo clave y ya exista, por lo que no permita duplicarla?

[roman]

Originally Posted by chino150

Código Delphi [-]
Zquery1.SQL.Add ('INSERT into users(u_username,u_rolecode,u_password)VALUES("User", "Role", AES_ENCRYPT("Pass", "abcd"))');

ok este codigo esta funcionando pero no guarda la información escrita en txtName y cbRole lo que está guardando es User y role

Yo creo que todos dábamos por sentado que estabas poniendo sólo ejemplos y no los datos reales. Si la sentencia de arriba es exactamente la que tienes en tu programa, pues claro que lo que va a guardar en la base de datos son las palabras textuales "User" y "Role". Para pasar los valores de tus controles txtName y cbRole debes poner tu sentencia con parámetros:

Código Delphi [-]
Zquery1.SQL.Add ('INSERT into users(u_username,u_rolecode,u_password) VALUES(:user, :role, AES_ENCRYPT("Pass, "abcd"))');

y sustituirlos por los valores de los controles:

Código Delphi [-]
Zquery1.ParamByName('user').AsString := txtName.Text;
Zquery1.ParamByName('role').AsString := cbRole.Text;

LineComment Saludos

[chino150]

Originally Posted by roman

Yo creo que todos dábamos por sentado que estabas poniendo sólo ejemplos y no los datos reales. Si la sentencia de arriba es exactamente la que tienes en tu programa, pues claro que lo que va a guardar en la base de datos son las palabras textuales "User" y "Role". Para pasar los valores de tus controles txtName y cbRole debes poner tu sentencia con parámetros:

Código Delphi [-]
Zquery1.SQL.Add ('INSERT into users(u_username,u_rolecode,u_password) VALUES(:user, :role, AES_ENCRYPT("Pass, "abcd"))');

y sustituirlos por los valores de los controles:

Código Delphi [-]
Zquery1.ParamByName('user').AsString := txtName.Text;
Zquery1.ParamByName('role').AsString := cbRole.Text;

LineComment Saludos

Gracias el codigo arriba funciono