<% Dim CountWeb CountWeb = Request.ServerVariables("SCRIPT_NAME") Application.Lock Application(CountWeb) = Application(CountWeb) + 1 Application.UnLock %> 欢迎您! 您是第[ <%= Application(CountWeb)%> ]位光临本校网站的客人。

点击进入