% ' *** Visit Counter *** ' FELIXONE 2002 - SB by Felice Di Stefano - www.felixone.it Dim FX_count Dim FX_digit FX_digit = 5 Dim FX_dpath FX_dpath = Server.MapPath("FX_DataCounter") Dim FX_fpath FX_fpath = Server.MapPath("FX_DataCounter/webTVFeb29.txt") set FX_fso = Server.CreateObject("Scripting.FileSystemObject") ' Check if directory and file exists, if not create it. If (Not FX_fso.fileExists(FX_fpath)) Then If (Not FX_fso.folderExists(FX_dpath)) Then FX_fso.CreateFolder(FX_dpath) End If Application.Lock() set FX_file = FX_fso.OpenTextFile(FX_fpath, 8, true) FX_file.write(0) FX_file.Close() Application.Unlock() End If ' Read file and update it any time set FX_fobj = FX_fso.getfile(FX_fpath) set FX_file = FX_fobj.OpenAsTextStream(1,-2) FX_count = FX_file.Read(100) 'If (Session("FX_DataCounter") = "") Then Application.Lock() set FX_file = FX_fso.CreateTextFile(FX_fpath, 8, false) FX_file.write(FX_count+1) FX_file.Close() Application.Unlock() set FX_fso = nothing FX_count = FX_count+1 ' Session("FX_DataCounter") = FX_count 'End If ' Add leadings FX_numlength = Len(cStr(FX_count)) If (FX_numlength < FX_digit) Then FX_lead = cInt(FX_digit - FX_numlength) For i=1 To FX_lead FX_count = "0" & FX_count Next End If %>
<%=FX_count%>
![]() | ||||
"VIP
Mates Club webWORLD pic's & articles coming soon!" Cwoc Brenda
Cwoc Oiler Babe with the
Oiler Tattoo on her Fanny
Call
MYKwebWORLD at 403 870-5578 CDN
**** New
Get your mates to email me for a free VIP Mates
Club trial. |
Once you click on "Play"
below it takes 5-10 secs
until me TV works! Me
PC TV needs Billy's Media Player
Mar 7 VIP Mates Club Pro Bowl MYKwebTV shows
|
Keep
scrolling down more MYKwebTV below! "Since Nov 2002 I have been on "SportsRage" Inet & Montreal Radio, Fri 10.45pm Pacific CDN/US time, Sat 5.45pm EST Aussie time. Hope you can join me. To listen Click here **** New
Get your mates to email me for a free VIP Mates
Club trial.
Total-CFL & MYKwebWORLD Unique Products e-store webTV Click here **** New
Get your mates to email me for a free VIP Mates
Club trial.
|