Polsofttaki Genel isimli Modülü kendi uygulamana al.

referanslara da
"Microsoft ADO Ext..........." ve
"Microsoft ActiveX Data Object..........."
referanslarını ekle.

teşekkürler deneyeceğim hocam iyi akşamlar

iyi akşamlar değerli üstadlar
ekte sunduğum resimdede görüldüğü gibi diyelim işyeri kaydını açılan kutudan açıp seçtiğimde bana bu kaydın daha önce girildiğini söyeyerek mükerrer kaydı engellemek için tekrar başa dönüyor forumu inceledim ama bulamadım ben mükerrer kaydı engelemekle birlikte o işyerine ait bilgilerin getirilmesini istiyorum.
If ISYERIADI = Dlookup ("[ISYERIADI]", "[TBLISYERRLERI]", "[ISYERIADI]=forms![FRMISYERLERI]!ISYERIADI") Then

MsgBox "BU KAYIT DAHA ÖNCE GİRİLMİŞ ", vbOKOnly, ".........................."
Undo
Else
End If
ayrıca böyle bir yöntemin olmadığınıda belirtmek isterim
Private Sub Form_Current()
Me.Metin1 = musterino.Column(1)
Me.Metin2 = musterino.Column(2)
Me.Metin3 = musterino.Column(3)

End Sub

Private Sub musterino_AfterUpdate()
Me.Metin1 = musterino.Column(1)
Me.Metin2 = musterino.Column(2)
Me.Metin3 = musterino.Column(3)

iyi geceler üstadlar kendim sorunumu hallettim teşekkür ederim. resmi ektedir merak edenler resmi inceleyebilir. yaşasın azmin zaferi...

Sn.abdulvahap
Başarılarınızın Devamını Dilerim.

çok teşekkürler hocam accesstr.net sayesinde balık tutmayı öğreniyorum ve inanının emeğimin karşılığını aldığım için mutluyum.