Function LinkMail(strval)
If StringVal(strval) Then
If InStr(1, strval, "@") <> 0 Then
LinkMail = "<a href='mailto:" & strval & "'>" & strval & "</a>"
Else
LinkMail = strval
End If
Else
LinkMail = strval
End If
End Function
Showing posts with label email. Show all posts
Showing posts with label email. Show all posts
Friday, July 3, 2009
ASP MailTo Link Generator
Subscribe to:
Posts (Atom)