Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

"шифруемся" в 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;
Скачать: CL | DM;

Наверх




Память: 0.52 MB
Время: 0.037 c
1-1089797743
hgd
2004-07-14 13:35
2004.07.25
Как записать звук и представить его в виде графика?


8-1083904486
nkoleda
2004-05-07 08:34
2004.07.25
Информация в примечании Excel


3-1088681917
Sir John
2004-07-01 15:38
2004.07.25
Передача структуры таблицы


3-1088935800
white
2004-07-04 14:10
2004.07.25
Как создать БД с другим именем пользователя и паролем?


9-1080627452
Goida
2004-03-30 10:17
2004.07.25
Пересечение луча и "какой-то" фигуры...