[Resolvido] Select não funciona..
Olá pessoal!
Tô cansado, de virote, com fome mas preciso fazer isso...
O camarada cadastra na newsletter, campo NAME e EMAIL...
tem que realizar uma busca no banco para verificar se o email já existe... ...então:
CHECKUSER = DB.EXECUTE ("SELECT * FROM CUSTOMERS WHERE EMAIL = '"&vEMAIL&"'")
IF CHECKUSER.EOF THEN
SET REGISTER = DB.EXECUTE ("INSERT INTO CUSTOMERS (NAME, EMAIL) VALUES ('"&vNAME&"', '"&vEMAIL&"')")
vMESSAGE = "Atenção! Seu cadastro ainda não foi realizado. Siga as instruções enviadas para o e-mail " & vEMAIL
ELSE
vMESSAGE = "Não chegou no fim do arquivo, portanto já existe este registro."
END IF
MAS NÃO FUNCIONA! MESMO COM O EMAIL JÁ CADASTRADO ELE REGISTRA DE NOVO!
CAMPOS OK, TABELA OK, BANCO ACCESS OK...
Já inverti para colocar IF NOT CHECKUSER.EOF, mas deu na mesma...
Valeu pela força!
Discussão (4)
Carregando comentários...