Z
zenfor
Hi,
I have a simple script I found that increments a number in a text file.
I was wondering if anyone has a routine that will commify the number.
Thank you!
===============
<%
counter_file = Server.MapPath("counter/test.txt")
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile(counter_file)
counter = Clng(a.ReadLine)
if Session("counter") = "" then
Session("ct") = counter
counter = counter + 1
a.close
Set a = fs.CreateTextFile(counter_file, True)
a.WriteLine(counter)
end if
a.Close
%>
This website now has <font color="#FF0000" size=4><strong><%= counter
%></strong></font> Total Hits
I have a simple script I found that increments a number in a text file.
I was wondering if anyone has a routine that will commify the number.
Thank you!
===============
<%
counter_file = Server.MapPath("counter/test.txt")
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile(counter_file)
counter = Clng(a.ReadLine)
if Session("counter") = "" then
Session("ct") = counter
counter = counter + 1
a.close
Set a = fs.CreateTextFile(counter_file, True)
a.WriteLine(counter)
end if
a.Close
%>
This website now has <font color="#FF0000" size=4><strong><%= counter
%></strong></font> Total Hits