Форум: "Потрепаться";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];
ВнизCGI Найти похожие ветки
← →
Anatoly Podgoretsky (2001-12-21 22:28) [17]AssignFile(F,"Counter");
Reset(F);
ReadLn(F,Counter);
Counter := Counter + 1;
CloseFile(F);
Rewrite(F);
Writeln(F,Counter);
CloseFile(F);
WriteLn("Content-type: text/html");
WriteLn;
WriteLn(Counter);
Но все это чепуха, без организации блокировок оба кода не живые.
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c