| Ce qui suit est le fragment de code: <% '=====================================================. «Décodage de la chaîne pour HTML, remplacez le serveur.htmlencode 'Retirez le format HTML pour la sortie d'affichage '=====================================================. Fonction outhtml (str) Tige tamisée Tige = str outhtml = "" " Si isNull (étape) = true alors Fonction de sortie Terminer si STEMP = remplacer (étape, "&", "& amp;") STEMP = remplacer (STEMP, "<", "" & lt; ") STEMP = remplacer (étape, ">", "& gt;") STEMP = remplacer (STEMP, Chr (34), "& quot;") étape = remplacer (étape, chr (10), "<br>") outhtml = STEMP Fonction finale '=====================================================. 'Retirez le format HTML et utilisez-le pour remplir la zone d'entrée de la base de données 'Remarque: Value = "?" '=====================================================. Fonction inhtml (str) Tige tamisée Tige = str inhtml = "" Si isNull (étape) = true alors Fonction de sortie Terminer si STEMP = remplacer (étape, "&", "& amp;") STEMP = remplacer (STEMP, "<", "" & lt; ") STEMP = remplacer (étape, ">", "& gt;") STEMP = remplacer (STEMP, Chr (34), "& quot;") inhtml = tige Fonction finale %> |