解决方案

<% dim out countfile=server.mappath("../../ms.txt") set objfile=server.createobject("scripting.filesystemobject") set out=objfile.opentextfile(countfile,1,false,false) out.skip 6 counter=out.readline out.skip 8 counter1=out.readline out.skip 9 counter2=out.readline out.skip 8 counter3=out.readline out.skip 8 counter4=out.readline out.skip 10 counter5=out.readline out.skip 6 counter6=out.readline out.close set objfile=server.createobject("scripting.filesystemobject") set out=objfile.createtextfile(countfile,TRUE,FALSE) application.lock counter1=counter1+1 out.writeline("index:"&counter) out.writeline("product:"&counter1) out.writeline("download:"&counter2) out.writeline("problem:"&counter3) out.writeline("jieshou:"&counter4) out.writeline("bujieshou:"&counter5) out.writeline("yiban:"&counter6) application.unlock out.close %>