hzhost防asp攻击函数
hzhost防asp攻击函数
Function SafeRequest(ParaName)
Dim ParaValue
ParaValue=Request(ParaName)
if IsNumeric(ParaValue) then
SafeRequest=ParaValue
exit Function
else
ParaValuetemp=lcase(ParaValue)
tempvalue="select
|insert |delete from|'|count(|drop table|update |truncate
|asc(|mid(|char(|xp_cmdshell|exec master|net localgroup
administrators|net user| or | and |%20from"
temps=split(tempvalue,"|")
for mycount=0 to ubound(temps)
if Instr(ParaValuetemp,temps(mycount)) > 0 then
call errorpage(-2,"非法请求！！！")
response.end
end if
next
SafeRequest=ParaValue
end if
End function
'=================
相关文档：
ActiveConnection 设置或返回Command对象的连接信息，该属性可以是一个Connection对象或连接字符串。
CommandText 设置或返回对数据源的命令串，这个串可以是SQL语句、表、储存过程或数据提供者支持的任 何特殊有效的命令文本。
Prepared 提出在调用Command对象的Execute方法时，是否将查询的编译结果储存下来。如果将� ......
1、<script>按钮：
<input type="button" name="btnRead" onClick="readCard()" style="background:url(images/qux1.gif); border:none; width:145px; height:30px;" />
2、提交按钮：
<input type="submit" name="button" id="button" style="background:url(images/tj.gif); bor ......
'--------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<script>
function checkAll(){
for (i=0;i<document.forms[1].length;i++){
if (document.forms[1][i].tagName= ......
<%
set rs=server.CreateObject(”ADODB.recordset”)
sql =”select * from 表”
rs.open sql,conn,1,1
page=cint(request(”page”))
n=rs.RecordCount
rs.pagesize=12
m=cint(rs.pagecount)
if page=”" then
page=1
elseif page<1 then
page=1
end if
if cint(r ......
1.在解决方案中添加新项目数据集-mydbDataSet.xsd，在数据集里添加所要用到的表或根据需要制作新表。
2.在设计页面中拉入一个MicrosoftReportViewer，设计新报表，按照报表向导根据自己的需要选择报表的数据源和数据项，完成新报表report1.rdlc的制作。在源码中如下（“考核成绩”为数据集中的一个表）
<rsw ......
