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

上海大剧院画廊
场馆介绍
　     不少游客到上海，大抵会去拜望人民广场边的上海大剧院。可是你是否留意，依偎在大剧院北端、毗邻上海美术馆的大剧院画廊，也是不容错过的一个去处。
这一家画廊的门面显得十分雅致。由于精心设计，诺大一间宽敞的房间被奇巧地间隔成几个小展厅，这使不同的绘画主题各有着自己的一片天地，其中大多出自上海本土的中青年画家，也有来自外地及外国的一些华人艺术家作品。从门厅往左拐，一批年轻画家的作品聚集在此。再往里走，扑人眼帘的大大小小的精美的丝网画，是丁绍光的有限复制品。继续往里走，又发现里面还有一片特别的天地……。 不同作品的陈设，默默地叙说了主人的艺术视野，也流露出画廊的务实作风。

外观图片
　


　联系方式
 
地址：黄坡北路286号（近上海
　　　大剧院）
电话：8621-63851338
　　　8621-63868686*3214
邮编：200003
 
网址：
http://www.artchinanet.
com/netservice/shgallery/
grand%20theatre/main.htm