登录
用户名
密码
<% countcss=-1 whichfile=server.mappath("./count.txt") Set fs=CreateObject("Scripting.FileSystemObject") Set thisfile=fs.opentextfile(whichfile) visitors=thisfile.readline thisfile.close visitors=visitors+1 set thisfile=fs.createtextfile(whichfile) thisfile.writeline(visitors) thisfile.close set fs=nothing countlen=len(visitors) 'response.write "访问量:" & visitors %>