|
|
|
<%
dim visitors
whichfile=server.mappath("count.txt")
Set fs = CreateObject("Scripting.FileSystemObject")
Set thisfile = fs.OpenTextFile(whichfile)
visitors=thisfile.readline
thisfile.close
visitors=visitors+1
Set out=fs.CreateTextFile(whichfile)
out.WriteLine(visitors)
out.close
response.write "现在的访问次数是："&visitors
set fs=nothing
%>
||||||||||||||||||
上海迪安制冷有限公司长期致力于冷库空调技术的开发研制，“迪安”冷库、冷水机等制冷设备，起点高，品质优，深受用户信赖。 | |||||||||||||||||||
*
