e-mail format function?

Hi,

does someone know if there's a function in VB that recognizes if a given text is an email?

i.e. something like

IsEmail("[email protected]") = true

and

IsEmail("hello@world") = false

...just wandering.

Thanks!

W.

Just make a function like this:

Code:

---

Public Function CheckEMail (sEmail as String) as Boolean
  Dim i as Integer
  i = Instr(1, sEmail, "@")
  If i > 0 then CheckEMail = True Else CheckEmail = False
End Function

---

Call it with this:

Code:

---

If CheckEmail("[email protected]" Then

---

Good Luck

Hehehe thanks that is already similar to what I'm doing :rolleyes: , also using filters such as .com, .net, .org ...

Thanks anyway! Anyone has other ideas?