防止别人插入iframe的代码


一个数据转换函数,在每个用户提交数据的地方使用该函数把用户调入的值强制转换一次即可。

Function CData(ByVal strWord, ByVal intType)
     On Error Resume Next
     Select Case intType
     Case 0
         CData = 0
         If IsNumeric(strWord) Then If strWord Then CData = 1
     Case 1
         CData = 0
         If IsNumeric(strWord) Then CData = CInt(CByte(strWord))
     Case 2
         CData = 0
         If IsNumeric(strWord) Then CData = CInt(strWord)
     Case 3
         CData = 0
         If IsNumeric(strWord) Then CData = CLng(strWord)
     Case 4
         CData = 0
         If IsNumeric(strWord) Then CData = CCur(strWord)
     Case 5
         CData = Now()
         If IsDate(strWord) Then CData = strWord
     Case 6
         CData = ""
         If strWord > "" Then CData = Replace(Replace(strWord, CHR(0), ""), "'", "''")
     Case 7
         If strWord > "" Then
             strWord = Replace(strWord, CHR(0), "")
             strWord = Replace(strWord, "'", "''")
             strWord = Replace(strWord, "[", "[[]")
             strWord = Replace(strWord, "%", "[%]")
             CData = Replace(strWord, "_", "[_]")
         Else
             CData = ""
         End If
     Case Else
         CData = ""
         If strWord > "" Then CData = CStr(strWord)
     End Select
     On Error Goto 0
End Function



相关阅读:
用css制作扑克牌(图)
asp.net下用js实现鼠标移至小图,自动显示相应大图
js获取元素在浏览器中的绝对位置
CSS Div 最小高度在IE 6 和IE 7中的兼容性问题
N年前的两个脚本%5c暴库
CSS语法缩写规则
Windows Vista系统休眠功能
“incorrect super block” FreeBSD挂载CDROM时报错误的解决方法
网页教案,针对初学者的教案
让OpenSoralis进入纯文本模式
通过按空格键开启Vista启动选项
PHP中用header图片地址 简单隐藏图片源地址
Linux操作系统启动流程与Grub的配置方法
图片的入库与读取的方法
快速导航

Copyright © 2016 phpStudy |