-----------------------------------------------------------
New Message on BDOTNET
-----------------------------------------------------------
From: pawanns
Message 3 in Discussion
Hi All,
I found the solution for the problem myself here is the solution which might
be helpful for others also.....but before passing the value to the function
to avoid cross scripting you have to encode the value......repplace all
scriptting tags....
Function HTMLLinkUrl(sValue)
Dim objRegExp
if sValue = "" Then Exit function
Set objRegExp = New RegExp
objRegExp.Global = True
objRegExp.IgnoreCase = True
objRegExp.Pattern =
"((ht|f)tps{0,1}?://\S[0-9a-zA-Z\.\,\%\&[EMAIL
PROTECTED]/\|\:\;\+\~]+[/]?[^\.\'])([\.]?.*)"
HTMLLinkUrl = objRegExp.Replace(sValue, "<A href=""$1"">$1</A>$3")
objRegExp.Pattern = "([EMAIL PROTECTED])"
HTMLLinkUrl = objRegExp.Replace(HTMLLinkUrl, "<A
href=""mailto:$1"";>$1</A>")
Set oRegExp = Nothing
End If
Regards,
Pawan
>From: "BDOTNET" <[EMAIL PROTECTED]>
>Reply-To: "BDOTNET" <[EMAIL PROTECTED]>
>To: "BDOTNET" <[EMAIL PROTECTED]>
>Subject: Re: Finding the url text and making into anchor tag
>Date: Thu, 2 Sep 2004 07:15:12 -0700
>
_________________________________________________________________
Claim your Citibank Ready Cash today. http://go.msnserver.com/IN/54177.asp
It�s fast, easy and affordable.
-----------------------------------------------------------
To stop getting this e-mail, or change how often it arrives, go to your E-mail
Settings.
http://groups.msn.com/bdotnet/_emailsettings.msnw
Need help? If you've forgotten your password, please go to Passport Member Services.
http://groups.msn.com/_passportredir.msnw?ppmprop=help
For other questions or feedback, go to our Contact Us page.
http://groups.msn.com/contact
If you do not want to receive future e-mail from this MSN group, or if you received
this message by mistake, please click the "Remove" link below. On the pre-addressed
e-mail message that opens, simply click "Send". Your e-mail address will be deleted
from this group's mailing list.
mailto:[EMAIL PROTECTED]
