Skip to main content

AccessTr.neT


Forma Listeden Kayıtları aktarmak

sadikkavakli
sadikkavakli
5
2433

Forma Listeden Kayıtları aktarmak

Çözüldü #1
Değerli Form Üyeleri,

forma listeden kayıt aktarmaya çalışıyorum olmuyor.

yardımcı olursanız sevinirm.
.rar sadık örnek.rar (Dosya Boyutu: 26,24 KB | İndirme Sayısı: 15)
sadikkavakli, 11-06-2010 tarihinden beri AccessTr.neT Üyesidir.
Cevapla
Çözüldü #2
Bu açıklama yetersiz. Lütfen daha net ve anlaşılır şekilde sorunuzu sorun. Hangi formda, ne yapınca, ne olmasını istiyorsunuz örneklendirerek anlatınız.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #3
Sayın alpeki99

form2 formunda f10 tuşu ile form1 açılacak oradaki listede bulunan öyelerin mause ile çift tıklayınca form2 yazılmasını form2 kayıt edilince de kayıtların tablo3 e yazılması gerekiyor.

ilgi ve alakanız için teşekür ediyorum.
sadikkavakli, 11-06-2010 tarihinden beri AccessTr.neT Üyesidir.
Cevapla
Çözüldü #4
Form2'nin Özelliklerinden Kayıt Kaynağını Tablo3 olarak seçtim. Form1'in Vba kodları bölümüne geçiş yaptım. Aşağıdaki kodu tamamen sildim:


Private Sub Liste2_AfterUpdate()
' burada formumuzun denetimindeki verilerden listedeki seçime uymasını sağlıyoruz, yani biz listede hangisini seçmişsek kayıtlarda oraya gitsin.

Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[ekipmankodu] = " & Val(Nz(Me![Liste2], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

Form1'de yer alan liste kutusunun Çift Tıklanma olayına aşağıdaki kodları yazıyorum :


Forms!form2.SetFocus

Böylelikle Form1'de iken Form2'ye odaklanabiliyorum. Form2'de yer alan metin kutularının içine Form1' de yer alan listenin 1. ve 2. sütunlarının değerlerini yazdırıyorum:


Forms!form2.SetFocus
Forms!form2.Form!ekipmankodu = Liste2.Column(1)
Forms!form2.Form!Ekipmanaciklaması = Liste2.Column(2)

Artık Form1'de iken Listeye çift tıkladığımda tıkladığım satırdaki değerler Form2'de yer alan metin kutularına yerleştiriliyor.

Eğer çift tıkladıktan sonra Form1 kapatılsın istersem en alta şu kodu yerleştiriyorum:


Forms!form2.SetFocus
Forms!form2.Form!ekipmankodu = Liste2.Column(1)
Forms!form2.Form!Ekipmanaciklaması = Liste2.Column(2)
DoCmd.Close acForm, "form1"

Muhtemel Sorun : Form1 açıkken Form2 kapalı olursa hata verir. Bunun için IsLoaded isimli fonksiyon kullanılabilir ya da Form2 kapatılmadan Form1 Özelliklerinden Açılan ve Kalıcı Evet olarak ayarlanır. En sağlamı ise IsLoaded kullanımıdır.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #5
Sayın alpeki99

paylaşım için teşekür ediyorum.


ek'i paylaşmak isterdim ekleme yerini bulamadım.

sonuç doğru olarak veriyor.
teşekür ediyorum.


sadikkavakli, 11-06-2010 tarihinden beri AccessTr.neT Üyesidir.
Son Düzenleme: 22/05/2011, 15:41, Düzenleyen: sadikkavakli.
Cevapla
Çözüldü #6
Ders olarak hazırlanılmış hali ve örnek dosya Bir Formdan Diğer Formdaki Metin Kutusuna Bilgi Taşımak / Kopyalamak / Göndermek adresindedir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da