|
|
 |
 |
北 京 中 美 正 邦 科 技
发 展 有 限 公 司 Beijing zhongmeizhengbang
technical development co.,ltd |
|
地址:北京市石景山区古城西街21号 邮编(P.C):100043
Address:No.21 GuCheng West Street,Shijingshan Dist.,Beijing
电话(Tel):(86)-010-68865437 68868043 51293175 51293170 68865409
传真(Fax):(86)-010-68865459
在线QQ:673031302 http://www.bomei88.com
E-mail:bomei88@126.com 乘车路线:
北京站:乘地铁至古城站西北出口出站前行600米右行200米即到。
北京西站:北广场马路对面坐102公汽到公主坟转乘地铁。
南广场乘941公汽至老古城站前行300米古城西街右行200米即到。
自驾路线:长安街西延长线石景山路最西端,首钢东门附近。 |
|
(标有"*"的必须填写,否则无法正确提交您的反馈信息)
<%
sub ClassTitle
rs.open sql,conn,1,1
dim ThisMore
while not rs.EOF
Response.Write shownewf
if BigModel=1 then
if ShowBigModelRight=1 then
Response.Write showTitle("MainContentS",26) '分列有右栏
'Response.Write showTime
'Response.Write showImg
'Response.Write shownew
Response.Write showclick
Response.Write showOntop
Response.Write " "
else
Response.Write showTitle("MainContentS",30) '分列无右栏
Response.Write showTime
'Response.Write showImg
'Response.Write shownew
Response.Write showclick
Response.Write showOntop
Response.Write " "
end if
else
if ShowBigModelRight=1 then
Response.Write showTitle("MainContentB",42) '不分列有右栏
Response.Write showTime
Response.Write showImg
'Response.Write shownew
Response.Write showclick
Response.Write showOntop
Response.Write " "
else
Response.Write showTitle("MainContentB",60) '不分列无右栏
Response.Write showTime
Response.Write showImg
Response.Write shownew
Response.Write showclick
Response.Write showOntop
Response.Write " "
end if
end if
rs.MoveNext
wend
rs.close
end sub
set rs=nothing%>
|
|
|
|