走进职教

<% @language="vbscript" %> <% If Request.QueryString("CurPage") = "" then Curpage=1 Else Curpage=cint(Request.QueryString("CurPage")) End if sql="select * from masternews order by news_date desc " Set rs = Server.CreateObject("ADODB.Recordset") Set rsv = Server.CreateObject("ADODB.Recordset") rs.open sql,conn,3 rsv.open sql,conn,3 RS.PageSize=136 if CurPage>RS.Pagecount then CurPage=RS.Pagecount end if RS.AbsolutePage=CurPage %> <% 'Set MyPageCounter = Server.CreateObject("MSWC.PageCounter") %> <% response.buffer=true Response.Expires=0 '最新文章的时间 NewDate = NOW-7 CheckNewMessages = True '利用cookies对象从浏览器读取访问时间的有关信息 If Request.Cookies("news").HasKeys Then LastVisitDate = Request.Cookies("news")("LastVisit") '读取cookie对象Article中关键字为“lastvisit”的值 VisitMessage = VisitMessage & " 您上一次访问时间：" & LastVisitDate & "" Else VisitMessage = "欢迎您第一次访问《军事交通》网站！" CheckNewMessages = False End If 'response.Cookies("news").domain="www.hvacronline.com" '可以避免cookie值被其他服务器修改 Response.Cookies("news")("LastVisit") = Now '强制将cookies存储在硬盘上，并设置其失效时间 Response.Cookies("news").Expires = Date + 365 %> 走进职教 <% '显示页面的弹出窗口子程序 %> <% '对输入表单进行检查子程序 %>

首页>>教师广场>2006年职业学校美术教师技能比赛获奖作品

首页|论文评论|聊天室|留言板


窦荣军	高月	贺欣	刘春娣	马明娟

马明娟	马明娟	申黎红	申黎红	申黎红

王晴云	王晴云	王晴云	王艳	王艳

王悦	吴贵生	吴贵生	吴贵生	徐卉

姚金根	姚金根	姚金根	姚金根	姚金根

郑兰

请用IE5.0以上浏览器,1024*768分辨率,以获得本站的最佳浏览效果！
：webmaster ：025-4414131