Tutorial Code Memproteksi Exe Dengan Ip Public

Buat sebuah form terserah namanya apa.. (default = form1)
buat sebuah webbrowser.. (default = webbrowser1)
buat sebuah kotak text (default = text1.text)
dan sebuah timer dengan interval > 0 (artinya bisa di setting 20, 50 atau terserah)
(default timer1)


cara buat webbrowser dan bagi yang menggunakan vb portable

add component :
microsoft internet control

bagi yang vb portable install licensi ini agar componet vb seperti : microsoft internet control dan lain lain dapat di gunakan..

http://download.microsoft.com/download/v...VB6CLI.EXE

PHP Code:

Private Sub Form_Load()WebBrowser1.Navigate ("http://checkip.dyndns.org/")Timer1.Enabled = True
Timer1.Interval = 20 'contoh interval 20
End Sub

Private Sub Timer1_Timer()
On Error Resume Next
   Text1.Text = WebBrowser1.Document.Body.InnerText
   If Text1.Text = "Current IP Address: XXX.XXX.XXX.XXX " Then
   Form2.Show
   unload form1
   End If
End Sub 

form2 adalah form project yang akan di tampilkan dan terlebih dahulu di proteksi dengan protek IP..

XXX.XXX.XXX.XXX adalah IP yang di terima di letakkan di dalam code selain itu akan di tolak atau program tidak terbuka..

Kita tidak menggunakan inet atau winsock karena harus menggunakan file ocx dan menurut ane akan perlu waktu kalau harus download atau mencari file ocx nya dulu..

Hanya Simple Code Dari Ane..

Ada Pertanyaan Silahkan di Komen..