Kemungkinan di form event on current

Coba dibuat seperti ini.

Private Sub Form_onCurrent
          With subformName
                If not me.newrecord then
                     .LinkMasterField=Field1 -->ganti dgn nama kontrol yang
berhubungan
                     .LinkChildField=Field1  --> ganti dgn nama kontrol yang
berhubungan
            else
                     .LinkMasterField="" -->ganti dgn nama kontrol yang
berhubungan
                     .LinkChildField=""  --> ganti dgn nama kontrol yang
berhubungan                    
                Endif
        End with

End sub

Silahkan dicoba ya..., mudah2-an benar.


Salam Hangat dan Jabat Erat
Murid Belajar Access
 
 
EdyWiyono
 
 

From: [email protected] [mailto:[email protected]]
On Behalf Of epilambret
Sent: Tuesday, July 20, 2010 12:13
To: [email protected]
Subject: [belajar-access] hide error message

  
mohon di share bagaimana mendisable pesan error yang keluar. misalnya :

pada waktu mau close main form yg di ambil dari query form header dan detil
(pake subform) kadang muncul pesan seperti ini?

the microsoft jet database enggine canot find a record in table 'table1'
with key matching field(s) 'table2'

kalau di subform ada nilai sih, tidak akan muncul error ini. sy sudah coba
dengan menggunakan cancel event pada onclose tapi mungkin kurang mumpuni
code vba nya? maklum! :)

mohon bagaimana caranya. atau mungkin ada cara lain supaya relasional tabel
nya benar2 pas. atau saran bagaimana cara membuat form sub form menjadi
lebih bersih dan aman dari peringatan error. 

terima kasih

Kirim email ke