asp 关于两个条件,两个执行语句!!!!!!!

来源:百度知道 编辑:UC知道 时间:2024/06/27 23:09:20
If CheckUserLogined() = False Then
Call CloseConn
Response.Redirect "User_Login.asp"
End If

Call GetUser(UserName)

ChannelID=PE_Clng(Trim(Request("ChannelID")))

__上面是作为参考______________________________________________

怎么写如果用户没有登陆 就执行下面的一段程序--搜索等待5秒--------------

If DateDiff("s", PrevSearchTime, Now) < 5 Then
Response.Write "<br><br><br><p align='center'>为了避免恶意搜索而消耗大量系统资源,请您在 " & 5 & " 秒后

再刷新本页!</p>"
Response.Write "<meta http-equiv=""refresh"" content=""5"">" & VbCrLf
Response.End
End If

如果用户登陆了 就执行下面的一段程序----------------

If DateDiff("s", PrevSearchTime, Now) < 10 Then
Response.Write "<br><br><br><p align='center'>为了避免恶意搜索而消耗大量系统资源

If CheckUserLogined() = False Then
If DateDiff("s", PrevSearchTime, Now) < 5 Then
Response.Write "<br><br><br><p align='center'>为了避免恶意搜索而消耗大量系统资源,请您在 " & 5 & " 秒后

再刷新本页!</p>"
Response.Write "<meta http-equiv=""refresh"" content=""5"">" & VbCrLf
Response.End
else
If DateDiff("s", PrevSearchTime, Now) < 10 Then
Response.Write "<br><br><br><p align='center'>为了避免恶意搜索而消耗大量系统资源,请您在 " & 10 & " 秒后

再刷新本页!</p>"
Response.Write "<meta http-equiv=""refresh"" content=""10"">" & VbCrLf
Response.End
end if

用Session判断