Seharusnya code trapping errornya ditaruh sebelum proses penampilan data
dari database, dengan begitu error bakal keblok oleh code kita.
On 8/30/06, arif ipul <[EMAIL PROTECTED]> wrote:
>
> dear miliser
>
> Saya punya masalah ni...
> saya lagi bikin program di kampus aku. untuk
> memudahkan, berikut petikan kode program yang ada :
>
> Private Sub TxtStambuk_KeyPress(KeyAscii As Integer)
> If KeyAscii = vbKeyReturn Then
> DtMahasiswa.Recordset.FindFirst "stambuk = '" +
> TxtStambuk.Text + "'"
> LblStambuk.Caption = DtMahasiswa.Recordset!STAMBUK
> LblAlamat.Caption = DtMahasiswa.Recordset!alamat
> LblTtl.Caption = DtMahasiswa.Recordset!ttl
> ImgFoto.Picture = LoadPicture("C:\......\" &
> TxtStambuk.Text + ".jpg")
> dst..
> If DtMahasiswa.Recordset.NoMatch Then
> MsgBox "Data yang Anda cari tidak ditemukan,
> Periksa kembali Nomor Stambuk yang Anda masukan",
> vbOKOnly + vbInformation, "Konfirmasi"
> dst...
> end if
> end if
>
> perintah diatas adalah perintah untuk menampilkan data
> mahasiswa beserta foto masing2, masalahnya adalah
> ketika nomor stambuk yang diimput salah atau belum
> ada, programnya g mau jalan dengan informasi bahwa
> database tidak ditemukan.
> pertanyaan saya ada bagaimana listing yang akan saya
> dibuat agar penolakan setara dengan listing :
>
> If DtMahasiswa.Recordset.NoMatch Then
> MsgBox "Data yang Anda cari tidak ditemukan,
> Periksa kembali Nomor Stambuk yang Anda masukan",
> vbOKOnly + vbInformation, "Konfirmasi"
> dst...
> end if
>
> Saya mohon bantuannya......
>
> Wasallam
>
> __________________________________________________
> Do You Yahoo!?
> Tired of spam? Yahoo! Mail has the best spam protection around
> http://mail.yahoo.com
>
>
[Non-text portions of this message have been removed]
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Bagi terjangkit virus lokal, zip virus tersebut
dan kirim ke [EMAIL PROTECTED], kami
akan membuat removalnya untuk anda.
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
