Help!!! codice asp da tradurre in php

[terax]

Ciao a tutti, mi sapreste tradurre questo codice asp in php per aggiornare una variabile in un txt da usare come contatore.
Purtroppo io non sono un programmatore e non ce ne capisco niente! javascript:smilie(':dh%C3%B2:')
Mannaggia li pescetti

Grazie javascript:smilie('')
Stordita

-------------------------------------------------------------

<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
strPath = Server.MapPath("public/counter.txt")
Set objCounterFile = objFSO.OpenTextFile(strPath)
iContatore = objCounterFile.ReadLine
If Session("Contatore") = "" Then
Session("Contatore") = iContatore
iContatore = iContatore + 1
'objCounterFile.Close
Set objCounterFile = objFSO.CreateTextFile(strPath, True)
objCounterFile.WriteLine(iContatore)
End If
objCounterFile.Close
Set objCounterFile = Nothing
Set objFSO = Nothing
%>

[daniele_dll]

<?php

$counter = file_get_contents("public/counter.txt");
$counter++;

$fp = fopen("public/counter.txt", "wb");
flock($fp, LOCK_EX);
fwrite($fp, $counter);
flock($fp, LOCK_UN);
fclose($fp);

?>

finito

questo codice oltre a incrementare il counter si preoccupa anche di eseguire il locking per ridurre le possibilità di scrittura contemporanea che azzererebberò il counter

comunque non è per niente sicuro l'utilizzo di counter testuali per il motivo sopra riportato ^^