function.jsp

Java 实现代码后台管理功能的 script语言

<%
/*
'┌──────────────────── 深度空间 深度学习 ──┐
'│函数名：Advert
'│作  用：广告显示
'│参  数：ADType 广告类型
'│返回值：
'│日  期：2006/4/8
'└──────────────────── www.DeepTeach.com ──┘
*/
String Advert (ADType)
{
Statement stmtAdvert=conn.createStatement(ResultSet.TYPE_SCROLL_SENSITIVE,ResultSet.CONCUR_UPDATABLE);
String SQLAdvert = "SELECT * FROM tAdvert WHERE fIsView=true and fADType='" + ADType +"'";
ResultSet RsAdvert=stmtAdverte.executeQuery(SQLAdvert); 
	while (RsFriendSite.next())
	 { %>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
	<TR>
		<TD>
			<%=RsAdvert.getString("fADCode")%>
		</TD>
	</TR>
	<%
	}%>
</TABLE>
<% 
}

RsAdvert.close(); //关闭记录集对象
stmtAdvert.close(); //关闭语句对象
}

/*
┌──────────────────── 深度空间 深度学习 ──┐
│函数名：OnlineCount
│作  用：在线人数统计
│参  数：
│返回值：
│日  期：2006/7/18
└──────────────────── www.DeepTeach.com ──┘
*/
String OnlineCount ()
{
	t=(cint(day(date()))*24+cint(hour(time())))*60+cint(minute(time())) 
	k=0 
	i=1 
	y=0 
	Do While application("OnlineIP"&i)<>"" 
		if application("OnlineIP"&i)=Request.ServerVariables("REMOTE_ADDR") then 
			application("OnlineData"&i)=t 
			y=1 
		end if 
		if t-application("OnlineData"&i)>9 or t<application("OnlineData"&i) then 
			k=k+1 
		else 
			if k>0 then 
				application.lock 
				application("OnlineIP"&i-k)=application("OnlineIP"&i) 
				application("OnlineData"&i-k)=application("OnlineData"&i) 
				application.unlock 
			end if 
		end if 
		if k>0 then 
			application.lock 
			application("OnlineIP"&i)="" 
			application.unlock 
		end if 
		i=i+1 
	loop 
	if y=0 then 
		application("OnlineIP"&i)=Request.ServerVariables("REMOTE_ADDR") 
		application("OnlineData"&i)=t 
	else 
		i=i-1 
	end if 
	Response.Write(i)
}
%>