logout.asp

来自「一个小小的固定资产程序」· ASP 代码 · 共 25 行

<!--#INCLUDE FILE="connection.asp" -->

<%
Set my_rs= Server.CreateObject("ADODB.Recordset") 
	strSql="select * from user where 用户名='"&Session("Uname")&"'"
	my_rs.open strSql,Conn,3,3 
	
		my_rs("状态")=false
		my_rs("Utime")=my_rs("Utime")-4
		my_rs.update
        my_rs.close
		set my_rs=nothing
		conn.close
		set conn=nothing
		Session("Uid")=""
		Session("Uname")=""
		Session("Upass")=""
		Session("Upart")=""
		Session("Urule")=""
		Session("Ulogin")="no"

%>
<script>
top.location.href="index.htm"
</script>