This is a simple way of using the split function to get the domain name
Sub Get_Domain()
sEmail = "joe@gmail.com"
arTemp = Split(sEmail, "@")
sDomain = arTemp(UBound(arTemp))
End Sub
Cheers
Shasur
Showing posts with label Get Domain Name. Show all posts
Showing posts with label Get Domain Name. Show all posts
Saturday, March 31, 2007
Subscribe to:
Posts (Atom)
Download Windows Live Toolbar and personalize your Web experience! Add custom buttons to get the information you care about most.