<% Dim ObjCounterFile, ReadCounterFile, WriteCounterFile Dim CounterFile Dim CounterHits Set ObjCounterFile = Server.CreateObject("Scripting.FileSystemObject") CounterFile = Server.MapPath ("counter.txt") Set ReadCounterFile= ObjCounterFile.OpenTextFile (CounterFile, 1, True) If Not ReadCounterFile.AtEndOfStream Then CounterHits = Trim(ReadCounterFile.ReadLine) If CounterHits = "" Then CounterHits = 0 Else CounterHits = 0 End If ReadCounterFile.Close Set ReadCounterFile = Nothing CounterHits = CounterHits + 1 Set WriteCounterFile= ObjCounterFile.CreateTextFile (CounterFile, True) WriteCounterFile.WriteLine(CounterHits) WriteCounterFile.Close Set WriteCounterFile = Nothing Set ObjCounterFile = Nothing %>

<HOME

Timers.

<HOME

	DT11 Countdown Timer.   The DT11 is a Countdown Timer which can be simply preset with hours and minutes.   Timing is enabled and disabled by closing a contact on on the rear of the timer.   Once the preset time has elapsed an alarm output is enabled which can be used for many   purposes, i.e. warning light, buzzer, relay. more ....DT11>

For technical enquiries and product assistance please email us ...... tech@dpmeters.co.uk