Implementar função para limpar html em asp

Este artigo compartilha com vocês a função de limpar HTML em asp. É muito prático. Amigos necessitados podem consultá-lo.

Esta função é necessária. Muitos hackers causam problemas e hackeiam o banco de dados, o que injetará muitos vírus js. Ao armazenar e exibir dados de texto, use esta função para filtrá-los e evitar muitos problemas.

código clarohtml

1. 'Limpar código HTML
2. funçãoclearhtml(conteúdo)
3. content=replacehtml(&#[^>]*;,,conteúdo)
4. content=replacehtml(</?marquee[^>]*>,,conteúdo)
5. content=replacehtml(</?object[^>]*>,,conteúdo)
6. content=replacehtml(</?param[^>]*>,,conteúdo)
7. content=replacehtml(</?embed[^>]*>,,conteúdo)
8. content=replacehtml(</?table[^>]*>,,conteúdo)
9. conteúdo=substituirhtml(,,conteúdo)
10. content=replacehtml(</?tr[^>]*>,,conteúdo)
11. content=replacehtml(</?th[^>]*>,,conteúdo)
12. content=replacehtml(</?p[^>]*>,,conteúdo)
13. content=replacehtml(</?a[^>]*>,,conteúdo)
14. content=replacehtml(</?img[^>]*>,,conteúdo)
15. content=replacehtml(</?tbody[^>]*>,,conteúdo)
16. content=replacehtml(</?li[^>]*>,,conteúdo)
17. content=replacehtml(</?span[^>]*>,,conteúdo)
18. content=replacehtml(</?div[^>]*>,,conteúdo)
19. content=replacehtml(</?th[^>]*>,,conteúdo)
20. content=replacehtml(</?td[^>]*>,,conteúdo)
21. content=replacehtml(</?script[^>]*>,,conteúdo)
22. content=replacehtml((javascript|jscript|vbscript|vbs):,,conteúdo)
23. content=replacehtml(on(mouse|exit|error|click|key),,content)
24. content=replacehtml(<//?xml[^>]*>,,conteúdo)
25. content=replacehtml(<//?[az]+:[^>]*>,,conteúdo)
26. content=replacehtml(</?font[^>]*>,,conteúdo)
27. content=replacehtml(</?h[^>]*>,,conteúdo)
28. content=replacehtml(</?u[^>]*>,,conteúdo)
29. content=replacehtml(</?i[^>]*>,,conteúdo)
30. content=replacehtml(</?center[^>]*>,,conteúdo)
31. content=replacehtml(</?center[^>]*>,,conteúdo)
32. content=replacehtml(</?nobr[^>]*>,,conteúdo)
33. content=replacehtml(</?clk[^>]*>,,conteúdo)
34. content=replacehtml(</?muti[^>]*>,,conteúdo)
35. content=replacehtml(</?/option[^>]*>,,conteúdo)
36. content=replacehtml(</?o[^>]*>,,conteúdo)
37. content=replacehtml(</?strong[^>]*>,,conteúdo)
38. clearhtml=conteúdo
39. função final