Penanganan error visual basic

Malam ini saya akan menulis cara penanganan error visual basic, dalam praktek ini saya menggunakan visual basic 6.0. Penanganan yang akan saya tulis malam ini adalah jika anda memasukkan data yang sama di database, biasanya ketika anda ingin menginputkan data. Pada saat anda membaca tulisan ini saya harap anda sudah belajar cara koneksi ke database. Oke langsung pada contohnya saja.
Disini saya contohkan ingin menyimpan data anggota dan ketika kita memasukkan nomor anggota yang sama akan terjadi error, nah inilah yang akan dibahas:

Private Sub Simpan_Click()
'Memanggil koneksi dari modul
Call buka
'Tulis coding dibawah ini untuk penanganan errornya
sql = "select no_anggota from anggota where no_anggota='" & Text1.Text & "'"
rs.Open sql, konek, adOpenDynamic, adLockOptimistic
If Not rs.EOF Then
MsgBox "Nomor anggota sudah ada", vbInformation, "Pemberitahuan'"
Else
'Simpan data
sql = "insert into anggota values('" & Text1.Text & "','" & Text2.Text & "','" & Text3.Text & "')"
konek.Execute (sql)
End If
End Sub


Semoga bermanfaat....

Teknik mengakses data komputer yang sistem operasinya di password dengan cara menyusup

Bagi anda para orang tua atau seorang kakak yang mempunyai adik yang masih remaja, mungkin sering kali risau dengan pergaulan anak remaja jaman sekarang yang semuanya tidak lepas dari yang namanya teknologi informasi. Sering berpikir, curiga akan apa yang ada dalam laptop anak anda atau adik anda, takut akan serangan 3gp(bahasa kerennya anak jaman sekarang, he.he), gambar-gambar yang tidak senonoh yang bisa mempengaruhi perkembangan si anak. Mungkin jika pc atau laptop si anak tidak di proteksi oleh pasword dari administrator, anda bisa mencuri2 kesempatan untuk mengeceknya. Lalu, bagaimana jika semuanya terkunci..? Nah, itulah fungsi trik ini. Dan trik ini berlaku juga bagi Pc atau laptop yang sudah diproteksi oleh pasword administrator sejak instalasi. Langsung saja pada intinya.., anda bisa memakai versi linux apapun, tapi disini saya menggunakan linux puppy. Teknik ini akan bisa dilakukan jika anda menggunakan live cd atau live usb. Bagi yang ingin segera mempratekkan segeralah download file isonya dan buat menjadi live usb atau live cd, jika ingin simple pakai live usb saja. Setelah anda mempunyai live usb, kemudian anda bisa atur bootingnya di bios. Cukup sekian semoga bisa berguna.