| |
|
|
|
Campus |
 |
| |
<%
do while not bbsrs1.eof
lastpost1 = Split(bbsrs1("LastPost"),"$")
%>
<%bbsrs1.movenext
loop
bbsrs1.close
set bbsrs1=nothing
%>
|
|
 |
|
|
| |
|
Curricula |
|
|
| |
<%
do while not bbsrs1.eof
lastpost1 = Split(bbsrs1("LastPost"),"$")
%>
<%bbsrs1.movenext
loop
bbsrs1.close
set bbsrs1=nothing
%>
|
|
|
|
|
|
| |
|
Life |
|
|
| |
<%
do while not bbsrs1.eof
lastpost1 = Split(bbsrs1("LastPost"),"$")
%>
<%bbsrs1.movenext
loop
bbsrs1.close
set bbsrs1=nothing
%>
|
|
|
|
|
|
<%
dim bbssql1,bbsrs1
dim boardid1,lastpost1
boardid1 = 23
bbssql1="select top 10 * from Dv_Topic order by DateAndTime desc"
set bbsrs1=Server.createObject("adodb.recordset")
bbsrs1.open bbssql1,conn,1,3
%> |
 |
 |
| |
 |
About us |
 |
<%
dim newssql1,newsrs1
dim imgsrc1
newssql1="select top 8 * from news_content where istop1=1 order by id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
imgsrc1=newsrs1("pic1")
%>
|
|
Our
school
Jing’an Primary school
is an excellent demonstration school for Children’s Security
Action and for students’manners
as well as a psychological counseling experimental school of
Shanghai.
The motto of the school
is ‘Intellectual,
Sunny, Healthy’.We
concentrate on the overall development of every student with
training the students to have good moral character, strong
interest and flexible methods in learning and healthy living
habits; so that we may help kids grow psychologically healthy.
<%newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
%>
|
|
|
 |
<%
dim newstopid1,t1
t1=1
dim newssql3,newsrs3
newssql3="select * from news_type where state=2 order by pid"
set newsrs3=Server.createObject("adodb.recordset")
newsrs3.open newssql3,conn,1,3
do while not newsrs3.eof
%>
 |
| |
<%
'dim newssql1,newsrs1
dim newstopid3
newstopid3=","
newssql1="select * from news_type where sid=3"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
do while Not newsrs1.eof
newstopid3=newstopid3+cstr(newsrs1("id"))+","
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
'Response.write(newstopid3)
newssql1="select top 5 * from news_content where type=35 order by istop1 desc, id desc"
'newssql1="select top 5 * from news_content where type in (0"&newstopid3&") order by istop1 desc, id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
|
|
 |
|
|
|
|
|
| |
<%
'dim newssql1,newsrs1
newstopid1=","
newssql1="select * from news_type where sid="&newsrs3("id")
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
do while Not newsrs1.eof
newstopid1=newstopid1+cstr(newsrs1("id"))+","
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
'Response.write(newstopid1)
newssql1="select top 5 * from news_content where type in (0"&newstopid1&") order by istop1 desc, id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
|
|
|
|
<%
t1=t1+1
newsrs3.movenext
loop
newsrs3.close
set newsrs3=nothing
%>
 |
|
|
| |
<%
'dim newssql1,newsrs1
dim newstopid3
newstopid3=","
newssql1="select * from news_type where sid=3"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
do while Not newsrs1.eof
newstopid3=newstopid3+cstr(newsrs1("id"))+","
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
'Response.write(newstopid3)
newssql1="select top 5 * from news_content where type=35 order by istop1 desc, id desc"
'newssql1="select top 5 * from news_content where type in (0"&newstopid3&") order by istop1 desc, id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
|
|
|
|
|
|
| |
<%
'dim newssql1,newsrs1
newstopid1=","
newssql1="select * from news_type where sid="&newsrs3("id")
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
do while Not newsrs1.eof
newstopid1=newstopid1+cstr(newsrs1("id"))+","
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
'Response.write(newstopid1)
newssql1="select top 5 * from news_content where type in (0"&newstopid1&") order by istop1 desc, id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
|
|
|
|
<%
t1=t1+1
newsrs3.movenext
loop
newsrs3.close
set newsrs3=nothing
%>
|
|
 |
<%
dim newssql2,newrs2
dim newssqlnum2
newssql2="select * from news_type where sid=-21 and state=1 order by pid"
set newsrs2=Server.createObject("adodb.recordset")
newsrs2.open newssql2,conn,1,3
do while Not newsrs2.eof
%>
|
Our Class Web <%=newsrs2("art_type")%> |
|
<%
newssql1="select top 5 * from news_content where type=" & newsrs2("id") & " order by arttime desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
newssqlnum2=1
do while Not newsrs1.eof
%>
<%
newssqlnum2=newssqlnum2+1
if newssqlnum2 > 5 then
newsrs1.movelast
end if
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
%>
|
|
 |
|
|
<%
newsrs2.movenext
loop
newsrs2.close
set newsrs2=nothing
%>
|
|
<%
dim newssql2,newrs2
dim newssqlnum2
newssql2="select * from news_type where sid=-21 and state=1 order by pid"
set newsrs2=Server.createObject("adodb.recordset")
newsrs2.open newssql2,conn,1,3
do while Not newsrs2.eof
%>
|
Achievements |
|
|
<%
newssql1="select top 5 * from news_content where type=" & newsrs2("id") & " order by arttime desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
newssqlnum2=1
do while Not newsrs1.eof
%>
-
Golden
Award of the 7th World Peace Painting and Calligraphy Exhibition,
Japan
-
Golden
Award of the 10th World Peace Painting
and Calligraphy Exhibition, Cairo
more>>><%
newssqlnum2=newssqlnum2+1
if newssqlnum2 > 5 then
newsrs1.movelast
end if
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
%>
|
|
|
|
<%
dim newssql2,newrs2
dim newssqlnum2
newssql2="select * from news_type where sid=-21 and state=1 order by pid"
set newsrs2=Server.createObject("adodb.recordset")
newsrs2.open newssql2,conn,1,3
do while Not newsrs2.eof
%>
|
<%
newsrs2.movenext
loop
newsrs2.close
set newsrs2=nothing
%> |
| |
| |
|
|
 |
|
|
|
Web links |
|
|
<%
newssql1="select top 5 * from news_content where type=" & newsrs2("id") & " order by arttime desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
newssqlnum2=1
do while Not newsrs1.eof
%>
www.baidu.com
www.google.com<%
newssqlnum2=newssqlnum2+1
if newssqlnum2 > 5 then
newsrs1.movelast
end if
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
%>
dict.cn |
|
|
|
|
<%
newssql1="select top 3 * from news_special where sp_state=1 order by sp_id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
do while Not newsrs1.eof
%>
<%
newsrs1.movenext
loop
newsrs1.close
set newsrs1=nothing
%>
|
Copyright © 2008 JING AN PRIMARY SCHOOL All Rights
Reserved
ADD: 827-Changshou RD Shanghai China
Post code: 200042 Tel: 021-62314109
Email: jaschool827@hotmail.com You are our No. visitor |
<%
newssql1="select top 1 * from news_content where ispopup1=3 order by id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
<%
newsrs1.close
set newsrs1=nothing
newssql1="select top 1 * from news_content where ispopup1=4 order by id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
<%
newsrs1.close
set newsrs1=nothing
newssql1="select top 1 * from news_content where ispopup1=5 order by id desc"
set newsrs1=Server.createObject("adodb.recordset")
newsrs1.open newssql1,conn,1,3
%>
<%
newsrs1.close
set newsrs1=nothing
%> |
|
Video: 
