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

艾耀国创刊号报纸博物馆
场馆介绍
　     馆主经25年精心收藏，馆藏试刊、创刊、尾刊、复刊号报纸2500多种和其他报纸1.1万余种。如光绪二十年(1894)上海版《申报》、1906年采风报、延安时期的《解放日报》，还藏剪报200多册，纪念封300多枚。
　

　联系方式


地址：大连西路201弄50号
　　　405室