请高手解释一下 下面的代码 谢谢

<script language="vbscript" runat="server">
sub Application_OnStart
Application("online") = 0
set Application("cn") = Server.CreateObject("ADODB.Connection")
Application("db") = Server.MapPath("admin/data/limu.mdb")
Application("cn").Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Application("db")
end sub

sub Application_OnStart
end sub

sub Session_OnStart
end sub

sub Session_OnEnd
if Session("logined")="yes" then
response.write(session("memberid"))
Application("cn").execute("update member set online_state = 0 where id = "&session("memberid"))
end if
end Sub
</script>

请高手解释一下 下面的代码 谢谢 请帮我解释一下下面的代码 请帮忙解释一下下面asp代码个部分的作用！ 请各位大狭帮我解释一下下面的ASP代码?? 请高手解释一下vb代码 请高手看看下面的代码： 请高手解释一下非常简单的PHP代码。 请高手帮忙解释一下这段代码的意思 请高手帮我解释一下这段代码的意思 帮我解释一下下面的代码!!!!!