Helpline Multy
Helpline Multy
Helpline Multy
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Helpline Multy

Silahkan Bergabung Diforum Helpline Multy mig33
 
IndeksIndeks  PencarianPencarian  PendaftaranPendaftaran  LoginLogin  
Dimohon Semua Member Yang Mau Upload Di hiden Filenya Bikin KTP dulu Di Forum Helpline Multy
Login
Username:
Password:
Login otomatis: 
:: Lupa password?

 

 Sample Login Mig33

Go down 
PengirimMessage
Admin
Admin
Admin


Jumlah posting : 15
Join date : 06.09.11
Age : 30
Lokasi : boyolali

Sample Login Mig33 Empty
PostSubyek: Sample Login Mig33   Sample Login Mig33 Icon_minitimeThu Oct 20, 2011 11:49 pm

Setelah Membuka Project Bru di vb silahkan tambahkan component sebagai brikut :
bisa dengan cara menekan Ctrl T atau : menu > Project > Components

code:
1. microsoft winsock control sp6
itu aja dlu Sample Login Mig33 228276

tambahkan 1 buah modul di project kamu
isi dengan ini :
Spoiler:
pada form aplikasi nya msukkan :
1 winsock
1 command button
6 textbox

beri nama variabel di bagian properties :
Quote:
Spoiler:
isi txtIP = gateway.mig33.com
isi TxtPort = 9119


NB :
nama variabel silahkan rubah sesuai keinginan sendri Sample Login Mig33 228276 cman pda tutorial ini kita menggunakan nama itu

pada bagian paling atas coding form nya isikan :
Code:
Option Explicit
Spoiler:
tambahkan sub ini juga di form nya :
Spoiler:

yg di atas sudah siap blom ???? :ehm: klw sudah ya kita lanjud proses selanjudnya Sample Login Mig33 228276

sekarang yg kita butuhin adalah pket mig33 nya Sample Login Mig33 228276
cara mendapatkan paket mig33 sangad mudah Sample Login Mig33 228276
tool yg di butuhkan adalah sniffing tool semacam > WPEpro
untuk mendapatkan wpepro silahkan akses site : wpepro.net atau search di 4shared Sample Login Mig33 228276

NB :
matikan antivirus anda seblum mendownload dan menggunakan wpe pro Sample Login Mig33 228276

klw wpepro nya dah siap ok mari kita lanjud proses perekaman paket nya Sample Login Mig33 228276

buka mig33 via sjboy kalian
sebelum login harap di WPEpro nya tlah di set sjboy sebagai target nya dan telah menekan proses perekaman

klw sudah terset ya silahkan di login aja sjboy nya Sample Login Mig33 579577
wpe akan merekam setiap aktifitas masuk dan kluar dari server mig33

klw sudah ya silahkan di stop proses merekam nya Sample Login Mig33 228276

hasil tangkapan saya kali ini menggunakan :

id : alex_bin_co
pass : monyetliar27


HANYA Contoh diatas

hasil Login paket tangkapan :
02 00 C8 00 03 00 00 00 86
00 13 00 00 00 01 00 00 10 00 00 00 04 00 00 00 15 00 0F 00 00 00 05 65
6E 2D 55 53 00 0D 00 00 00 04 00 00 00 A9 00 0C 00 00 00 04 00 00 00 AA
00 0B 00 00 00 04 00 00 00 0E 00 09 00 00 00 01 01 00 08 00 00 00 04 6A
32 6D 65 00 07 00 00 00 0D 4A 32 4D 45 76 34 2E 32 30 2E 32 39 30 00 05
00 00 00 0B 65 77 69 6E 6B 5F 63 61 6B 65 70 00 03 00 00 00 02 01 A4 00 02 00 00 00 01 02 00 01 00 00 00 02 00 01[/b]

NB COLOR :
orange : Panjang Paket keseluruhan
yellow : panjang ID yg digunakan
cyan : nama ID yg digunakan

mari kita buat menjadi public function paket ini

kembali ke project di VB anda Sample Login Mig33 228276
buat 1 modul baru lgi pda project yg tdi Sample Login Mig33 228276

dan isi ini :
Code Copy Paste ya study :
public function LogIn(username as string)
LogIn
= hextoascii("02 00 C8 00 03 " & dectohexfull(len(username) + 123)
& " 00 13 00 00 00 01 00 00 10 00 00 00 04 00 00 00 15 00 0F 00 00
00 05 65 6E 2D 55 53 00 0D 00 00 00 04 00 00 00 A9 00 0C 00 00 00 04 00
00 00 AA 00 0B 00 00 00 04 00 00 00 0E 00 09 00 00 00 01 01 00 08 00 00
00 04 6A 32 6D 65 00 07 00 00 00 0D 4A 32 4D 45 76 34 2E 32 30 2E 32 39
30 00 05 " & dectohexfull(len(username)) & " " &
asciitohex(username) & " 00 03 00 00 00 02 01 A4 00 02 00 00 00 01
02 00 01 00 00 00 02 00 01")
end function
itu hasil setelah disusun Sample Login Mig33 228276
dectohexfull(len(username) + 123) < ??? ini tdi yg au warnain orange Sample Login Mig33 228276
lah ??? trus darimana angka 123 ???
00 00 00 86 < dlam decimal berarti = 134
alex_bin_co < panjang nya 11 Sample Login Mig33 228276 itung aja klw gag percaya Sample Login Mig33 846728
134 - 11 = 123 Sample Login Mig33 228276

dectohexfull(len(username)) < ??? ini yg pketnya ta ksih warna yellow Sample Login Mig33 228276
dah pada tau pastinya dia ngitung apa :pote:

asciitohex(username) < ??? ini yg pket nya tdi ta ksih warna cyan Sample Login Mig33 228276
artinya karakter : alex_bin_co di convert ke dlam HEX Sample Login Mig33 228276

OK lanjud di project nya lgi Sample Login Mig33 579577

pda command button CmdLogin Isi code ini :
Code Copy Paste ya study :
Private Sub CmdLogin_Click()
Winsock1.Close
Winsock1.Connect TxtIp, TxtPort
TxtStatus.Text = "Connecting..."
End Sub
Trus pda event wisock close isikan seperti di bawah ini:
Code Copy Paste ya study :
Private Sub Winsock1_Close()
TxtStatus.Text = "Winsock Closed"
End Sub
di event winsock connect isikan ini :
Private Sub Winsock1_Connect affraid
Code Copy Paste ya study :
TxtStatus.Text = "Connected..."
Winsock1.SendData LogIn(TxtUname.Text)
End Sub
si event winsock dataarrival isikan ini :
Code Copy Paste ya study :
Spoiler:
SELESAI DAH SAMPLE NYA WALOPUN CUMAN HANYA LOGIN DUANK cheers slamat cheers
HASILNYA SEPERTI INI KIRA KIRA
SILAHKAN DI KEMBANGKAN LAGI !!!!

PUYENG GAG ?????????
kalau puyeng Donlod project sample nya dsni AJA goblok km :
gak terima gw katain goblok pvt id gw alex_bin bounce

REP dulu Baru Sedot Razz Razz Razz Razz
Kembali Ke Atas Go down
https://helplinemulty.indonesianforum.net
 
Sample Login Mig33
Kembali Ke Atas 
Halaman 1 dari 1

Permissions in this forum:Anda tidak dapat menjawab topik
Helpline Multy :: KOMPUTER :: Programer-
Navigasi: