Power Builder - validacion de usuario

 
Vista:

validacion de usuario

Publicado por jose (3 intervenciones) el 17/05/2007 09:25:30
tengo problemas al validar el usuario y la contraseña quiero que el sle_usuario y el sle_password de mi ventana validacion me arroje un error si no existe el usuario para eso e creado la base de datos LOGIN y la tabla USUARIOS la cual tiene Cusuario (como clave principal ) y Cclave por favor si tiene un ejemplo mandenmelo se agradece la ayuda de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:validacion de usuario

Publicado por luis (50 intervenciones) el 17/05/2007 22:22:08
ejemplo.

SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=nombredeODBC;UID="+ls_user+";PWD="+sle_password.text+"'"
SQLCA.AutoCommit = True
connect;

if sqlca.sqlcode = 0 then
select ID_USUARIO,NOMBRE_USUARIO,EMAIL, id_perfil
into :anti,:nombres,:excha,:perfil
from USUARIOS
where INICIALES = :ls_user ;
messagebox('Datos de '+nombres,'IBM :'+anti+'~r~nTiene Correo Electrónico (S/N): '+excha)
return true
else
messagebox('Error',string(sqlca.SQLDBCode)+' '+sqlca.sqlerrtext+'usuario no existe')
return false
end if

Saludos desde guatemala.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar