<% dim visitors,myplace,vwrite,MAXChannalCount MAXChannalCount = 6 myplace = 4 whichfile=server.mappath("../count/2.txt") Set fs = CreateObject("Scripting.FileSystemObject") Set thisfile = fs.OpenTextFile(whichfile) visitors=Split(trim(thisfile.readline),"::") thisfile.close 'response.write visitors(myplace) visitors(0)=visitors(0)+1 visitors(myplace)=visitors(myplace)+1 Set out=fs.CreateTextFile(whichfile) vwrite = "" for i = 0 to MAXChannalCount - 1 vwrite =vwrite & visitors(i) & "::" next vwrite =vwrite & visitors(MAXChannalCount) out.WriteLine(vwrite) out.close set fs=nothing %> 展览频道/上海青年电子社区
　
　

上海青年文化活动中心
禁毒馆
场馆介绍
　     禁毒馆是上海市禁毒委员会办公室、上海青年文化活动中心共同合作的"上海市禁毒教育基地"，该展馆总面积1200平方米，主要受众对象是青年、青少年群体。展览布置以"触目惊心、身临其境"为主题，提出了"空间设计"全新理念，表现形式采用声、光、电子、多媒体影视合成等技术，更符合广大青少年的观赏口味，将是常设的禁毒教育场所。
资料图片
　


　展馆位置




　联系方式

地址：上海市汉中路188号
电话：（021）63535988
传真：（021）63542642
邮编：200070
交通：地铁1号线汉中路站、
隧道三线、128、104、109、64、113、41、95、114、722、741、723、58、701、13、63、835