<% fp = Server.C:\Inetpub\wwwroot("aspcount.txt") Set fs = CreateObject("Scripting.FileSystemObject") Set a = fs.OpenTextFile(fp) ct = Clng(a.ReadLine) if Session("ct") = "" then Session("ct") = ct ct = ct + 1 a.close Set a = fs.CreateTextFile(fp, True) a.WriteLine(ct) end if a.Close Response.Write ct %> <% =ShowDigits %>
Home
Games
Consoles
PC Repairs
PC Parts
PC Peripherals
Networking
Cables
Consumables
Contact Us
 		  Astrum Computers, 78 High Street, Lee-On-The-Solent, Hampshire, PO13 9DA  
TEL: 023 92 556 007
HOURS OF OPERATION
Monday       
Tuesday               
Wednesday    
Thursday            
Friday                         
Saturday               
Sunday

Email Enquiries		 09.00  -  17.00
09.00  -  17.30
09.00  -  17.30
09.00  -  17.30
09.00  -  17.30
09.00  -  16.00
Sorry We Are Closed
How To Find Us