#include <stdio.h>
#include <stdlib.h>
#include <string.h>
char * url_encode(const char * str)
{
  char * s = str;
  char * t = NULL;
  char * ret;
  char * validChars = "1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz:/.?=_-$(){}~&";
  char * isValidChar;
  int lenght = 0;
  // calcul de la taille de la chaine urlEncodée
  do{
    isValidChar = strchr(validChars, *s); // caractère valide?
    if(!isValidChar)
        lenght+=3; // %xx : 3 caractères
    else
        lenght++;  // sinon un seul
  }while(*++s); // avance d'un cran dans la chaine. Si on est pas à la fin, on continue...
  s = str;
  t = (char *)malloc(sizeof(char) * (lenght + 1)); // Allocation à la bonne taille
  if(!t) exit(EXIT_FAILURE);
  ret = t;
  //encodage
  do{
    isValidChar = strchr(validChars, *s);
    if(!isValidChar)
     sprintf(t, "%%%2X", *s), t+=3;







    else
        sprintf(t, "%c", *s), t++;
  }while(*++s);
  *t = 0; // 0 final
  return ret;
}
int main()
{
    char * urlEncoded = url_encode("while(*str++)sqfqsfq  ///\\ ");
    printf("%s", urlEncoded);
    free(urlEncoded); // Pensez à liberer l'espace alloué par l'encodeur!!
}

// Encode une URl avec uniquement un sous-ensemble de caractère ASCII
// Encode une URL
URLEncodée =  URLEncode("http://mon site/ma page")

$urlencode =  urlencode("http://mon site/ma page");

System.Web.HttpUtility.UrlEncode("Le texte à url encoder")

Server.UrlEncode("Le texte à url encoder")

String result = null;
......
try {
     //encodage
    result = java.net.URLEncoder.encode(
            "Le texte à url encoder",
            "UTF-8" /*Encodage des caractères*/
        );
} catch (java.io.UnsupportedEncodingException e) {
    e.printStackTrace();
}
......
try {
     //décodage
     result = java.net.URLDecoder.decode(
         "Le texte à url décoder",
         "UTF-8" /*Encodage des caractères*/
    );
} catch (java.io.UnsupportedEncodingException e) {
    e.printStackTrace( );
}

Private Const CP_UTF8 = 65001
Private Declare Function WideCharToMultiByte Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long, ByVal lpMultiByteStr As String, ByVal cchMultiByte As Long, ByVal lpDefaultChar As Long, ByVal lpUsedDefaultChar As Long) As Long

Public Function UTF8_Encode(ByRef vsInput As String) As String
Dim nLength As Long
   nLength = Len(vsInput)
   If nLength Then
       nLength = WideCharToMultiByte(CP_UTF8, 0, StrPtr(vsInput), nLength, 0, 0, 0, 0)
       UTF8_Encode = Space$(nLength)
       nLength = WideCharToMultiByte(CP_UTF8, 0, StrPtr(vsInput), -1, UTF8_Encode, nLength, 0, 0)
   End If
End Function 

Function UrlEncode(ByRef vsInput As String) As String
Dim i As Long
Dim xsAnsi() As Byte
Dim nChar As Byte
   xsAnsi = StrConv(UTF8_Encode(vsInput), vbFromUnicode)
   For i = 0 To UBound(xsAnsi)
       nChar = xsAnsi(i)
       Select Case nChar
           Case 48 To 57, 65 To 90, 97 To 122
               UrlEncode = UrlEncode & Chr$(nChar)
           Case Else
               If nChar < 16 Then
                   UrlEncode = UrlEncode & "%0" & Hex$(nChar)
               Else
                   UrlEncode = UrlEncode & "%" & Hex$(nChar)
               End If
       End Select
   Next i
End Function 

var textEncode = URIencode("texte a encoder");