Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 21-10-2020
rrosariom rrosariom is offline
Miembro
 
Registrado: abr 2007
Posts: 23
Poder: 0
rrosariom Va por buen camino
Exclamation Formulario Delphi para hacer Login a PostGreSQL

Buenas tardes, espero que todos se encuentren muy bien!!

Actualmente, tengo una base de datos en PostgreSQL en hice una tabla llamada USERS con los campos usuario y contraseña. En el caso de la columna contraseña utilicé una función de una extensión de PostgreSQL para encriptarla, ya que no deseo que si alguien accede a la base de datos y tiene los permisos pueda ver la clave de los usuarios del sistema. Todo marcha bien, sin embargo, cuando intento hacer login desde DELPHI para entrar al sistema no encuentra el usuario y contraseña creada, y por ende no me carga el sistema. Considerando que, desde DELPHI desencripto la clave, y de hecho puedo verlo en un dbgrid y en edit también.

A continuación, el código para ver si alguien de este foro me ayuda:
Código Delphi [-]
Adoquery1.Close();
Adoquery1.SQL.Clear();
Adoquery1.SQL.Add('SELECT "ID_USER", "USUARIO",  pgp_sym_decrypt("CLAVE"::bytea,''AES_KEY'') as "CLAVE", "COD_EMPLEADO" FROM "schema_SYS00"."USERS"');
Adoquery1.SQL.Add('WHERE "USUARIO" =' + '''' + dbedit1.Text + '''');
Adoquery1.SQL.Add('AND pgp_sym_decrypt("CLAVE"::bytea,''AES_KEY'') =' +''''+ dbedit2.text+'''');
Adoquery1.Open;
if adoquery1.RecordCount = 0 then
 showmessage('Usuario o contraseña incorrecto o no existen') else
  form1.showmodal;
Siempre me devuelve el mensaje del showmessage.

Muchas gracias...
Rolando.

Última edición por ecfisa fecha: 21-10-2020 a las 23:52:10. Razón: Agregar etiquetas [delphi]
Responder Con Cita
  #2  
Antiguo 22-10-2020
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.257
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Deberías usar parámetros en lugar de concatenar valores y textos, es fácil equivocarse o provocar errores así.
Aparte de eso, ¿has probado desde algún "manager" de postgresql si devuelven valores esa sentencia?
Responder Con Cita
  #3  
Antiguo 22-10-2020
rrosariom rrosariom is offline
Miembro
 
Registrado: abr 2007
Posts: 23
Poder: 0
rrosariom Va por buen camino
Hola Casimiro, muchas gracias por las atenciones!!

Si, hice todas esas pruebas y todo marcha bien.

Ya lo resolví el problema, utilizando la misma sentencia, pero cambiando los dbedits por edit. La situación, es que su uso los dbedit, ya tienes en memoria el valor del hash de la encriptación y por eso nunca encontrará la existencia del registro del usuario, sin embargo, con los edits, como no tienen ninguna relación con la base de datos, lo se hace es una comparación que es realmente lo que debe ocurrir.

Hermano, muchas gracias, y espero que le sirva a otros, porque casi no veo soluciones de este tipo, existen muchos login, pero la mayoría no encriptan las claves, y los que sí utilizan métodos un poco complejos.

Siempre es un placer estar en este foro!!
Rolando.
Responder Con Cita
  #4  
Antiguo 22-10-2020
Avatar de ElKurgan
[ElKurgan] ElKurgan is offline
Miembro Premium
 
Registrado: nov 2005
Posts: 1.237
Poder: 20
ElKurgan Va camino a la fama
Thumbs up

Gracias por compartir la solución

Saludos
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
¿como Hacer un Login para proteger mi proyecto? Master-Key Varios 5 29-09-2015 18:39:57
Centrar formulario del login de una aplicación migrada delphi 7 a dephi xe5 ronimaxh Varios 8 19-03-2014 16:21:36
Como hacer un Login en Delphi php kurono Varios 0 29-06-2011 05:26:08
Ayuda para crear un formulario de login y pass Striker Varios 8 02-08-2006 19:12:35
cmo hacer un formulario para seleccionar datos ercrizeporta Varios 4 14-07-2005 15:11:47


La franja horaria es GMT +2. Ahora son las 00:55:55.


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