北京古华轩古典家具行

Beijing Guhuaxuan Classical Furniture

中 文	跳过动画	English
欢迎光临，您是本站的第 <% file=server.mappath("counter.txt") Set files = server.CreateObject("Scripting.FileSystemObject") Set openfile = files.OpenTextFile(file) visitors=openfile.readline openfile.close countsize=len(visitors) for n=1 to countsize response.write "" next If Isempty(Session("visitors")) Then visitors=visitors+1 Set out=files.CreateTextFile(file) out.WriteLine(visitors) out.close End If Session("visitors")=true %> 个访问者。