Server ASP.Net

<%@ Page Language="VB" %>


   Encoding URL Strings
   
      Sub UrlEncode()
         Dim StrToEncode As String
         Dim StrToReturn As String
         StrToEncode = "Hello, World!"
         StrToReturn = Server.UrlEncode(StrToEncode)
         Response.Write("            StrToReturn & """>" & StrToReturn & " - Click to Decode!")
      End Sub
   


<% UrlEncode %>


<%-- UrlDecode.aspx
<%@ Page Language="VB" %>


   Decoding Encoded URL Strings
   
      Sub UrlDecode()
         Dim StrToDecode As String
         Dim StrToReturn As String
         StrToDecode = Request.QueryString("StrToDecode")
         StrToReturn = Server.UrlDecode(StrToDecode)
         Response.Write(StrToReturn)
      End Sub
   


<% UrlDecode %>


--%>