![]() ![]() ![]() |
||||
|
||||
|
| 您是第 You are No |
<%
dim visitors
whichfile=server.mappath("count.txt")
Set fs = CreateObject("Scripting.FileSystemObject")
Set thisfile = fs.OpenTextFile(whichfile)
visitors = thisfile.readline
thisfile.close
countlen=len(visitors)
for i=1 to countlen
response.write " | frameborder="0">
位參觀者 Vistor |