Question

asp 提示用户过期的代码，那位懂asp的说一下，如果能使用，有加分哦。

数据库中有一个表user，其中有一个字段是time是用户注册的时间，然后有一个字段是untime是用户过期的时间，我需要一段代码，在用户登录时如果时间已经超过表中的过期时间，那么提示用户用户名已过期。提供一段其中判断用户不存在的代码，方便了解
sSQL = "Select Count(*) As CountUser From user Where username='" & username & "'"
Set oRs = Cnn.Execute(sSQL)
If Not (oRs.EOF And oRs.BOF) Then
If Not IsNull(oRs("CountUser")) Then
If CLng(oRs("CountUser")) = 0 Then
Response.Write("<script>alert('会员帐号不存在，请确认。');window.location.href='asso.asp';</script>")
Response.End()
End If
End If
End If
oRs.Close

Answer 1

这个写法很不好，容易被sql注入，
例如如果在username写成 ' or 1=1 or 'a'<>'b

这个sql就成了 Select Count(*) As CountUser From user Where username='' or 1=1 or 'a'<>'b'
无论如何都是有记录了，呵呵。

而且，原来的程序没有判断密码，也就是只要用户名正确就能登陆

我修改了一下，拷贝到你的程序编辑器中，段落很清楚。这里被折行了，看着很乱。

sSQL = "Select * From [user] Where username='" & username & "'"
Set oRs = Cnn.Execute(sSQL)
if not oRs.EOF then '有记录,说明有本会员名字
if oRs("password")=userPassword then '这里的字段oRs("password")和变量userPassword要替换成你的程序中的名字
if oRs("untime")<now() then '判断登陆时间是否过期
Response.Write("<script>alert('会员已经过期，请确认。');window.location.href='asso.asp';</script>") '这里要把asso.asp换成你的登陆页面
Response.End()
end if
'用户和密码验证成功，登陆后的动作代码写到这里

else
Response.Write("<script>alert('会员密码不正确，请确认。');window.location.href='asso.asp';</script>") '这里要把asso.asp换成你的登陆页面
Response.End()

end if

else '没有会员账号
Response.Write("<script>alert('会员帐号不存在，请确认。');window.location.href='asso.asp';</script>") '这里要把asso.asp换成你的登陆页面
Response.End()
end if

oRs.Close
set oRs=Nothing