%
function counter()
dim obj
set obj = server.createobject("ITNComp.Counter")
dim iNum
'-------------------------------------------------------------------------------
'strFileName här skriver du sökvägen till filen som är räknaren för denna sida.
'OBS vill du ha en räknare för fler sidor så måste du döpa om "strFileName"
'-------------------------------------------------------------------------------
obj.strFileName = server.mappath("raknare.txt")
'-------------------------------------------------------------------------------
'Increment Denna metod räknar upp med ett och returnerar det uppdaterade värdet.
'-------------------------------------------------------------------------------
counter = obj.Increment ()
'-------------------------------------------------------------------------------
'SetCounter Denna metod sätter ett värdet.
'-------------------------------------------------------------------------------
'counter = obj.SetCounter ("50")
'-------------------------------------------------------------------------------
'GetCurCounter Denna metod returnerar värdet på räknaren.
'-------------------------------------------------------------------------------
'counter = obj.GetCurCounter()
set obj = nothing
end function
%>
Alsike Maskin - kundvagn
|
. |
Alsike Maskin
AB ● Knivstavägen 6 ● 741 30 Knivsta ● Tel.018-34 30
70
Alsike Maskin
Syd AB ● Fabriksvägen 4 ● 330 15 Bor ● Tel.
0370-65 00 02
|
|