Server.HTMLDecode

S

Steven Burn

Function URLDecode(sDec)
dim objRE
set objRE = new RegExp
sDec = Replace(sDec, "+", " ")
objRE.Pattern = "%([0-9a-fA-F]{2})"
objRE.Global = True
URLDecode = objRE.Replace(sDec, GetRef("URLDecodeHex"))
End Function

'// Replacement function for the above
Function URLDecodeHex(sMatch, lhex_digits, lpos, ssource)
URLDecodeHex = chr("&H" & lhex_digits)
End Function

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!
 
S

Steven Burn

My apologies (C&P'd to a local file a while ago, but didn't bookmark the URL I got it from)

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

Forum statistics

Threads
473,766
Messages
2,569,569
Members
45,042
Latest member
icassiem

Latest Threads

Top