版权所有：江苏生命科技创新园 ? 2000-2009
地址：南京市仙林大学城 纬地路9号 咨询热线：025-85753502 传真：025-85753502
备案号：申请中 技术支持：南京第一网络  流量统计  您是第 <% CountFile=Server.MapPath("count.txt") Set FileObject=Server.CreateObject("Scripting.FileSystemObject") Set Out=FileObject.OpenTextFile(CountFile,1,FALSE,FALSE) counter=Out.ReadLine Out.Close SET FileObject=Server.CreateObject("Scripting.FileSystemObject") Set Out=FileObject.CreateTextFile(CountFile,TRUE,FALSE) Application.lock counter= counter + 1 Out.WriteLine(counter) Application.unlock Response.Write(counter) Out.Close %> 位访问者