UC知道能否找到应用于html中表格和表单使用的源代码
来源：百度知道 编辑：UC知道 时间：2024/06/14 23:21:15
越漂亮越好，最好是个人简介什么的，并且就只是单纯的html，不要css和javascript
Function FormatText(String) '''替换空格，尖括号，回车。可防html。
String=Server.HTMLEncode(String)
'String=Replace(String,"<","〈")
'String=Replace(String,">","〉")
String=Replace(String,CHR(32)," ")
String=Replace(String,CHR(13)&CHR(10), "<br>")
FormatText=String
End Function
Function FormatCode(String) '''完全原样，可防html，可用作显示源代码。
String="<xmp>"&String&"</xmp>"
FormatCode=String
End Function
Function FormatHTML(String) '''限制无法
使用on.....事件，无法使用JavaScript。
String=Replace(String,"onmouseover","0nmouseover",1,-1,vbTextCompare)
String=Replace(String,"onmouseout","0nmouseout",1,-1,vbTextCompare)
String=Replace(String,"onmousedown