AccessTr.neT

Tam Versiyon: Formdan Tabloya Kayıt Yaparken,,silerken Makro Yerine Vba Kodları Kullanımı
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3
(11/10/2018, 21:22)Oğuz Türkyılmaz yazdı: [ -> ]Bu kod satırını kullanarak bir kayıt yapmaya çalıştım doğal olarak beceremedim hata verdi diye yazdım ama sonra başardım , sorum şu tablomda 6 farklı alanım var bu 6 alan için 6 satır yazdım. Fakat bu şekilde her satırı ayrı bir kayıt numarasına kaydetti.  Örnek yazabilirmisiniz formdaki tüm bilgileri tabloda tek satıra kaydetmek için hangi kodu yazmalıyım . Teşekkür ederim.
 Ozan bey sorumu daha sonradan bu şekilde değiştirmiştim. Bir şey değiştirmeme gerek varmı son yazdığınız cevaba istinaden.
DoCmd.RunSQL "INSERT INTO T_001_KISILER ([adi],[soyadi]) VALUES (" & Me.MTN_ADI & ", " & Me.SOYADI & ")"

şeklinde yazdığım kod, ekleme sorgusunun kalıbıdır. 

DoCmd.RunSQL "INSERT INTO 
T_001_KISILER ( T_001_KISILER, veri aktarılacak tablonun adı
[adi], tablodaki alan adı
[soyadi] tablodaki alan adı

VALUES (
" & Me.MTN_ADI & ", tablodaki adi alanına aktarılacak verinin bulunduğu denetimin adı
" & Me.SOYADI & " tablodaki soyadi alanına aktarılacak verinin bulunduğu denetimin adı
)"
(11/10/2018, 22:50)ozanakkaya yazdı: [ -> ]
DoCmd.RunSQL "INSERT INTO T_001_KISILER ([adi],[soyadi]) VALUES (" & Me.MTN_ADI & ", " & Me.SOYADI & ")"

şeklinde yazdığım kod, ekleme sorgusunun kalıbıdır. 

DoCmd.RunSQL "INSERT INTO 
T_001_KISILER ( T_001_KISILER, veri aktarılacak tablonun adı
[adi], tablodaki alan adı
[soyadi] tablodaki alan adı

VALUES (
" & Me.MTN_ADI & ", tablodaki adi alanına aktarılacak verinin bulunduğu denetimin adı
" & Me.SOYADI & " tablodaki soyadi alanına aktarılacak verinin bulunduğu denetimin adı
)"
Kaydet butonuna tıkladığımda aşağıdaki resimler ekrana geliyor ve devamında kaydı gerçekleştiriyor. Bu yazdığınız ekleme sorgusunun kalıbında adı ve soyadı denetim adlarını veriyoruz diğer denetim adlarını bu koddaki hangi ayrıntı ile  devamındaki diğer tcno gsm ve bütün denetimleri kaydetmesini sağlıyoruz.
[Resim: do.php?imgf=153929091016611.jpg]
[Resim: do.php?imgf=1539290910312.jpg]
Sizin uygulamanızdaki kodda sadec adi alanına veri aktarma kodu vardı. Bir önceki mesajımda soyadı alınına da veri aktaran halini mesaj olarak yazdım, ayrıca kodun açılımını da ekledim ve neyin ne olduğunu kırmızı renkle gösterdim. Diğer alanları da aynı şekilde ekleyeceksiniz.

Formun kayıt kaynağında tablo yazılı, denetimlerde de tablodaki alan isimleri belirtilmiş, sizin insert into ile işlem yapmanıza gerek yok,
(12/10/2018, 00:14)ozanakkaya yazdı: [ -> ]Sizin uygulamanızdaki kodda sadec adi alanına veri aktarma kodu vardı. Bir önceki mesajımda soyadı alınına da veri aktaran halini mesaj olarak yazdım, ayrıca kodun açılımını da ekledim ve neyin ne olduğunu kırmızı renkle gösterdim. Diğer alanları da aynı şekilde ekleyeceksiniz.

Formun kayıt kaynağında tablo yazılı, denetimlerde de tablodaki alan isimleri belirtilmiş, sizin insert into ile işlem yapmanıza gerek yok,

DoCmd.RunCommand acCmdSaveRecord 
komutuyla formu tabloya kaydettim devamında hangi komutla formu temizleyip yeni kaydı girebilirim. 
(10/10/2018, 07:31)Oğuz Türkyılmaz yazdı: [ -> ]Kaydı Kaydet - Kaydı Sil - Yeni Kayıt - Formu Kapat - İlk Kayda Git - Son Kayda Git - Önceki Kayıt - Sonraki Kayıt - Formu Kapat 

Kaydı Kaydet: 

DoCmd.RunCommand acCmdSaveRecord


Kaydı Sil: 

DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord


Yeni Kayıt: 
DoCmd.GoToRecord , , acNewRec



Formu Kapat:
DoCmd.Close acForm, "FormAdi"



İlk Kayda Git:
DoCmd.GoToRecord , , acFirst



Son Kayda Git:
DoCmd.GoToRecord , , acLast



Önceki Kayıt:
DoCmd.GoToRecord , , acPrevious

Sonraki Kayıt:

DoCmd.GoToRecord , , acNext


(12/10/2018, 00:42)Oğuz Türkyılmaz yazdı: [ -> ]DoCmd.RunCommand acCmdSaveRecord
komutuyla formu tabloya kaydettim devamında hangi komutla formu temizleyip yeni kaydı girebilirim.
DoCmd.GoToRecord , , acNewRec
Sayfalar: 1 2 3