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

徐滨杰船模收藏馆
场馆介绍
　     享有“百舸富翁”雅号的徐滨杰，目前已藏有“双背钓船”、“红骨钓鱼船”、“岱山中流网船”、“五桅沙船”、“六鸽船”等各种船模近200艘。馆主制作的“五桅沙船”已陈列于北京人民大会堂上海厅内。“大捕定置网鱼船”模型作为上海国际饭店的店标，而著名于国内外。
　

　联系方式


地址：东余杭路1143弄31号