<% 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 %> 展览频道/上海青年电子社区
　
　

杨浦区文化馆画廊
场馆介绍
　     杨浦区文化馆画廊经常不定期地举办各类书画展，新馆扩建竣工后，先后举办了《杨浦区书画作品展》、《四区一县书画精品展》、《国庆书画廊》等画展，尤其是不断推出杨浦区近期在书画等渐露头角的中青年画家的个人或作品展如《金小萍书法作品展》、《朱官华书法篆刻展》、《蔡孝龙、龚建平、倪志方三人书画展》等等均受到杨浦区书画家的好评。
外观图片
　

网址
http://www.china-dirs.com/business/factory/html/M03684/

　联系方式


地址：上海市杨浦区控江路
　　　1155号
邮编：200093
电话：021-65025588