|
|
您是第 <% countlong=6 count=server.mappath("count_fwxm.txt") set cou = server.createobject("scripting.filesystemobject") set out=cou.opentextfile(count,1,false,false) counter=out.readline out.close if session("in_fwxm")<>"in" then session("in_fwxm")="in" set out = cou.createtextfile(count,true,false) application.lock counter=counter+1 out.writeline(counter) application.unlock out.close end if co=cstr(counter) for i = 1 to countlong-len(co) %><% next for i= 1 to len(co) select case mid(co,i,1) case "0"%><% case "1" %><% case "2"%><% case "3" %><% case "4"%><% case "5" %><% case "6"%><% case "7" %><% case "8"%><% case "9" %><% end select next%> 位来访者 |
友情链接:空气检测 室内空气检测 空气治理 室内环境检测 空气检测 甲醛检测 室内环境检测 空气质量检测 空气检测 室内空气检测 室内环境检测 空气质量检测 空气治理 空气净化 空气检测 |
Copyright 上海室内环境质量检测中心 版权所有 |