L'analyse du code de fonction ASP pour supprimer le HTML est jointe à des exemples. Elle a été testée par la programmation Script Home et est en effet facile à utiliser.
Le code suivant ne remplacera pas le < au milieu de ld<sad, le contenu est donc toujours normal.
Le code est le suivant :
<%
fonction nohtml(str)
faible ré
Définir re=new RegExp
re.IgnoreCase = vrai
re.Global=Vrai
re.Pattern=(/<.[^/<]*/>)
str=re.replace(str, )
re.Pattern=(/<//[^/<]*/>)
str=re.replace(str, )
str=remplacer(str, ,)
str=remplacer(str, ,)
nohtml=str
définir re = rien
fonction de fin
str=<title>sadjksjdl script home vous souhaite la bienvenue sajdljsald<sadsadsad<br> 'Ceci est un test
réponse.write nohtml(str)
%>
Le résultat est :
Le code est le suivant :
sadjksjdl script home vous souhaite la bienvenue sajdljsald<sadsadsad
Cependant, le code suivant ne demande pas. Il suffit de voir < et d'oublier la correspondance illimitée qui se cache derrière.
Le code est le suivant :
<%
Fonction dropHtml(Byval strHTML)
Dim objRegExp, Correspondance, Correspondances
Définir objRegExp = Nouvelle expression rationnelle
objRegExp.IgnoreCase = True
objRegExp.Global = Vrai
'Obtenez le <> fermé
objRegExp.Pattern = <.+?>
'Correspondre
Définir les correspondances = objRegExp.Execute(strHTML)
'Parcourir l'ensemble correspondant et remplacer les éléments correspondants
Pour chaque match dans les matchs
strHtml=Remplacer(strHTML,Match.Value,)
Suivant
dropHtml=strHTML
Définir objRegExp = Rien
Fonction de fin
str=<title>sadjksjdl script home vous souhaite la bienvenue sajdljsald<sadsadsad<br> 'Ceci est un test
réponse.write dropHtml(str)
%>
Le résultat est :
Le code est le suivant :
sadjksjdl script home vous souhaite la bienvenue sajdljsald