Formdan iki ayrı tabloya veri gönderme

[fatihsun]

Bir formdan iki ayrı tabloya giriş yapmak istiyorum. Butona basınca 1. tabloya kaydetsin birdaha basınca 2. tabloya kaydetsin ve 3. defa tıklayınca heriki tablonun verilerinide formda göstersin.
Bir örnek hazırladım.
Buton:Komut44
Form: Arıza Listesi
1.Tablo: Arıza Listesi
2.Tablo: Diğer Listesi

 

[akd]

Merhaba sayın fatihsun
ben giderler tablosuna kaydeden kodu yazdım sen artık digerlerini yaparsın
gördügün gibi en basitce böyle

Dim Re As DAO.Recordset
Set Re = CurrentDb.OpenRecordset("giderler")
Re.AddNew
Re![Tarih] = Me.Tarih
Re![Aciklama]= Me.FirmaAdi
Re![Miktar] = Me.Ödenen
Re.Update
Set Re = Nothing

 

[fatihsun]

Merhaba akd
Dediğin şekide kodları girdim fakat butona basmamla beraber daha ilk satırda hata verdi "User-defined type not defined". Zaten Dim Re As ... yazdıktan sonra otomatik çıkan listenin içerisinde DAO bulunmuyor.
Zahmet olmazsa gönderdiğim örnek içerisinde kodu yazıp çalıştırabilir misiniz?

 

[kadirdursun]

bende denedim ama hata verdi

 

[kadirdursun]

Cevap Yok Yapamadim HenÜz

 

[modalı]

Bu referans ekiklipi hatası gibi görünüyor.

Referansları kontrol edip Microsoft DAO 3.6 Library referansının olup olmadığını kontrol edin.

İyi çalışmalar

 

[kadirdursun]

nerden kontrol ediliyorki?

 

[modalı]

Herhangi bir formun kod yazma penceresini açın. Menü çubuğundan Tools menüsünü bulun en üste Referances... ı tıklayıp Referans penceresini açın.

İyi çalışmalar

 

[fatihsun]

Evet Kodların yazıldığı pencerede Tools->References->Microsoft DAO 3.6 Object Library çek edip OK deyince söylediğiniz gibi artık
Dim Re As DAO.Recordset
Set Re = CurrentDb.OpenRecordset("Arıza Listesi")
Re.AddNew
Problem çıkarmadı.
Fakat
Re![Tarih] = Me.Tarih -> "Me."den sonra açılan listedede Tarih'i bulamıyor. Bu sorunu nasıl aşacağız. Mümkünse örnek dosya üzerinde yapabilirmisiniz.

 

[kadirdursun]

sayın modalı yardımınıza ihtiyacım var

Sayin Modali
Tek Formdan İkİ Tabloya Verİ GİrİŞİnİ HenÜz Yapamadim.
Ekde UĞraŞtiĞim Ufak Bİr Örnek Var. Tablo1 Adli Formdan YaptiĞim GİŞlerİ Hem Tablo1 Hemde Tablo2 Ye Nasil Kaydederİm.

Form Üzerİnden Kayitlarda DeĞİŞİklİk Yaparsam Her İkİ Tabloyada Bu DeĞİŞİklİk Yansimali.

Tablolara Kaydi Buton Yardimiyla DeĞİlde Formun Olaylarini Kullanarak Yapabİlİr Mİyİz?

 

[modalı]

Sayın kadirdursun,

Aynı bilgileri neden iki ayrı tabloda kaydetmeye çalışıyorsunuz anlayamadım. Veritabanı mantığına aykırı bu dediğiniz. Sadece ID nolar yeterli bu iş için. İki alanı ilişkilendirdikten sonra istediğiniz bilgileri istediğiniz şekilde kullanabilirsiniz.
Gerekli değişiklikleri yaptım lütfen veritabanını inceleyin. İlişkiler, ana çubukta sondan üçüncü düğüme.

İyi çalışmalar

 

[kadirdursun]

sayın modalı
benim asıl yapmak istediğim şu;
müşteri alış ve satışlarının tutulduğu bir access de müşteri ödemelerini başka bir tabloya aktarmak ve bu aktardığım tablodanda mağazanın çıkışlarını yapmak. böylece mağazaya toplam giren ve mağazadan çıkan parayı takip etmiş ve kasada ne kadar kaldığını görmüş olucam.

ekte böyle bir örnek var. "BORÇ ÖDEME TABLOSU" formunu kullanarak yazacağım ödemelerin hem "BORÇ ÖDEME TABLOSU" hemde "KASA" tablosuna kaydolmasını istiyorum böylece kasa tablosundan çıkış yapınca (kira, faturalari personel gideri vs.) elime ne kadar para gelmiş ne kadar kalmış görücem.

yada bunun başka yolu var mı?.......

 

[fatihsun]

Evet Kodların yazıldığı pencerede Tools->References->Microsoft DAO 3.6 Object Library çek edip OK deyince söylediğiniz gibi artık
Dim Re As DAO.Recordset
Set Re = CurrentDb.OpenRecordset("Arıza Listesi")
Re.AddNew
Problem çıkarmadı.
Fakat
Re![Tarih] = Me.Tarih -> "Me."den sonra açılan listedede Tarih'i bulamıyor. Bu sorunu nasıl aşacağız. Mümkünse örnek dosya üzerinde yapabilirmisiniz.

Ne yapmam gerekiyor?