non esiste un isEmail
con una regular expression puoi fare un controllo non del tutto rigoroso ma in poche righe
codice:
Function isEmail(txt)
  set RE = new RegExp
  RE.Pattern="^([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$"
  isEmail = RE.Test(txt)
End Function