Добро пожаловать на MidletPascal - а теперь еще скоро и Android и Iphone...
Авторизироваться
Меню сайта
Категории раздела
Наш опрос
Стоит ли на нашем сайте публиковать мобильные новости?
Всего ответов: 177
Мини-чат
200
Календарь
«  Ноябрь 2017  »
ПнВтСрЧтПтСбВс
  12345
6789101112
13141516171819
20212223242526
27282930
Статистика

Онлайн : 1
Гостей: 1
Пользователей: 0
$f = fopen("http://mobilepascal.ucoz.ru/txt/count.txt", "a+"); /* открываем файл, хранящий значение счетчика */
flock($f, LOCK_EX); /* блокируем доступ к файлу */
$count = fread($f, 100); /* считываем значение счетчика из файла */
@$count = $count + 1; /* увеличиваем значение счетчика на 1 */
ftruncate($f, 0); /* очищаем файл */
fwrite($f, $count); /* записываем значение счетчика в файл */
fflush($f); /* сбрасываем буфер файла - чтобы все что мы хотели туда записать записалось */
flock($f, LOCK_UN); /* снимаем блокировку с файла */
fclose($f); /* закрывам файл */
echo $count; /* печатаем значение счетчика */
?>