E G I P A T

Jucer (Ptolomejevo pismo)jučer

danasDanas (Ptolomejevo pismo)

Sutra (Ptolomejevo pismo)sutra


proFOKUS Stručna škola za modno oblikovanje i kostimografiju
Đorđićeva 17/I, 10000 Zagreb, tel. 01/4810 194 098/209-569 fax. 01/482 1025

POSLuH d.o.o.
Vi ste <% CounterFile = Server.MapPath ("/asp") & "\profokus.cnt" Set fs = CreateObject("Scripting.FileSystemObject") On Error Resume Next Set a = fs.OpenTextFile(CounterFile, 1, 0, 0) c = a.Readline set fs = Nothing If (Request.ServerVariables("REMOTE_ADDR") > "195.29.205") and (Request.ServerVariables("REMOTE_ADDR") < "195.29.206") then else c = c + 1 Set fs = CreateObject("Scripting.FileSystemObject") set b = fs.CreateTextFile (CounterFile, 1, 0) b.WriteLine c Set b = Nothing end if Response.Write c %>. posjetitelj od 21.03.1999.