Merhaba Arkadaşlar İlişkisiz metin kutusundan tabloya veri aktarmak istiyorum.
Örneğin FaturaDetay Formu Yekun metin kutusundan FaturaDetay Tablosundaki Yekun sütununa veri aktarmak istiyorum. Nasıl bir kod yazmam gerekiyor.
buton ekleyiniz ve
DoCmd.RunSQL "INSERT INTO [FaturaBilgisi](Tutari) VALUES ('" & Yekun & "')"
DoCmd.SetWarnings True
kodunu deneyiniz
Hocam Kodu kaydet butonuna ekledim. Aktarma yapmadı. Kodu eklediğim örnek dosyama uygularmısınız.
(18/01/2018, 21:56)m_demir yazdı: Hocam Kodu kaydet butonuna ekledim. Aktarma yapmadı. Kodu eklediğim örnek dosyama uygularmısınız.
yekün kısmına hiçbir değer atayamıyorum bu nedenle deneyemiyorum
kodu
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO [FaturaBilgisi](Tutari) VALUES ('" & Yekun & "')"
DoCmd.SetWarnings True
bu şekilde tekrar deneyiniz
Hocam aktarma yapmıyor.
Hocam FaturaDetay Formu Yekun metin kutusundan, FaturaDetay Tablosundaki Yekun sütununa veri aktarmak istiyorum.
Koda FaturaBilgisi Tutari ibaresi geçiyor.
Merhaba,
FaturaGiris isimli form üzerinden veri girişi yapıldığında ve formdaki alt forma veri girildiğinde yekun metin kutusundaki değer faturadetay tablosuna aktarılabilir.
Ancak, formda iki satıra veri girince yekün metin kutusuna bu satırların toplamını aktarıyor. Aynı zamanda Faturadetay tablosuna 2 satır ekleniyor.
Yekun alanındaki veri faturaid değerleri aynı olduğu için bu iki sütundaki alana da aktarılır.
Altformda, ArtiKdv ve KvdDahil butonlarının tıklandığında olaylarındaki (iki farklı buton)
Recalc
kodunun hemen altına aşağıdaki kodu ekleyerek deneyiniz.
DoCmd.RunSQL "UPDATE FaturaDetay SET Yekun = [Forms]![FaturaGiris]![FaturaDetay].[Form]![Yekun] WHERE (((FaturaID)=[Forms]![FaturaGiris]![FaturaID]))"