Fórum SENHAS DE ACESSO e DELETAR REGISTROS #178727
31/08/2003
0
Tenho uma tabela com os seguintes campos:
Cód_pagto
Data
Cód_Usu
.
.
.
Estes estão em um FORM, como DBEDIT. O que eu que é o seguinte:
1º qdo eu colocar o código do usuário (Cód_Usu) ele entre na tela de Login/Senha, pedindo a confirmação. Sei que devo colocar no evento ON EXIT do DBEDIT para entrar na tela de Login/Senha. Mas como eu faço o código para que fique travado o sistema.
Por exemplo:
Qdo eu colocar o Cód_Usu = 15, na tela que vai aparecer LOGIN/SENHA, este código seja o mesmo para o codusu = 15 cujo login e senha seja ‘asdfg’ e ‘12345’ respectivamente da tabela USUARIOS.
QUE CÓDIGO EU USO PARA FAZER ISTO?
2º - COMO EU FAÇO PARA APAGAR TODOS OS REGISTROS DE UMA TABELA DE UMA SÓ VEZ?
Desde já agradeço,
Rodrigo Caliman
Cód_pagto
Data
Cód_Usu
.
.
.
Estes estão em um FORM, como DBEDIT. O que eu que é o seguinte:
1º qdo eu colocar o código do usuário (Cód_Usu) ele entre na tela de Login/Senha, pedindo a confirmação. Sei que devo colocar no evento ON EXIT do DBEDIT para entrar na tela de Login/Senha. Mas como eu faço o código para que fique travado o sistema.
Por exemplo:
Qdo eu colocar o Cód_Usu = 15, na tela que vai aparecer LOGIN/SENHA, este código seja o mesmo para o codusu = 15 cujo login e senha seja ‘asdfg’ e ‘12345’ respectivamente da tabela USUARIOS.
QUE CÓDIGO EU USO PARA FAZER ISTO?
2º - COMO EU FAÇO PARA APAGAR TODOS OS REGISTROS DE UMA TABELA DE UMA SÓ VEZ?
Desde já agradeço,
Rodrigo Caliman
Rkaliman
Curtir tópico
+ 0
Responder
Posts
31/08/2003
Carlos Jatai
meu amigo, fica simples de resolver.
Na prática:
cria uma variavel pra armazenar o dbedit ou edit cod_usu
suatabela.close;
suatabela.sql.clear;
suatabela.sql.add(´select * from usuarios where codusu =:par0´);
suatabela.parambyname(´par0´).asinteger:=cod_usu;
suatabela.open;
if suatabela.eof then ´Mensagem´
pra deletar todos os registros de uma tabela
delete * from suatabela
Na prática:
cria uma variavel pra armazenar o dbedit ou edit cod_usu
suatabela.close;
suatabela.sql.clear;
suatabela.sql.add(´select * from usuarios where codusu =:par0´);
suatabela.parambyname(´par0´).asinteger:=cod_usu;
suatabela.open;
if suatabela.eof then ´Mensagem´
pra deletar todos os registros de uma tabela
delete * from suatabela
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)