Formula controllo mail

[fruttosio79]

Con la seguente formula controllo la corretta digitazione della mail in un form di registrazione; il problema riguarda il fatto che se si inserisce una mail del tipo "nome.cognome@dominio" il controllo la convalida anche se manca il punto nella seconda parte ("nome.cognome@dominio.it" sarebbe corretta)

  
FUNCTION invalidEmail( email )
  IF INSTR( email, "@" ) = 0 OR INSTR( email, "." ) = 0 OR INSTR( email, " " ) <> 0 THEN
    invalidEmail = TRUE
  ELSE
    invalidEmail = FALSE
  END IF
END FUNCTION

Ciao e grazie in anticipo !!