Membuat Applikasi Check Local IP Sebelum dijalankan

Setelah Sukses Berbagi Artikel Sebelumnya yakni membuat Applikasi BerHWID pada Raydin Blog Site , Sekarang saya akan Berbagi lagi tentang applikasi Check atau memeriksa Local IP Sebelum Dijalankan  .

1. Buka Microsoft Visual Basic 6.0 , atau Jika sudah punya project anda tinggal menambahkan code - code yang akan saya bagi dalam artikel ini .
2. Buka "Project -> Component ." atau tekan saja "Ctrl + T"
Atau Lihat gambar dibawah ini

3. Tambahkan Winsock kedalam Project anda , simpan ditempat yang anda inginkan.

Berikut gambar contoh form yang akan mengechek local ip sebelum applikasi berjalan

4. Tambahkan Texbox dan atur Texbox tidak terlihat atau ".visible = false"
5. isikan textbox dengan Local IP pada Komputer yang dimana applikasi itu akan berjalan
6. Tambahkan Code ini di form load  (Sebelum Applikasi berjalan maka Akan Check Otomatis Local IP , jika benar akan berjalan jika salah akan tutup secara otomatis)

Private Sub Form_Load() If wsck.LocalIP = Text1.Text Then Form1.Show Else MsgBox "IP Anda Tidak Cocok", vbInformation, "Error" End End If End Sub
Jika Code ini disimpan pada Form Load , Akan Mengecheck Sebelum applikasi berjalan sepenuhnnya
7. Silahkan Compile Applikasi Anda , dan jalankan untuk Percobaan

Jika Mungkin Tutorial Tidak Terlalu Dipahami Silahkan Download Source Codenya dibawah ini :
Download : Check IP Sebelum Applikasi Dijalankan.rar
Silahkan Follow Raydin Blog Site Jika Merasa Posting Kami Berguna

Sumber : http://www.raydin-zu.net/2012/04/membuat-applikasi-check-local-ip.html