<%@ Page Language="VB" %> <html> <head> <title>Decoding Encoded URL Strings</title> <script runat="server"> Sub UrlDecode() Dim StrToDecode As String Dim StrToReturn As String StrToDecode = Request.QueryString("StrToDecode") StrToReturn = Server.UrlDecode(StrToDecode) Response.Write(StrToReturn) End Sub </script> </head> <body> <% UrlDecode %> </body> </html>