AccessTr.neT

Merhaba,

Ben 2 tablo yaptım Tablo1 ve tablo2. Ve Tablo1 veri girdiğim bir form yaptım aynı forma koyduğum bir metin kutusundaki değeride dahil Tablo2 ye yazmak için bir buton var ve tıklayınca yazıyor.Yapamadığım yazarken aynı Kkodu ile yaptığımda tablo2 ye yeni kayıt atıyor ben aynı kKodu olduğunda eski kaydı güncellesin istiyorum bir türlü yapamadım.
İlginiz için teşekkürler.

ADO ile kayıt ekleme, güncelleme, silme ve yürüyen bakiye örneği linkindeki kodu örneğinize uyguladım. Veritabanına 2 ado referansı ekledim.

strSQL = "SELECT * FROM Tablo2 "

    Set rstkayit = New ADODB.Recordset

    rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

        With rstkayit

        .Find "[KayitNo]=" & "'" & Me![KNo] & "'"

            If Not rstkayit.EOF Then

                .Fields("KayitNo") = Me.KNo

                .Fields("ad") = Me.ad

                .Fields("soyad") = Me.soyad

                .Fields("KSoyad") = Me.KSoyad

                MsgBox ("Tablodaki " & Me.ad & " " & Me.soyad & " isimli kişiye ait veri güncellendi")

                

                .Update

             Else

                .AddNew

                .Fields("KayitNo") = Me.KNo

                .Fields("ad") = Me.ad

                .Fields("soyad") = Me.soyad

                .Fields("KSoyad") = Me.KSoyad

                MsgBox ("Tabloya " & Me.ad & " " & Me.soyad & " isimli kişi eklendi")

                .Update

             End If

        End With

Ayrıca Sorgu yardımı linkindeki sorunuza geri bildirimde bulununuz.

Çok teşekkür ederim. Bu örnek çok işime görecek. Bilginize sağlık.