String.prototype.RLTrim = function ()
/* =========================
 supprimer les espaces initiaux et finaux
 ==========================
 exemples :
 alert("    exemple    ".RLTrim()); */
{
 return this.replace(/(^\s*)|(\s*$)/g,"");
}

Dim MaString As String = " toto "

' Plusieurs possibilités existent pour supprimer les espaces, en voici 2

MaString.Trim() ' Retournera "toto"

Trim(MaString)  ' Retournera "toto"

<?php
$sString = ' toto ';
echo trim ($sString); // affichera 'toto' sans les espaces
?>

string chaine = " toto ";

chaine = chaine.Trim();

Dim MaString As String 
MaString = "  toto  "
' Retirer les espaces à droite
RTrim(MaString) ' Retournera "  toto"
' Retirer les espaces à gauche
LTrim(MaString) ' Retournera "toto  "
' Retirer les espaces à droite et à gauche
Trim(MaString)  ' Retournera "toto"

<cfset MaString = "  toto  ">
<cfoutpout>
<!---Retirer les espaces à droite--->
#RTrim(MaString)# <!--- Retournera "  toto"--->
<!---Retirer les espaces à gauche--->
#LTrim(MaString)# <!--- Retournera "toto  "--->
<!---Retirer les espaces à droite et à gauche--->
#Trim(MaString)#<!---Retournera "toto"--->
<cfoutpout>

-- Permet de supprimer les espaces vides avant et après un champs
SELECT 
  RTRIM(LTRIM(LeChampsDeLaTable))
FROM 
  LaTable;

Dim MaString
MaString = "  toto  "
RTrim(MaString)
' Retournera "  toto"

LTrim(MaString)
' Retournera "toto  "

Trim(MaString)
' Retournera "toto"

MaString est une Chaine = " toto "
SansEspace(MaString) //Retournera "toto'

System.out.println("    aaa bbb    ccc     ".trim());

// Unité à utiliser  
uses SysUtils ;
// Déclaration
var
  MaChaine : String ;
  Resultat : String ;
  
// Utilisation
  MaChaine := ' Ceci est un test ' ;
  Resultat := TrimLeft  ( MaChaine ) ; //  Resultat contient 'Ceci est un test ' 
  Resultat := TrimRight ( MaChaine ) ; //  Resultat contient ' Ceci est un test' 
  Resultat := Trim      ( MaChaine ) ; //  Resultat contient 'Ceci est un test'  

print " toto   ".strip()
print " toto   ".lstrip()
print " toto   ".rstrip()
   

'
' supprimerEspace permet de supprimer les espaces (tab comprises) au début et à la fin d'une chaine
' Paremetre chaine
'   La chaine de texte dont on souhaite supprimer les espaces
'
Function supprimerEspaces(chaine)
    Set debut = New RegExp
    debut.Pattern = "^\s*"
    debut.Global = True
    Set fin = New RegExp
    fin.Pattern = "\s*$"
    fin.Global = True
    supprimerEspaces = fin.Replace(debut.Replace(chaine, ""), "")
End Function

set s "    aaa bbb    ccc     "
set s [string trim $s " "]