<% function cutstr(tempstr,tempwid) if len(tempstr)>tempwid then cutstr=left(tempstr,tempwid)&"..." else cutstr=tempstr end if end function %>
首页 新闻中心 学校概况 教学科研 园丁之家 学生园地 德教阵地 招生信息 荣誉榜
<% dim e1,rs1,sql1 set rs1=server.CreateObject("adodb.recordset") sql1="select top 10 * from [Lihua_News] where MenuId=73 Order by N_LastTime desc" rs1.open sql1,conn,1,1 %>

智新小学是经东莞市教育局批准开办的全日制民办小学。学校位于与东莞市区一水之隔的万江区蚬涌社区。毗邻107国道,距东莞汽车总站两公里,交通发达,通行便捷。 学校占地面积近20000平方米,建筑面积金10000平方米。校园设计新颖独特,教学楼、办公楼气宇非凡。校内校外碧草如茵、百花争艳。古式亭、台、楼、阁坐落于树影林荫之中,曲径通幽....  更多

<% dim f1,rs3,sql3 set rs3=server.CreateObject("adodb.recordset") sql3="select top 10 * from [Lihua_News] where MenuId=62 Order by N_LastTime desc" rs3.open sql3,conn,1,1 %>
<% dim f,rs2,sql2 set rs2=server.CreateObject("adodb.recordset") sql2="select top 10 * from [Lihua_News] where MenuId=72 Order by N_LastTime desc" rs2.open sql2,conn,1,1 %>
<% dim e5,rs5,sql5 set rs5=server.CreateObject("adodb.recordset") sql5="select top 10 * from [Lihua_News] where MenuId=77 and T_Id=265 Order by N_LastTime desc" rs5.open sql5,conn,1,1 %>
    <% dim rsnew set rsnew=server.createobject("adodb.recordset") sql="select top 11 * from Lihua_Products where MenuId=2 and tuijian=1 Order by P_Id desc" rsnew.open sql,conn,1,1 if not rsnew.eof or rsnew.bof then for i=1 to rsnew.recordcount %>
  • " target="_parent">" width="135" height="100" style="border:2px solid #CCCCCC;">
    <%=rsnew("P_name1")%>
  • <% rsnew.movenext if rsnew.eof or rsnew.bof then exit for next rsnew.close set rsnew=nothing end if %>
<% If QQOnlineSettings(0)="1" Then %> <% End If %>