Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.04.2012, 13:01   #11
vasa01
Пользователь
 
Регистрация: 29.03.2012
Сообщений: 36
По умолчанию

Цитата:
Сообщение от p51x Посмотреть сообщение
"просто взять файл с паролями" уже попадает под несколько статей УК РФ...
Это конечно понятно!!!! но мы конкретно не говорим о ком то!!!! просто програмку напесать это ещё не значит что кого то обезательно заразить нада!!! я думаю что никто не скачает файл темболее у незнакомого человека!!!! впарить файл конечно можно !!! но это уже другая история!!! а просто програмку иметь не запрешено!!! темболее что не в злых умыслях его делаеш.... Просто песать интересно и дорабатывать его...

http://for.easyforum.ru вот тут зато можно найти такие интересные темы!




................................

Последний раз редактировалось vasa01; 28.04.2012 в 14:10.
vasa01 вне форума Ответить с цитированием
Старый 28.04.2012, 16:55   #12
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,709
По умолчанию

"просто написать програмку" - создание вредоносного ПО - статья
"дать ее вам или кому-то еще поиграться" - создание и распространение вредоносного ПО - статья
"научить вас или написать с вами" - тоже, что и выше + группой лиц по предварительному сговору

+ можно добавить несанкционированный доступ и т.д.
p51x вне форума Ответить с цитированием
Старый 28.04.2012, 18:17   #13
phphel
Форумчанин
 
Аватар для phphel
 
Регистрация: 12.07.2010
Сообщений: 249
По умолчанию

Код:

function GetSpecialPath(CSIDL: Word): string;
var
   s: string;
begin
   SetLength(s, MAX_PATH);
   if not SHGetSpecialFolderPath(0, PChar(s), CSIDL, True) then
   s := '';
   Result := PChar(s);
end;

APPDATA:=GetSpecialPath(CSIDL_APPDATA);
FireFox:
APPDATA +'\Mozilla\Firefox\Profiles\' +'My_Profile'+cookies.sqlite (cookies.txt)
Opera:
APPDATA +'\Opera\Opera\cookies4.dat');
Chrome:
APPDATA+'\Google\Chrome\User Data\Default\'+'Cookies';
Safari:
APPDATA +'\Apple Computer\Safari\Cookies\'+'Cookies. plist';

Больше и правда уже будет "запрещенно" ) Повод для размышления дал, дальше сам...
Moonquake

Последний раз редактировалось phphel; 28.04.2012 в 18:22.
phphel вне форума Ответить с цитированием
Старый 30.04.2012, 18:06   #14
vasa01
Пользователь
 
Регистрация: 29.03.2012
Сообщений: 36
По умолчанию

Цитата:
Сообщение от phphel Посмотреть сообщение
Код:

function GetSpecialPath(CSIDL: Word): string;
var
   s: string;
begin
   SetLength(s, MAX_PATH);
   if not SHGetSpecialFolderPath(0, PChar(s), CSIDL, True) then
   s := '';
   Result := PChar(s);
end;

APPDATA:=GetSpecialPath(CSIDL_APPDATA);
FireFox:
APPDATA +'\Mozilla\Firefox\Profiles\' +'My_Profile'+cookies.sqlite (cookies.txt)
Opera:
APPDATA +'\Opera\Opera\cookies4.dat');
Chrome:
APPDATA+'\Google\Chrome\User Data\Default\'+'Cookies';
Safari:
APPDATA +'\Apple Computer\Safari\Cookies\'+'Cookies. plist';

Больше и правда уже будет "запрещенно" ) Повод для размышления дал, дальше сам...
Благадарю!!!!
vasa01 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц