<% option explicit %> <% dim strFileName,FileName const MaxPerPage=20 dim totalPut,CurrentPage,TotalPages dim i,j dim keyword,strField dim rsArticleList,sql,sqlPath,rsPath dim ClassID dim tClass,ClassName,RootID,ParentID,Depth,ParentPath,Child,ChildID,tID,tChild,ClassMaster dim founderr dim strPath,strPageTitle,PageTitle ClassID=Trim(request("ClassID")) ClassID=CLng(ClassID) if ClassID>0 then sql="select ClassName,RootID,ParentID,Depth,ParentPath,Child From ArticleClass where ClassID="& ClassID set tClass=conn.execute(sql) if tClass.bof and tClass.eof then FoundErr=True ErrMsg=ErrMsg & "
  • 找不到指定的栏目
  • " end if end if if FoundErr=True then Call WriteErrMsg() response.end end if '================================================= '过程名:ShowBigClassArticle '作 用:显示大类别最新文章,文章标题前面带【类别名称】 '参 数:ArticleNum ----最多显示多少篇文章 ' TitleLen ----标题最多字符数,一个汉字=两个英文字符 ' ClassID -----大类的ID 'ArticleNum,ClassID都已固定 '================================================= sub ShowBigClassArticle(ArticleNum,TitleLen,ClassID) dim sql,rsBCA ClassID=80 '学校介绍 - 公立学校类 set tClass=conn.execute("select ClassName,RootID,ParentID,Depth,ParentPath,Child,ClassMaster From ArticleClass where ClassID=" & ClassID) if tClass.bof and tClass.eof then founderr=True ErrMsg=ErrMsg & "
  • 找不到指定的栏目
  • " Call WriteErrMsg() response.end else Child=tClass("Child") sql="select A.ArticleID,A.ClassID,C.ClassName,A.Title,A.Keywords,A.Author,A.CopyFrom,year(A.updateTime) as UpdateYear,month(A.UpdateTime) as UpdateMonth,day(A.UpdateTime) as UpdateDay,A.UpdateTime,A.Editor," sql=sql & "A.Hits,A.OnTop,A.Hot,A.Elite,A.Passed,A.IncludePic from Article A" sql=sql & " inner join ArticleClass C on A.ClassID=C.ClassID where A.Deleted=0 and A.Passed=1" if ClassID>0 then if Child>0 then ChildID="" set tClass=conn.execute("select ClassID from ArticleClass where ParentID=" & ClassID & " or ParentPath like '" & ParentPath & "," & ClassID & ",%'") do while not tClass.eof if ChildID="" then ChildID=tClass(0) else ChildID=ChildID & "," & tClass(0) end if tClass.movenext loop sql=sql & " and A.ClassID in (" & ChildID & ")" else sql=sql & " and A.ClassID=" & ClassID end if end if end if sql=sql& "order by A.ArticleID desc" ' sql=sql&"order by A.UpdateTime desc" Set rsBCA= Server.CreateObject("ADODB.Recordset") rsBCA.open sql,conn,1,1 ' if TitleLen<0 or TitleLen>255 then TitleLen=50 TitleLen=256 if rsBCA.bof and rsBCA.eof then response.write "
  • 无该类别文章
  • " else dim v_count,v_result '单元格计数 v_count=1 do while not rsBCA.eof dim Tdate,Sdate Tdate=rsBCA("UpdateYear")&"-" Tdate=Tdate& rsBCA("UpdateMonth")&"-" Tdate=Tdate& rsBCA("UpdateDay") If CDate(Tdate)=date() Then Sdate=""& Tdate&"" else Sdate=Tdate end if v_result = v_count mod 3 '一行三个单元格 select case v_result case 1 response.Write("["& rsBCA("ClassName") &"] " & gotTopic(rsBCA("title"),TitleLen) & "") case 2 response.Write("["& rsBCA("ClassName") &"] " & gotTopic(rsBCA("title"),TitleLen) & "") case 0 response.Write("["& rsBCA("ClassName") &"] " & gotTopic(rsBCA("title"),TitleLen) & "") end select v_count=v_count+1 rsBCA.movenext loop end if rsBCA.close set rsBCA=nothing end sub %> 宁波教科网

        宁波效实中学
        李惠利中学
        镇海中学
        洪塘中学
        李兴贵中学
        庄桥中学
        镇明中心小学
        宁波广济中心小学
        宁波市江北区中心小学


    宁波效实中学

        创建于1912年的宁波效实中学,原系浙江省著名私立中学。1956年改为公立,更名为“宁波五中”,1980年复称“效实”。解放后先后被列为省重点中学、省首批重点中学、省首批一级重点中学;1999年被批准为举办“浙江省创新教育理科实验班”的全省二所试点中学之一,2000年被批准为教育部“现代教育技术实验学校”。建校九十年来,学校培养过包括童第周等13位两院院士在内的近三万名毕业生,受到过李政道博士“桃李满天下,成果布四海”的专函赞誉。

        长期以来,学校继承和发扬“爱国、科学”和“求适务实、与日俱进”的优良传统,确定了“坚持方针,遵循规律,打好基础,培育人才”的办学思想和“第一流,高质量,校风好,有特色,现代化”的奋斗目标,推崇“全面,基础,高质量,大面积”的教育准则和“起点高,要求严,基础厚,能力强,素质好,后劲足”的教学特色;教育学生树立“献身祖国,振兴中华”的远大理想和“热爱知识,遵循规律”的科学态度;积极倡导“奋发进取,探索创新”的钻研精神和“实事求是,讲求实效”的务实作风。效实毕业生考上重点大学多、研究生多、出国深造多。毕业会考及高考成绩一直居全省前列,各级各类竞赛成绩优异。近10年中,学校26次获得全国中学生数理化竞赛浙江赛区团体优胜奖,有10人获得全国高、初中数理竞赛省第一名,有5人入选国家数理集训队,1人获全国中学生物理竞赛决赛女同学第一名; 5人获得“全国宋庆龄奖学金”、“浙江省青少年英才奖”;2人直接保送入美国耶鲁大学;学校还获全国中小学生文艺汇演一等奖并被选调进京演出。学校先后与美、澳、日、新等国的知名中学建立了友好关系和师生互访。耶鲁大学校长Levin先生一行2001年访问了效实中学。近几年效实又有多名学子考入美国哈佛、耶鲁、斯坦福、哥伦比亚大学和英国剑桥大学、牛津大学等世界一流名校攻读本、硕、博。

        学校现有58个班级,2912名学生,238名教职工。有在职享受国务院特贴专家1名,省、市有突出贡献科技人员各1名,省功勋教师1名,省特级教师9名,省教坛新秀9名,市名教师8名。1999年秋季学校迁入易地重建的新址,教学设施不断完善。学校正努力向全国一流重点中学、现代化示范性窗口学校的目标前进。

        现任校长:王家祥 名誉校长:李庆坤

        校址:宁波市白杨街178号 网址:http://xiaoshi.nbedu.net.cn

        电话:0574-87148933 E-mail: nbxs02@nbxs.org

        传真:0574-87142973 邮编:315012

     

    <% call CloseConn() %>