Formdan tabloya kayıt

30/05/2015, 21:53

huseyinkoc

Data çok büyük olduğu için basit bir örnek koydum. Yapmak istediğim başka bir yerden açtırdığım FVadeHesaplama tablosundaki Toplam Vade Farkı yazan metin kutusundaki değeri kapat butonuna basınca TCari tablosundaki o müşteri ismindeki kayıtta vade_fark yazan yere değeri atması. Yardımlarınız için şimdiden teşekkür ederim.

[attachment=22738]
30/05/2015, 23:52

ozanakkaya

Referanslara "Microsot ActiveX Data Objects 2.8 Library" referansını ekle

Kapat butonunun tıklandığında olayına aşağıdaki kodu ekle

strSQL = "SELECT * FROM TCari "

   Set rstkayit = New ADODB.Recordset
   rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
       With rstkayit
       .Find "[ad_soyad]=" & "'" & Me![Metin22] & "'"
           If Not rstkayit.EOF Then
               .Fields("vade_fark") = Me.Toplatop
               .Update
            End If
       End With

bu kod eklediğiniz örnekte çalışır, kendi uygulamanızda formdaki denetim adları farklı ise düzenleme yapmanız gerekiyor. 

Ayrıca, form açıldığında müşteri adını forma nasıl aktarıyorsunuz bilmiyorum ama müşteri adı ile birlikte musteri id numarasını da aktarmanız gerekli, aynı isimli birden fazla müşteri olabilir.

Tablonuz ile ilgili olarak, 
1-) tabloya "not" adında alan eklemeyiniz, kodlama sırasında not problem yaratır.
2-) ad_soyad alanına birincil anahtar eklemişsiniz, birincil anahtarı ID alanına eklemelisiniz.
31/05/2015, 00:08

huseyinkoc

sevgili ozanakkaya çok teşekkür ederim. Süper oldu sağolasın.