Potřeboval bych to předělat nějak do PHP

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart
Application("KdoTuJe") = 0
End Sub

Sub Application_OnEnd
End Sub

Sub Session_OnStart
Session.Timeout = 20
Application.Lock
Application("KdoTuJe") = Application("KdoTuJe") + 1
Application.Unlock
End Sub

Sub Session_OnEnd
Application.Lock
Application("KdoTuJe") = Application("KdoTuJe") - 1
Application.Unlock
End Sub

</SCRIPT>


<meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
<p align="center"><font face="Verdana, Arial" size="2">
<%
If Application("KdoTuJe") < 5 Then
If Application("KdoTuJe") = 1 Then
lidi_text = " člověk"
Else
lidi_text = " lidi"
End If
End If

If Application("KdoTuJe") => 5 Then
lidi_text = " lidí"
End If

Response.Write("Stránky si právě prohlíží: " & Application("KdoTuJe") & lidi_text)
%>
</font></p>


Protože webzdarma neumi ASP

za kolik?

Hm, jestli chceš, někdy bych měl míti script na počítání online userů (jestli jsem to dobře pochopil) jestli chceš, dám ho sem...!

Mno tak jo Lukasiku budeš moc hodnej

Hm, to asi nepůjde, je to zakomponované jěště z dalším věcma... A nechce se mi to upravovat, ale zkus třebas http://hubner.stable.cz/php/ myslím, že tam ten script je...

Mno jo Lukasiku ale to na ty tvy adrese jeto na bazi a ja ji nemam
A potrebuju to nejak tam dostat.

...

Mno ja nemam vytvorenou databazi.