<% option explicit %> <% dim conn,connstr,database database=0 '设置使用的数据库类型,1=SQL SERVER,其他为ACCESS if database=1 then connstr="driver={SQL Server};server=(local);database=BVNews;uid=sa;pwd=1;" else connstr="DBQ="+server.mappath("news/whdxsnews.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" end if set conn=server.CreateObject("adodb.connection") conn.open connstr %> <%dim rs,sql,typeid,number,theday,curpage,i,rs1,sql1 typeid=1 if typeid="" then response.write "错误!版面编号不能为空!返回" response.end end if set rs=server.createobject("adodb.recordset") '每页显示的文章数 rs.open "select morenumber from news_parameter where parameterid=1",conn,1,1 if not rs.bof and not rs.eof then number=rs("morenumber") else number=50 end if rs.close rs.open "select typename from type where typeid=14" ,conn,1,1 if not rs.bof and not rs.eof then sql=rs("typename") end if rs.close set rs=nothing set rs=server.createobject("adodb.recordset") rs.open "select * from news where typeid=14" & " and audit=1 order by ntime DESC",conn,1,1 if err.number <> 0 then response.write "数据库出错" else %> 娆ф床鏉珵鐚滃钩鍙-鐧惧害鐧剧
 
医学院公有用房信息系统
西3(3号楼) 西4(4号楼) 西6(6号楼) 西5(5号楼) 西1(老红楼) 西8(图书馆) 生命科学院健康中心 东6(六舍) 东3(嘉宾楼) 东4(四舍) 东7(合肥路学生公寓) 合肥路裙楼 东11(十一舍) 东9(食堂) 东12(十二舍) 东1(一舍) 东10(体育馆) 东15(15舍) 东8(门诊楼) 西2(教学中心大楼) 东5(合肥路招待所西楼) 东5(合肥路招待所东楼) 东院教育超市 西7(科研实验楼) A楼 B楼 C楼 D楼 E楼 东2(科教楼、懿德楼裙楼)
重庆南路校区
中山南一路校区
教师公寓
 
 
闵行校区文选楼  
   
 

Copyright © 2013Assets Management Dept All Rights Reserved 上海交通大学医学院资产管理处版权所有
地址:上海市重庆南路227号东四舍二楼    邮编:200025    电话:63846590*776258
3号楼 4号楼 6号楼 5号楼 足球场 老红楼 图书馆 4舍 1舍 11舍 6舍 8舍 懿德楼 科教楼 体育馆 篮球场 嘉宾楼 12舍 15舍 上海生命科学院健康中心 尔宜宾馆(北楼) 合肥路群房 合肥路学生公寓 食堂 1号楼 4号楼 辅助用房 体育馆 3号楼 中1(1号楼) 中2(2号楼) 中3(3号楼) 中4(4号楼) 辅助用房
<% end if %>