Coba jawab ya...., ada beberapa cara bapak , mis : buat aja field tsb Primay Key atau buat jadi field dg setting Uniq ( kalau langsung gak mau ada yg double ) atau pakai code mis : Private Sub InputRecord_BeforeUpdate(Cancel As Integer) Dim A A = Dlookup("Record","tblabc","Record=Input.value") If Not Is Null (A) then MsgBox"Maaf , record udah ada" end if End Sub Salam, ~ Sioon ~ --- Pada Rab, 26/1/11, afon stmr <afon_s@yahoo.com> menulis:
|
__._,_.___
No comments:
Post a Comment