Hi,

As part of a program I am making I need to validate a an e-mail address to ensure it contains no spaces, 1 "@" symbol and 3 "." symbols.

I've racking my brains and scowering the net for a solution but to no avail.

Please can anyone help me with this vexing problem?

Many thanks,

John.

hi there...

use something like this to validate the string..

if yourstring like "*@*.*.*.*" then
    'going ok.. let's check the spaces
    if instr(1,yourstring," ",vbTextCompare ) = 0 then
        'everything is ok
    else
        'space found
    endif
else
    'wrong format...
endif

Gonzalo Bianchi

Thanks Gonzalo Bianchi,

A brilliant solution that meets my need perfectly.

no problem.. the only thing that i have to warn you about is that not all the e-mail adrress has the same count of "." in there.. that's depends of the server address...


Gonzalo Bianchi