<% COUNTERFILE=SERVER.MAPPATH("/counter/")+"\counter.txt" SET FILEINSTANCE=SERVER.CREATEOBJECT("SCRIPTING.FILESYSTEMOBJECT") SET TEXTINSTANCE=FILEINSTANCE.OPENTEXTFILE(COUNTERFILE,1,FALSE,FALSE) VISITORNUM=TEXTINSTANCE.READLINE %> <% IF REQUEST.QUERYSTRING("CHOICE")<>"2" THEN %> <% VISITORNUM=VISITORNUM+1 %>