AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

Liste Kutuları Arasında Veri Aktarma

1 2 3
09/12/2017, 15:20

ozanakkaya

Merhaba,

Alıntı:iş bilgilerinin yer aldığı bir liste kutusu olacak ve ben bu liste kutusunda seçtiğim işin üzerine tıkladığımda bu işe ait frm_malzemeler isimli form açılacak

Behsettiğiniz liste kutusu uygulamanızda olmadığı için ekleme yapmadım. malzemeler isimli formda "mtn_isadi" isminde metin kutusu var. Bu metin kutusunun varsayılan değeri "İş 1" olarak ayarlı, siz farklı formdaki liste kutusuna tıklayıp bu formu açtırdığınızda bu metin kutusuna iş adını aktarmalısınız.

Üst listeden veri seçip aktar butonuna tıkladığınızda alt listeye aktarılır, alt listeden veri seçip sil butonuna tıkladığınızda da seçilen ürün silinir.

Bu sorunuz ile ilgili istekleriniz için yapabileceklerim bundan ibarettir.
09/12/2017, 15:33

mmert06

ozan bey haklısınız. bahsettiğim liste kutusunu da yapıp örneği tekrar güncelleyeceğm. Bu arada eklediğiniz dosyada Liste2 kutusunda sadece malzemenin adı ve miktar alanları geliyor, Liste0 daki gibi "Stok Numarası", "Malzeme Adı", "Birimi" ve "Miktarı" alanları gelmiyor.  Aktar butonuna bastığımızda Bu alanları da Liste2 de gösterebilir miyiz?
09/12/2017, 15:37

ozanakkaya

Gösterebilirsiniz. 

- tbl_ihtiyac tablosuna aktarılacak verilere ait alan ekle,
- Liste2 isimli liste kutusunun satır kaynağındaki sorguya görünmesini istediğiniz alanları ekle
- aktar butonunun tıklandığında olayındaki ekleme sorgusuna tbl_ihtiyac tablosuna aktarılacak verileri belirle.
09/12/2017, 15:39

ozanakkaya

(09/12/2017, 15:37)ozanakkaya yazdı: Gösterebilirsiniz. 

- tbl_ihtiyac tablosuna aktarılacak verilere ait alan ekle,
- Liste2 isimli liste kutusunun satır kaynağındaki sorguya görünmesini istediğiniz alanları ekle
- aktar butonunun tıklandığında olayındaki ekleme sorgusuna tbl_ihtiyac tablosuna aktarılacak verileri belirle.
09/12/2017, 16:05

mmert06

ozanbey dediğiniz gibi ekteki gibi yapmaya çalıştım ama aktarma olayını beceremedim
09/12/2017, 17:35

ozanakkaya

Merhaba,

Önceki mesajımda eklediğim örnek uygulamada, üst listedeki malzeme adına ulaşmak için ve malzeme adı liste kutusunda 2. sütunda olduğu için

Me.Liste0.Column(1, GItem)

kodu kullandım. Siz stok numarasına ulaşmak için


Me.Liste0.Column(0, GItem)


birime ulaşmak için


Me.Liste0.Column(2, GItem)
kodunu kullanmalısınız.

Ayrıca, verileri tabloya aktaran

DoCmd.RunSQL "INSERT INTO tbl_ihtiyac (isadi, malzemeadi, miktari) VALUES ('" & mtn_isadi & "', '" & GMalzemeAdi & "' , '" & GMiktari & "')"

kodu var.Buradaki isadi, malzemeadi, miktari kısmı tbl_ihtiyac tablosundaki veri aktarılacak alanlar,

'" & mtn_isadi & "', '" & GMalzemeAdi & "' , '" & GMiktari & "' kısmı ise aynı sıra ile bu alanlara aktarılacak verilerdir.
1 2 3