<% '建立数据源连接 dim newstype dim typename newstype="JYXW" select case newstype case "JTYW" typename="集团要闻" case "KJDT" typename="科技动态" case "JYXW" typename="教育新闻" case "DCXX" typename="地产信息" case "MTJJ" typename="媒体聚焦" end select '**************************** '函数名:ShowData '参数:newstype;新闻类型 '时间:2002-11-06 '作者:张鹏 '说明:每种类型新闻显示30条,按时间降序排列 '**************************** private sub ShowData(newstype) 'dim cnn dim rstnews dim intID dim strSQL call getconnection '获得数据库连接 Set rstNews = Server.CreateObject("ADODB.Recordset") '使用 Open 方法打开记录集 '并使用通过 Connection 对象建立的连接。 strSQL = "SELECT * FROM tblNews where type='"& trim(newstype) &"' order by adddate DESC" rstNews.Open strSQL, cnn,3,1 dim i 'Response.Write("RS="&rstnews.RecordCount) i=12-rstnews.RecordCount dim j j=1 'Do Until rstNews.EOF for j=1 to 8 if rstNews.EOF =true then exit for intID=rstNews.Fields("ID") Response.Write("") Response.Write(" ") Response.Write("
") Response.Write(" ") Response.Write(" ") Response.Write(trim(rstNews.Fields("title"))) Response.Write("   " ) Response.Write(trim(rstNews.Fields("adddate"))) if trim(rstNews.Fields("Isnew"))="Y" then Response.Write("   " ) Response.Write("" ) end if Response.Write("") Response.Write("") Response.Write("") Response.Write(" ") Response.Write(" ") Response.Write("") rstNews.MoveNext 'Loop next 'Response.Write("i="&i) if i>0 then for j=1 to i Response.Write("") Response.Write(" ") Response.Write("
") Response.Write(" ") Response.Write(" ") Response.Write("") Response.Write("") Response.Write("") Response.Write(" ") Response.Write(" ") Response.Write("") next end if rstnews.Close set rstnews=nothing call putconnection'断开数据库连接 end sub %> 开元教育欢迎您!
网站地图│员工专区│Englishjj
 教育首页走进阳光阳光新闻名师专家菁菁校园招生信息网上报名阳光信箱联系我们



2003年招生类别及人数:
  1、初一年级新生160人;
  2、高一年级160人(含30名特困优秀免费生);
  3、高考补习班90人;
  4、初二、初三年级招收少量优秀插班生。
招生条件及录取办法:
  1、凡品行端正,基础厚实,身体健康的学生均可报名,户口不限。经考查合格后方可录取;
  2、限额招收,择优录取,额满为止。
报名办法:
  1、初一年级报名时,请携带学生本人一寸照片两张;
  2、高一年级报名时,需持准考证和中考成绩单。

高一年级特困优秀免费生报名条件:
  1、家庭贫困,勤奋学习,追求上进,品学兼优
  2、中考成绩达到西安当地重点中学分数线的初中应届毕业生
  3、全国学科竞赛获奖者或陕西赛区一、二等奖者优先。

报名时间:即日起开始报名,节假日不休息。
报名地点:西安交大阳光中学行政楼一楼招生办公室
咨询电话:(029)82625549 82625551 85519003 85519005
学校地址:东二环与南二环交界处东阳光小区内
乘车路线:19、308、 528、 702、705、607路阳光小区下
228、208路政法干校下

©2003 版权所有:西安交通大学开元集团