『壹』 ASP特殊字符过滤
Function ChkInvaildWord(Words)
Const InvaildWords=\"select|update|delete|insert|@|--|,\" \'\'需要过滤得字符以“|”隔开,最后结束的字符必须是|
ChkInvaildWord=True
InvaildWord=Split(InvaildWords,\"|\")
inWords=LCase(Trim(Words))
For i=LBound(InvaildWord) To UBound(InvaildWord)
If Instr(inWords,InvaildWord(i))>0 Then
ChkInvaildWord=True
Exit Function
End If
Next
ChkInvaildWord=False
End Function
你所得到的只是一个加ChkInvaildWord事件的代码
看你怎么去用了
例如 你现在接受了一个STR的值
那么就直接 ChkInvaildWord(STR)
如果STR中间有特殊字符 那么你就得到了FALSE
如果没有 那么你就得到TRUE
一般都都会在前面加上IF判断。。
然后输出 错误
完整的就如1楼的
『贰』 关于ASP过滤空格换行
replace(内容," ", "")
『叁』 asp中如何过滤掉特殊字符
user=replace(trim(request.form("uName")),"'","''")
password=replace(trim(request.form("Password")),"'","''")
if instr(user,"%") or instr(user,"#") or instr(user,"?") or instr(user,"|") or instr(user,"'") then
response.write "<script language=javascript>alert('您的姓名含有非法字符!');this.location.href='login.asp';</script>"
response.end
end if
if instr(password,"%") or instr(password,"#") or instr(password,"?") or instr(password,"|") then
response.write "<script language=javascript>alert('您的密码含有非法字符!');this.location.href='login.asp';</script>"
response.end
end if 我自己做的,希望对你有帮助
『肆』 asp怎么样去掉调用数据中的回车换行
16:54修改
-----------------------
<%Function FormatHTML(fString)
If fString<>"" Then
fString = trim(fString)
fString = replace(fString, ";", ";") '分号过滤
fString = replace(fString, "--", "--") '--过滤
fString = replace(fString, "%20", "") '特殊字符过滤
fString = replace(fString, "==", "") '==过滤
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """")
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), " ") '---------这行 改了
fString = Replace(fString, CHR(10), "") '---------这行 也改了
FormatHTML = fString
End If
End Function %>
然后调用的时候
<%=FormatHTML(rs("inc_text"))%>
『伍』 ASP字符过滤。
username=trim(request.form("username"))
'定义一个数组
badCode="<,%,@,upload"
'分割数据
badCode=split(badCode,",")
'从第一个循环到最后一个
for i = 0 to ubound(badCode)
username=replace(username,badCode(i),"") '把这专些字符替换属为空
next
『陆』 请问怎么过滤掉ASP留言本里的空格/回车
原因:
没有进行HTML转换,比如<br>  等字符就被直接读取而非解析。
解决方法:
在留言读取页面上加上这个函数。
<%
function HTMLEncode(fString)
if not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = replace(fString, """", """)
fString = Replace(fString, CHR(32), "")
fString = Replace(fString, CHR(9), "")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
fString = Replace(fString, CHR(10), "<BR>")
fString=ChkBadWords(fString)
HTMLEncode = fString
end if
end function
%>
然后原来的比如说a=rs.b
就要改成a=HTMLEncode(rs.b),这个时候原来<br>就被解析成回车了。
『柒』 ASP里的回车与换行
1、ASP里的回车与换行是chr(13)&chr(10),或者&vbcrlf。
2、chr(13)&chr(10)、&vbcrlf换行指的是源文件中代码的换行,并不是浏览器显示的换行效果。
3、浏览器中显示的换行是需要在html代码中用<br>。
例子:
<%
Response.write "1、我在源文件中" & chr(13)&chr(10) & "才能换行,浏览器显示在一行"
Response.write "2、<br>我在浏览器中<br>换行了,在源代码中是一行"
%>
浏览器显示效果:
『捌』 asp去除所有样式包括空格html标签回车符等,只显示content里面内容的前100个字,要真正能用的
<%
Function RemoveHTML( strText )
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
End Function
response.Write left(RemoveHTML(rs("content")),100)&"..." %>
『玖』 asp如何替换记事本中的换行符为回车符 急!在线等
如果读取文本没问题,那么读取到记事本里面的所有内容后,使用replace,如:
content=replace(content,vbcrlf,"<br />")
vbCrlf则回车换行符号。
『拾』 asp中输出字段去除回车字符
replace(string,chr(13),"")