[wawancr7]

ini apa yang kurang ya gan,ane liat di source orang gini

Spoiler:

procedure TForm1.R1Click(Sender: TObject);
var
route: string;
begin
route:= '/C route add 0.0.0.0 mask 255.255.255.255 '+SPY.LocalIP;
ShellExecute(0, nil, 'cmd.exe', PChar(route), nil, SW_HIDE);
ShowMessage('Routed Success Om '+SPY.LocalIP);
end;

[harvien29]

ini apa yang kurang ya gan,ane liat di source orang gini

Spoiler:

procedure TForm1.R1Click(Sender: TObject);
var
route: string;
begin
route:= '/C route add 0.0.0.0 mask 255.255.255.255 '+SPY.LocalIP;
ShellExecute(0, nil, 'cmd.exe', PChar(route), nil, SW_HIDE);
ShowMessage('Routed Success Om '+SPY.LocalIP);
end;

SS error'a Dong Om...
itu penulisan sih Udah Bener...

[wawancr7]

SS error'a Dong Om...
itu penulisan sih Udah Bener...

error sih gak ada gan,bahkan berhasil di clik tombol routenya,tapi gak ngefek,jadi.y d route pake pnya orang

[suneo_honekawa]

SS error'a Dong Om...
itu penulisan sih Udah Bener...

error sih gak ada gan,bahkan berhasil di clik tombol routenya,tapi gak ngefek,jadi.y d route pake pnya orang

coba tool injeknya di run as om

trus coba di route

[wawancr7]

coba tool injeknya di run as om

trus coba di route

udah gan,tetap gitu,bitvise melaju kencang

[kasara]

WinExec(PChar('route.exe add IP.OPSEL mask 255.255.255.255 ' + GetIPAddress), SW_HIDE);
end;
Cba gitu ga pake run as bsa kayanya

[harvien29]

coba tool injeknya di run as om

trus coba di route

udah gan,tetap gitu,bitvise melaju kencang

[Image: Screenshot_5.png]

[wawancr7]

[Image: Screenshot_5.png]

kayak.y di bagian itunya deh,soalnya blum ane ganti om
Masalah dah beres....

[harvien29]

[Image: Screenshot_5.png]

kayak.y di bagian itunya deh,soalnya blum ane ganti om
Masalah dah beres....

Jangan Lupa Cendolnya Om...

[ForNesiaFreak]

wah baru mau ikutan kasih solusi . telat ane .. ok solved