function check valid emaill address write with ASP???

[snoopy0877]

I want to check valid emaill address by user input in ASP code, Have anyone got this code? Pls, help me, thanks

[simflex]

how about this?

<%
Dim bmail
If Len(request.querystring("email")) < 8 Then
bmail = False
Else
If Instr(1, (request.querystring("email")), " ") <> 0 Then
bmail = False
Else
If InStr(1, (request.querystring("email")), "@") < 2 Then
bmail = False
Else
If InStrRev((request.querystring("email")), ".") < InStr(1, (request.querystring("email")), "@") + 2 Then
bmail = False
Else
bmail = True
End If
End If
End If
End If

If bmail = False then response.write ("Please+supply+a+real+e-mail+address")
%>