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

宇阳书画艺术沙龙
场馆介绍
　     这是宇阳书画艺术沙龙在这儿开办的一家艺术馆，上海古玩公司亦在此设了分店。这里展出的书画大多为近代的书画家的作品，但绝大数俱为国画、水墨画等，同时有玉器、旧钟表、古无、邮币卡的咨询、交流、鉴赏等活动。
场馆外景
　　

　联系方式


地址：上海市多伦路钟楼
交通：乘18、21、231、939路
　　　公共汽车多伦路下