Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2005.08.07;
Скачать: [xml.tar.bz2];

Вниз

Администрирование компьютерных клубов   Найти похожие ветки 

 
Михаил(Киров)   (2005-07-14 03:56) [0]

Мне надо сделать прогу, которая администрирует простенький компьютерный клуб. Главные задачи: 1. Блокировка компьютера после истекания времени; 2. Учёт И-нет трафика.
 Может быть у Вас есть готовый исходник, который можно переделать. Тогда пришлите его пожалуйста на SpiritMS@yandex.ru
 А если нет, то посоветуйте хотя бы, что почитать, чтобы такое можно было написать.
 Заранее СПАСИБО!


 
atruhin ©   (2005-07-14 08:06) [1]

Ищи готовое. Есть бесплатное ПО, если платное обычно до 3000 руб. Собственная разработка обойдется гораздо дороже.


 
selvestr   (2005-07-14 10:27) [2]

> Михаил(Киров)   (14.07.05 03:56)  

Не стоит ! Сам занимаюсь разработкой уже более года , слишком муторно , легче найти бесплатную или кряк к платной

Самые основные это :

1)Locker - Pisoft.ru
2)ClubControl -clubcontrol.ru
3)ClubTimer - ctimer.ru
4)xGhost - http://shteam.sc.ru/acs/

Предпочитаю xGhost самый быстро развивающийся проект , хотя пока ещё не всё там есть, зато есть свой SDK и возможность писать на delphi для него дополнения + автор поддерживает стороних програмистов которые  хотят делать софт

Это не реклама ! Сам просто работаю с ним , многое нравиться , советую просто


 
chili   (2005-07-14 10:42) [3]

Ни чего сложного сам сделал такую программу, дополнил ее функциями которых нет в остальных программах такого типа..

При этом (админский модуль) имеет web интерфейс , всегда могу просмотреть статистику и логи через нет


 
Yanis ©   (2005-07-14 13:32) [4]

Сначала на работу устраиваются, а потом только учиться начинают! Интересно...


 
Kolan ©   (2005-07-14 13:44) [5]


> Yanis ©   (14.07.05 13:32) [4]

А как иначе? Сначала до 60 учить а потом пробовать себя в деле - бред.
Кстати еще с советских времен у нас система образования сильно отличалась от западной. Там в универах готовили узких специалистов. А у нас "широкого профиля" c тем чтобы потом специалистами они становились на производстве...


 
Михаил(Киров)   (2005-07-14 16:44) [6]

Пасиба selvestr! Ты единственный, кто что-то дельное посоветовал!:) Но мне всё же больше нужны исходники, чтобы можно было переделать для конкретного компьютерного клуба. Тем более самому хочется научиться делать чего-то стоящее:)
 Все говорят, что исходников навалом, но никто пока ещё ничего конкретного не посоветовал...
 Параллельно я и сам пытаюсь её написать, но вот столкнулся с одной проблемой: как заблокировать компьютер (а именно мышь и клаву), после того, как кончились время или трафик, с возможностью разблокировки только по сети от серверного приложения. Если у кого-нибудь есть дельные предложения, пишите, буду очень признателен.


 
atruhin ©   (2005-07-14 18:00) [7]

Procedure BlockInput(ABlockInput : boolean); stdcall; external "USER32.DLL";

procedure TMyThread.execute;
begin
 while not Terminated do begin
   sleep(1000);
   setcursorpos(100,100);
   BlockInput(true)
 end;
end;

procedure newlock;
begin
   EnterCriticalSection(CriticalSec);
   if not FlagLock then begin
       flaglock:=true;
      {$ifdef debug} Writeln("!!!!COMPUTER IS LOCK !!!!"); {$endif}
      {$ifndef NoLock}
         if th = nil then th:=TMyThread.Create(false);
      {$endif}
       SendMessage(HMainWindow, WM_COMMAND, CMD_SHOW_WINDOW, 0);
       SendMessage(HMainWindow, WM_SYSCOMMAND, SC_TASKLIST, 0);
   end;
   LeaveCriticalSection(CriticalSec);
end;


 
DiamondShark ©   (2005-07-14 18:04) [8]

Делайте программно-аппаратные решения.
Любое чисто программное решение рано или позно юные дарования снесут.


 
Михаил(Киров)   (2005-07-14 18:40) [9]

atruhin ©, а что надо подключить, чтобы твой код заработал? Откуда взялся TMyThread? Если у тебя есть какие-то стоящие модули или копоненты, то выложи их, пожалуйста.
Тем не менее, всё равно спасибо за оказаное внимание.



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2005.08.07;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.037 c
10-1098798905
}|{yk
2004-10-26 17:55
2005.08.07
Никто не подскажет, почему при передаче в Excel я получаю


1-1121945241
stud
2005-07-21 15:27
2005.08.07
подскажите где ошибка?


1-1121863664
stud
2005-07-20 16:47
2005.08.07
отслеживание изменения каталога


5-1092211388
segor
2004-08-11 12:03
2005.08.07
События свойства компонента


10-1097565795
andrey__
2004-10-12 11:23
2005.08.07
сервис и внешний сервер автоматизсции





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский