J'ai le traitement d'un champ de type memo qui me pose probléme.
Ce champ contient du texte entré des utilisateur (via un form) et je souhaiterais afficher ce champ aprés traitement pour l'affichage html
Ma fonction est la suivante :
function TxtToHtml (chaine)
Dim i
For i = 1 to len(chaine)
char=mid(chaine,i,1)
Select Case char
Case "<"
nchar="<"
Case ">"
nchar=">"
Case else
nchar=char
end Select
modif = modif & nchar
Next
TxtToHtml=modif
End Function
et il me plante avec l'erreur suivante:
Erreur d'exécution Microsoft VBScript (0x800A005E)
Utilisation non autorisée de Null
a la ligne de "For i = 1 to len(chaine)"
la fonction a l'aire de fonctionner normalement pour des champs de type texte
merci d'avance