复旦大学基建处

欢迎光临复旦大学基建处网站! 本站域名http://www.jijian.fudan.edu.cn 校内访问http://10.77.0.79

·新闻中心·

·基建工程动态·

·招投标信息·

·子彬院改扩建工程竣工验收

·邯郸校区教学楼空调安装工程竣工

·基建处就基建修缮工作召开学生座谈会

·基建处党支部积极开展创先争优活动之反渎职侵权专题讲座

·基建处党支部积极开展创先争优活动基层党建特色项目

·基建处开展廉政教育活动

·加强检校合作，共创双优工程-江湾校区生科院建设项目召开创“双优工程”会议

在复旦大学这所著名的高等学府里，优美的校园建筑和环境是其中一道最亮丽的风景。

这里就是基建处工作成果的展台，欢迎光临基建工程动态板块!

遵循公平、公正、服务、及时的原则，基建处根据有关规定对学校基建修缮工程项目的招标、投标与中标结果等信息进行公开。

点击查询招投标信息！

地址:上海市邯郸路220号邮编:200433 电话:021-6564 3351 传真:021-6564 5601

<% Response.expires = 0 Response.expiresabsolute = Now() - 1 Response.addHeader "pragma", "no-cache" Response.addHeader "cache-control", "private" Response.addHeader "cache-control", "no-cache" Response.addHeader "cache-control", "no-store" Response.CacheControl = "no-cache" dim conn2 dim connstr2 connstr2="DBQ="+server.mappath("database/database.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn2=server.createobject("ADODB.CONNECTION") conn2.open connstr2 dim counters application.lock conn2.Execute"Update counter set counter=counter+1" set rs=conn2.Execute("select * from counter") counters=rs("counter") 'response.write "document.write('"&counters&"');" rs.close application.unlock Dim S, i,G dim countlong countlong=6 G =CStr( counters ) S =Len(G) '先将数值转换成字符串 '逐个取字符串 S 的每个字节,然后串成

图形标记 For i = 1 to countlong - S show="

" next for i=1 to S show=show&"

" next set rs=nothing response.write "document.write('"&show&"');" conn2.close set conn2=nothing %>