::按课程行为统计

(含课程专业论坛)

  ::学生平台活动统计

  ::论坛使用情况统计

::平台访问量统计

::课程访问时间排名

::学生平台访问时间排名

::上月班学生人均时间排名

::单用户学习时间查询

::退出

　

欢迎访问：仙居电大网站
<% dim ijiaowu ijiaowu=0 %> <% set rs_jiaowu=server.createobject("adodb.recordset") rs_jiaowu.open"select * from file_info_t where topicCode like '18%' order by Fileid desc",conn,1,3 do while not rs_jiaowu.eof%> <% dim jiaowu,jiaowu_title jiaowu=rs_jiaowu("Fileid") jiaowu_title=trim(rs_jiaowu("title")) %> <% ijiaowu=ijiaowu+1 if ijiaowu>=10 then exit do rs_jiaowu.movenext loop rs_jiaowu.close set rs_jiaowu=nothing %>
<% if len(trim(rs_jiaowu("title")))>12 then response.write left(trim(rs_jiaowu("title")),10)&"..." else response.write trim(rs_jiaowu("title"))&".." end if %> <% lriqi=rs_jiaowu("InputTime") Criqi = right(left(lriqi,8),7) Iriqi = int(Criqi)/864 riqi1 = cint(Iriqi) res = dateadd("d",riqi1,"09-sep-2001") response.Write("") response.Write(res) response.Write("") %>
　· 电大招生热线：87761556
　· 电大教学教务：87761557
　· 奥鹏学习中心：87761536
　· 招生详细信息：点击进入
搜索:
本站 搜索WWW  
访问量:
<% dim i22_lxy ,xriqi i22_lxy=0 xriqi = date() %> <% set rs_zhaoping=server.createobject("adodb.recordset") rs_zhaoping.open"select * from file_info_t where topicCode ='11' order by FileID desc",conn,1,3 do while not rs_zhaoping.eof%> <% i22_lxy=i22_lxy+1 if i22_lxy>=8 then exit do rs_zhaoping.movenext loop rs_zhaoping.close set rs_zhaoping=nothing %>
   <% dim lxy,gg_title lxy=rs_zhaoping("FileID") gg_title=trim(rs_zhaoping("title")) %> <% if len(trim(rs_zhaoping("title")))>20 then response.write left(trim(rs_zhaoping("title")),20)&"..." else response.write trim(rs_zhaoping("title"))&"..." end if %> <% lriqi=rs_zhaoping("InputTime") Criqi = right(left(lriqi,8),7) Iriqi = int(Criqi)/864 riqi1 = cint(Iriqi) res = dateadd("d",riqi1,"09-sep-2001") response.Write("") response.Write(res) response.Write("") %>
<% dim num_gx ,xriqi_gx num_gx=0 xriqi_gx = date() %> <% set gx_zhaoping=server.createobject("adodb.recordset") gx_zhaoping.open"select * from file_info_t where topicCode like '1K' order by FileID desc",conn,1,3 do while not gx_zhaoping.eof%> <% num_gx=num_gx+1 if num_gx>=5 then exit do gx_zhaoping.movenext loop gx_zhaoping.close set gx_zhaoping=nothing %>
   <% dim lxy_gx,gx_title lxy_gx=gx_zhaoping("FileID") gx_title=trim(gx_zhaoping("title")) %> <% if len(trim(gx_zhaoping("title")))>12 then response.write left(trim(gx_zhaoping("title")),12)&"..." else response.write trim(gx_zhaoping("title"))&"..." end if %> <% lriqi_1=gx_zhaoping("InputTime") Criqi_1 = right(left(lriqi_1,8),7) Iriqi_1 = int(Criqi_1)/864 riqi1_1 = cint(Iriqi_1) res1 = dateadd("d",riqi1_1,"09-sep-2001") response.Write("") response.Write(res1) response.Write("") %>
　·校长信箱 ·成绩查询
　·邮件系统 ·学习统计
　·联系渠道 ·FTP 服务
　·校内短信群发系统