或者用其他方法,声明一下,我的网站以前被人入侵过,不过现在应该干净了。
客户端一般是javascript验证我一般用Javascript提交表单,屏蔽Javascript就无法提交表单,不屏蔽就执行验证。
如
<html>
<head>
<title>登陆验证</title>
<script language="javascript">
//客户端验证代码(提交按钮的onClick事件中写)
function Page_Submit()
{
//验证过程代码
if(this.UsName.value=="")
{
alert('用户名不能为空');
return false;
}
if(this.UsName.value.length>6)
{
alert('用户名最多6个字符');
return false;
}
if(this.UsPwd.value=="")
{
alert('密码不能为空');
return false;
}
//通过验证后将信息传递给隐藏表单,提交隐藏表单到服务器端
document.HideForm.UserName.value=this.UsName.value;
document.HideForm.UsPwd.value=this.UsPwd.value;
document.HideForm.IsSubmit.value="True";
document.HideForm.submit();//提交表单的JavaScript的写法。
}
//页面载入事件代码(网页加载时执行)
function Page_Load()
{
//这里看似是一个客户端函数
//其实这里是一个服务器端函数
//该函数的逻辑代码在服务器端执行
<%
'服务器端的验证代码
Dim ReFalse
ReFalse="F"
IF Request.Form("IsSubmit")="True" Then
IF Request.Form("UsName")="" Then
Response.Write "alert('用户名不能为空');"
ReFalse="T"
End IF
IF ReFalse<>"T" Then
IF Len(Request.Form("UsName"))>6 Then
Response.Write "alert('用户名最多6个字符');"
ReFalse="T"
End IF
End IF
IF ReFalse<>"T" Then
IF Request.Form("UsPwd")="" Then
Response.Write "alert('密码不能为空');"
ReFalse="T"
End IF
End IF
IF ReFalse<>"T" Then
'通不过上面的验证是不会执行操作代码的。
'这里省略验证通过后的操作代码。
End IF
End IF
%>
}
</script>
</head>
<!--Page_Load()函数的作用是将服务器端的验证结果显示在客户端。-->
<!--无数据提交时客户端的Page_Load()函数无任何语句体空函数。-->
<body onLoad="Page_Load();" >
用户名<input name="UsName" type="text" >
密 码<input name="UsPwd" type="Password" >
<input type="button" value="登陆" onClick="Page_Submit();" >
<!--隐藏表单,真正提交数据的表单,网页上其他地方无表单-->
<form name="HideForm" action="LoginVerify.asp" method="post" >
<input name="UserName" type="hidden">
<input name="UsPwd" type="hidden" >
<input name="IsSubmit" type="hidden" >
</form>
</body>
</html>
将网页保存为LoginVerify.asp进行测试。
[此贴子已经被作者于2007-3-4 0:08:41编辑过]
我的判断代码是这样的,大家看看有什么漏洞不????先谢过了。
<%if session("U_id")="" and session("C_id")="" then
response.write("<script>alert('对不起,您还没有登陆!');location.href='login1.asp';</script>")
%>
<%else%>
<%
if session("leixing")=0 then
set rs1=server.createobject("adodb.recordset")
sql1="select U_id,User_his,W_id,W_point from User_com where U_id='"&session("U_id")&"' and W_id='"&id&"'"
rs1.open sql1,conn,1,3
if rs1("User_his")<rs1("W_point") then
response.write("<script>alert('您的余额不足,请充值!');location.href='about/member.asp';</script>")
response.End
else
rs1("User_his")=rs1("User_his")-rs1("W_point")
rs1.update
rs1.close
set rs1=nothing
end if
else if session("leixing")=1 then
set rs2=server.createobject("adodb.recordset")
sql2="select C_id,Company_glodhis,W_id,W_point from Com_work where C_id='"&session("C_id")&"' and W_id='"&id&"'"
rs2.open sql2,conn,1,3
if rs2("Company_glodhis")<rs2("W_point") then
response.write("<script>alert('您的素材余额不足,请充值!');location.href='about/member0.asp';</script>")
response.End
else
rs2("Company_glodhis")=rs2("Company_glodhis")-rs2("W_point")
rs2.update
rs2.close
set rs2=nothing
end if
end if
end if
%>
<%end if%>