Форум: "Сети";
Текущий архив: 2004.07.25;
Скачать: [xml.tar.bz2];
Вниз
"шифруемся" в net send Найти похожие ветки
← →
arp (2004-04-28 16:51) [0]Люди знающие, как отправить сообщение net send"ом так что бы имя отправителя не было показанно
← →
Rouse_ © (2004-04-28 23:29) [1]Через Net Send никак...
← →
Anatoly Podgoretsky © (2004-04-28 23:37) [2]А зачем прячешься, получатель вправе знать своих героев.
← →
TButton © (2004-04-29 04:38) [3]мне таких "шифрованых" месагов за час работы в инете штук *цать приходит. и откуда вы только беретесь на мою голову =(
← →
arp (2004-04-29 09:35) [4]да в сети кто то балуется тем что присылает net send не определяющий отправителя. вот хочу узнать как таких можно выловать и как вообще они это делают
← →
Smithson © (2004-04-29 10:45) [5]И здесь скажу - LanGuard посмотри :) Хотя как он это делает - не знаю, не копал.
← →
arp (2004-04-29 11:44) [6]Smithson не подскажешь ссылку? ввиду того что не имею времени искать это по сайтам
← →
arp (2004-04-29 12:03) [7]Скачал программу LANguard. Все по англиски:-)). предстоит долго и муторно разбираться как там что
← →
Rouse_ © (2004-04-29 12:52) [8]> вот хочу узнать как таких можно выловать и как вообще они
> это делают
Для этого они используют NetMessageBufferSend или мэйлслоты...
← →
arp (2004-04-29 14:03) [9]> Для этого они используют NetMessageBufferSend или мэйлслоты...
а поподробнее можно про это? как-нибудь с этим можно бораться не отключая службу сообщений?
← →
Rouse_ © (2004-04-29 16:02) [10]> а поподробнее можно про это?
Поподробней как посылают или как бороться?
Если про бороться то отключить
← →
arp (2004-04-29 19:24) [11]Ну модно подробно и как отсылаются. Хотелось бы знать.
Отключить не могу эту службу. Нужна она обязательно (такое желание у начальства). А вот всякие пользуются наверно таким кодом (или чем то подобным):
while (true) do
begin
WinExec("NET SEND 192.168.0.1 Атака",SW_SHOW);
sleep(100);
end;
и просто достали.
← →
Lena19 (2004-04-29 20:55) [12]не зажал бы мыло далаб исходник
← →
Iks © (2004-04-29 21:01) [13]>Lena19
>не зажал бы мыло далаб исходник
а что исходный код слабо выложить ???
← →
Lena19 (2004-04-29 21:13) [14]не слабо
мето на сервере жалко занимать
и скорее всего его удалят так как он весьма фнушительных размеров
а вырезать из проекта кусок кода лениво а так весь исходник дам
← →
Rouse_ © (2004-04-29 22:23) [15]Код отправки приводился уже сотни раз, эта тема настолько уже изжована. Если лень искать, то ничего, я сам поищу, не гордый...
http://delphimaster.net/view/6-1083084021/
← →
arp (2004-04-30 08:10) [16]Rouse_ © по тому адресу куда ты отпавил (http://delphimaster.net/view/6-1083084021/) не работает эта функция. Кстати я уже давно это хотел сказать:-)). Вот. Она безусловно совершает какие то действия, только все эти действия ни к чему хорошему не приводят.
Может это конечно касячу я, но пару людей пробовали тоже и у них она тоже не работала.
← →
BiN © (2004-04-30 09:37) [17]Может это конечно касячу я, но пару людей пробовали тоже и у них она тоже не работала.
LOL
Это что, те люди которые пользуются кодом из [11]?
← →
Rouse_ © (2004-04-30 09:38) [18]ну попробуй вот этот код, тот я не проверял:
const
NetApi32 = "NetApi32.dll";
function NetMessageBufferSend(
servername:PWideChar ;
msgname:PWideChar ;
fromname:PWideChar ;
buf:PWideChar ;
buflen:DWORD):DWORD;stdcall;
var
Form1: TForm1;
implementation
function NetMessageBufferSend; external NetApi32 name "NetMessageBufferSend";
{$R *.dfm}
Function SendLanMessage(FromName,ToName:String;Text:String):Boolean;
Var
RName,TName,HostName: LPCWSTR;
buf: Pointer;
size: Integer;
Begin
Result:=True;
HostName:=nil;
size := SizeOf (WideChar) * Length (FromName)+1;
GetMem (RName, Size);
RName :=StringToWideChar (FromName, RName, Length (FromName)+1);
size := SizeOf (WideChar) * Length (ToName)+1;
GetMem (TName, Size);
TName :=StringToWideChar (ToName, TName, Length (ToName) + 1);
size := SizeOf (WideChar) * Length (text)+1;
GetMem (buf, Size);
try
PWideChar (Buf) := StringToWideChar (text, buf, Length (text) + 1);
If NetMessageBufferSend (HostName, rname, tname, buf, size) <> NO_ERROR
then Result:=False;
finally
FreeMem(buf);
if assigned(TNAME) then FreeMem(TName);
if assigned(RNAME) then FreeMem(RName);
if assigned(HOSTNAME) then FreeMem(HOSTNAME);
end;
End;
но если и этот не работает, то тогда ты точно косячишь :)
← →
BlackTr (2004-04-30 09:38) [19]А че не работает то ?
Вот счас попробовал, все замечательно работает
← →
arp (2004-04-30 09:53) [20]Rouse_ © вот этот код теперь и правда работает.
А тот не работает не известно почему.
← →
BlackTr (2004-04-30 14:25) [21]Там нужно было указать 3 параметр From
← →
Lamer2004 (2004-05-01 21:13) [22]Удалено модератором
Примечание: Личная переписка
← →
Lamer2004 (2004-05-02 14:42) [23]Удалено модератором
Примечание: Задай свой вопрос с своей ветке и еще одна наппадка на модератора и тогда придется задуматься
← →
RedCow (2004-05-10 19:17) [24]С NetMessageBufferSend всё просто. Вот кто бы сказал, как всему домену мессагу этим путём отправить ??? Как делает Net send * Message ... Localhost как имя отправителя воспринимается, LocalDomain почему-то нет :))
← →
pasher (2004-05-27 01:31) [25]С NetMessageBufferSend всё просто. Вот кто бы сказал, как всему домену мессагу этим путём отправить ??? Как делает Net send * Message ... Localhost как имя отправителя воспринимается, LocalDomain почему-то нет :))
Очень легко:
NET_API_STATUS NetMessageBufferSend(
LPTSTR servername,
LPTSTR msgname,
LPTSTR fromname,
LPBYTE buf,
DWORD buflen
);
В параметре LPTSTR msgname пишешь имя машины,с символом
"*" на конце.
← →
SammIk © (2004-05-27 10:02) [26]http://logid.narod.ru/PopUp.zip
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2004.07.25;
Скачать: [xml.tar.bz2];
Память: 0.51 MB
Время: 0.037 c
