ForNesia Forum > Coding and Project > Delphi > CLOSED Payload Kampret
ForNesia Forum > Coding and Project > Delphi > CLOSED Payload Kampret

Thread Closed
Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Thread Modes

[Closed] Payload Kampret
ryan-to
Guest
 
Thanks Received: 0
#1
12-28-2013, 07:16 PM (This post was last modified: 01-04-2014, 05:57 AM by suryadewa.)
malam mastah ketawaaa

ane mau tanya nih. ane udh coba buat injek kampret dan udh work.
yang ane mau tanyakan nih di injek ane masih belum banyak proxy yg work, sedangkan ane coba injek org, yg tadinya proxynya gak work di ane tapi di injeknya work :s.

ini payload yg ane gunakan.

Code:
procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var temp : string;

begin

x := x + 1;

if x = 1 then begin
//athread.NetData := '';
mmo1.lines.Add(athread.NetData);
x:=0;
end;

//label1.Caption  := inttostr(x);
if pos('CONNECT',athread.NetData)<>0 then
begin

temp :='GET http://www.bug.com/ HTTP/1.0'#13#10#13#10#13#10#13#10;
athread.OutboundClient.Write( 'GET http://www.bug.com/ HTTP/1.1'#13#10);
athread.OutboundClient.Write('Host: www.bug.com'#13#10);
athread.OutboundClient.Write('Proxy-Connection: Keep-Alive'#13#10#13#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);

athread.netdata := athread.NetData+#13#10#13#10 ;

//sleep(StrToIntDef(edit1.Text, 1000));

end;

kira-kira biar support banyak proxy apa aja perlu di tambahkan ya.
mohon bantuannya mastah Smile
suryadewa Offline
NewBie
*********
Administrators
Posts: 344
Threads: 193
Joined: Oct 2013
Reputation:
FCoin: 165.8ƒc
Thanks Received: 5

Legendary ForNesiaExtreme StaffPromoter
#2
12-28-2013, 09:53 PM
(12-28-2013, 07:16 PM)ryan-to Wrote: malam mastah ketawaaa

ane mau tanya nih. ane udh coba buat injek kampret dan udh work.
yang ane mau tanyakan nih di injek ane masih belum banyak proxy yg work, sedangkan ane coba injek org, yg tadinya proxynya gak work di ane tapi di injeknya work :s.

ini payload yg ane gunakan.

Code:
procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var temp : string;

begin

x := x + 1;

if x = 1 then begin
//athread.NetData := '';
mmo1.lines.Add(athread.NetData);
x:=0;
end;

//label1.Caption  := inttostr(x);
if pos('CONNECT',athread.NetData)<>0 then
begin

temp :='GET http://www.bug.com/ HTTP/1.0'#13#10#13#10#13#10#13#10;
athread.OutboundClient.Write( 'GET http://www.bug.com/ HTTP/1.1'#13#10);
athread.OutboundClient.Write('Host: www.bug.com'#13#10);
athread.OutboundClient.Write('Proxy-Connection: Keep-Alive'#13#10#13#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);

athread.netdata := athread.NetData+#13#10#13#10 ;

//sleep(StrToIntDef(edit1.Text, 1000));

end;

kira-kira biar support banyak proxy apa aja perlu di tambahkan ya.
mohon bantuannya mastah Smile

wah keknya ane ga bisa bantu buat ini ketawaaa kaga ngerti kampret KOWAKOWAKOWA

kalo di source saya sih pake head ..

Code:
//label1.Caption  := inttostr(x);
if pos('CONNECT',athread.NetData)<>0 then
begin

temp :='HEAD http://bug/ HTTP/1.0'#13#10#13#10#13#10#13#10;
athread.OutboundClient.Write( 'HEAD http://bug ipeh/ HTTP/1.1'#13#10);
athread.OutboundClient.Write('Host: bug ipeh'#13#10);
athread.OutboundClient.Write('Proxy-Connection: Keep-Alive'#13#10#13#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);
athread.OutboundClient.Write(#13);
athread.OutboundClient.Write(#10);

athread.netdata := athread.NetData+#13#10#13#10 ;

udah dicoba bagian

Code:
if pos('CONNECT',athread.NetData)<>0 then
begin

CONNECT diubah jadi http atau ditambah seperti coding indosat delpi om ? ketawaaa
[Only registered and activated users can see links Click here to register]
Website Find
ryan-to
Guest
 
Thanks Received: 0
#3
12-29-2013, 01:25 PM
udh ane coba pake HTTP om tetep masih bnyak proxy yg gak konek.
ok ane coba uwik-uwik lagi.
makasih sarannya om ketawaaa
  
Thread Closed