Cara Mengatasi Run Time Error -2147217887 Multiple-Step Operation Generated Errors Pada Visual Basic 6.0

Cara Mengatasi Run Time Error -2147217887 Multiple-Step Operation Generated Errors Pada Visual Basic 6.0 | Gho Blog's - Buat sobat yang mungkin baru belajar pemrograman Visual Basic 6.0, terkadang bingung saat terjadi error pada program yang sedang dikerjakan.

Setelah beberapa kali saya mendapatkan pertanyaan dari rekan-rekan yang berdiskusi dengan saya tentang masalah yang sama, maka saya angkat pertanyaan tersebut menjadi sebuah posting jika ada sobat lain yang sedang menghadapi masalah ini, mudah-mudahan apa yang saya tulis bisa membantu mengatasi masalah error yang satu.

Biasanya runtime error seperti ini terjadi pada saat kita melakukan entri data melalui form, kemudian compiler akan menunjukkan baris error pada coding. Mungkin sebagian dari sobat akan mengira bahwa ada kesalahan pada coding yang digunakan dan terfokus pada coding tersebut.

Sebenarnya, tidak mutlak kesalah coding yang harus diperhatikan, karena runtime error -2147217887 adalah kesalahan dari setting field size sebuah dari sebuah field pada tabel di database.

Untuk lebih jelasnya, perhatikan gambar berikut ini :

Jika sobat perhatikan gambar diatas, maka terlihat penyebab runtime error -2147217887 disebabkan karena jumlah karakter yang diinputkan melalui form lebih besar dari field size yang ada di tabel.

Penyebab Error :

- Data yang diinputkan = 8 karakter

- Field size = 5 karakter

Cara Mengatasi :

• Perbesar lagi field size yang ada di tabel atau dengan mengganti tipe data yang mampu menampung data lebih besar.
• Jika memang harus 5 karakter (tidak boleh lebih) data yang diinputkan, sisipkan pesan pemberitahuan untuk mengingatkan user bahwa data yang dietriakan terlalu panjang dengan cara menambah coding seperti berikut ini pada tombol Simpan/Save :

Private Sub Command1_Click() '<--- Tombol Save On Error GoTo pesan: [ Letakkan Coding Simpan Disini ] pesan: If (Err.Number = -2147217887) Then MsgBox "Karakter Terlalu Panjang", VbInformation Text1.Text= "" '<-- Kosongkan Textbox yang bermasalah Text1.Setfocus '<-- Tempatkan cursor pada textbox yang bermasalah End If End Sub

Semoga posting ini bisa membantu sobat dalam mengatasi error yang sama. Sekian posting saya yang berjudul Cara Mengatasi Run Time Error -2147217887 Multiple-Step Operation Generated Errors Pada Visual Basic 6.0. Semoga bermanfaat.