Campo que so aceite um registro se tiver �@�. Banco IB.

Question

Ola galera!!!Sera que no IB tem como criar um campo que aceite valores para serem salvos apenas se contiver o @ para validar e-mail??Obrigado :P...

Sremulador · Answer

function VerificaMail(MAIL: string): Boolean;
var
I, Q: integer;
M: String;
begin
M:= ��;
Q:= 0;
Result:= False;
for I:= 1 TO LENGTH(MAIL) do begin
M:=Copy(MAIL, I, 1);
if M <> �@� then
Q:= Q + 1;
if Q = LENGTH(MAIL) then
result:= true;
end;

Afarias · Answer

no IB vc teria de usar uma UDF (uma fun��o tipo POS no delphi), ex::

create domain dm_email as varchar(80) check (pos(�@�, value) > 0);

create table teste1 ( nome varchar(30), email dm_email);

T+

Glauber_marques · Answer

Valeu galera!!!!!Brigaduu!!...

F�rum Campo que so aceite um registro se tiver �@�. Banco IB. #47186