URLPathEncode - Convert a string for using on a URL path [ All Languages » VB »  Internet] Total Hit ( 4064) Rate this article:     Poor     Excellent   Submit Your Question/Comment about this article Rating

Click here to copy the following block ' convert a string so that it can be used on a URL path ' ' Same effect as the Server.URLPathEncode method in ASP Function URLPathEncode(ByVal Text As String) As String   Dim i As Integer   Dim acode As Integer      URLPathEncode = Text      For i = Len(URLPathEncode) To 1 Step -1     acode = Asc(Mid$(URLPathEncode, i, 1))     Select Case acode       Case 48 To 57, 65 To 90, 97 To 122         ' don't touch alphanumeric chars       Case 33, 35, 36, 38, 42, 43, 45, 46, 47, 58, 63, 64, 95, 126         ' these punctuation chars require no translation       Case Else         ' replace other chars with "%hex"         URLPathEncode = Left$(URLPathEncode, i - 1) & "%" & Hex$(acode) _           & Mid$(URLPathEncode, i + 1)     End Select   Next    End Function

Related Article(s)

Check for a valid URL

Launch the default browser on a given URL

URLDecodeEx - Decodes an encoded URL

URLEncode - Convert a string for using on a URL query string

URLEncodeEx - Apply URL encoding rules

GetHtmlPageSource - Download the HTML at a given URL

IsValidUrl - Validating a URL

How Do I...Read XML from a URL?

User Tips: Converting URLs into Hyperlinks

URL sharing across a network with ASP.NET

URL Rewriting with ASP.NET

URL Demo

How to Encode/Decode URL using API

Submitted By : Nayan Patel  (Member Since : 5/26/2004 12:23:06 PM)
	Job Description : He is the moderator of this site and currently working as an independent consultant. He works with VB.net/ASP.net, SQL Server and other MS technologies. He is MCSD.net, MCDBA and MCSE. In his free time he likes to watch funny movies and doing oil painting.
View all (893) submissions by this author  (Birth Date : 7/14/1981 )