Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 24-12-2003
Descendents Descendents is offline
Miembro
 
Registrado: may 2003
Ubicación: Barcelona
Posts: 396
Poder: 24
Descendents Va por buen camino
Si al adoconnection, o al connection, le pones loginprompt a false, no te pedira esta contraseña que pones SA.

Y para hacer que se logonen, tan solo tienes que poner un par de edits, que en uno te entren el nombre y en el otro el password

Y un boton de entrar.

Al boton de entrar le pones una sentencia sql, que mire en tu tabla de usuarios o personal o como le llames a la tabla, y segun el resultado les dices que no entran, o saltas al siguiente formulario, que diriamos que es el menu, si el nombre y password son correctos.

Si no te gustan los edits, puedes hacer inputbox o inputquery, si no quieres tener que hacer un form para esto.

Ejemplo sentencia.
Código:
const
sel = 'select * from usuarios where nombre = ''%s'' and password = ''%s''';

with query1 do begin
  close;
  sql.clear;
  add(format(sel,[edit1.text,edit2.text]));
  open;
  if recordcount = 0 do begin
    showmessage('No puede entrar marchese')
    exit;
  end
  else begin
    form2.showmodal;
  end;
end;
Saludos
Responder Con Cita
 



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


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


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi