Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Liste Kutusundan Forma Veri Gönderme

yahzee_61
yahzee_61
Access Cevaplanmış Soruları
5
654

Liste Kutusundan Forma Veri Gönderme

Çözüldü #1
yahzee_61
Aktif Üye
yahzee_61
Bul
Aktif Üye
Adı Soyadı: Os.... Tu.... BA....
Yaşı: 44
Konum: Trabzon
Ofis Versiyonu: Ofis 2007
Son Oturumu: 28/01/2025,17:31
Yorumları: 115
Konuları: 23
Kayıt Tarihi: 13/09/2016
Teşekkür Puanı: 0
Mesleğiniz: Muhasebe
Arkadaşlar formum üzerinde giriş alanları var fakat tablo ile ilişkili değil. alt tarafta ise liste kutusu var. bu liste kutusunda herhangi bir işleme tıkladığımda forma ıd sine göre gelsin normalde geliyor fakat ıd ye göre getiremedim. hata nerede bakabilirmisiniz.
.rar - BANKA.rar (Dosya Boyutu: 105,61 KB | İndirme Sayısı: 3)
Cevapla
#2
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,12:45
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
LstBanka isimli liste kutusunun ilişkili sütun özelliğini 0 olarak değiştir,

Aynı liste kutusunun tıklandığında olayındaki

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

kodunun altına

    Me.BankaAdi = Me.LstBanka.Column(2)
    Me.BankaKodu = Me.LstBanka.Column(1)

şeklinde kod ekle, formdaki diğer ilişkisiz alanlar için de Column değerine göre kod eklemelisin.
Cevapla
#3
yahzee_61
Aktif Üye
yahzee_61
Bul
Aktif Üye
Adı Soyadı: Os.... Tu.... BA....
Yaşı: 44
Konum: Trabzon
Ofis Versiyonu: Ofis 2007
Son Oturumu: 28/01/2025,17:31
Yorumları: 115
Konuları: 23
Kayıt Tarihi: 13/09/2016
Teşekkür Puanı: 0
Mesleğiniz: Muhasebe
SAYIN ozanakkaya düzenlemeyi söylediğiniz gibi yaptım sorunu çözdüm fakat şöyle bir hata veriyor.
Addnew veya edit olmaksızın update veya cancelupdate.

bunu nasıl düzenleyeceğiz. kod aşağıdaki gibidir
Private Sub Lstbanka_Click()
Dim RS As Object
Set RS = Me.Recordset.Clone
RS.FindFirst "(Banka_Id)=" & Me.LstBanka
If Not RS.EOF Then Me.Bookmark = RS.Bookmark
BankaKodu = LstBanka.Column(1)
BankaAdi = LstBanka.Column(2)
BankaSubesi = LstBanka.Column(3)
BankaHesapNo = LstBanka.Column(4)
BankaIban = LstBanka.Column(5)
BankaHesapCinsi = LstBanka.Column(6)
BankaYetkili = LstBanka.Column(7)
BankaYetkiliTelefon = LstBanka.Column(8)
BankaTelefon = LstBanka.Column(9)
BankaFax = LstBanka.Column(10)
BankaMail = LstBanka.Column(11)
BankaNotu = LstBanka.Column(12)
Bankaİli = LstBanka.Column(13)
Bankaİlce = LstBanka.Column(14)
BankaDurum = LstBanka.Column(15)
End Sub
Cevapla
#4
yahzee_61
Aktif Üye
yahzee_61
Bul
Aktif Üye
Adı Soyadı: Os.... Tu.... BA....
Yaşı: 44
Konum: Trabzon
Ofis Versiyonu: Ofis 2007
Son Oturumu: 28/01/2025,17:31
Yorumları: 115
Konuları: 23
Kayıt Tarihi: 13/09/2016
Teşekkür Puanı: 0
Mesleğiniz: Muhasebe
Ayrıca alt tarafa kodu yazdığımda o alanlar güncelleniyor Banka_Id güncellemiyor. alt tarafa yazdığım kodu siliyorum Banka_Id güncelliyor. bi ayar yapamadım.
Cevapla
#5
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,12:45
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Formda BankaNotu ve BankaDurum metin kutuları ilişkili olduğu için bu denetimlere veri aktarılmayacak.

BankaNotu = LstBanka.Column(12)

ve

BankaDurum = LstBanka.Column(15)

kodları olmayacak.
Cevapla
Smile #6
yahzee_61
Aktif Üye
yahzee_61
Bul
Aktif Üye
Adı Soyadı: Os.... Tu.... BA....
Yaşı: 44
Konum: Trabzon
Ofis Versiyonu: Ofis 2007
Son Oturumu: 28/01/2025,17:31
Yorumları: 115
Konuları: 23
Kayıt Tarihi: 13/09/2016
Teşekkür Puanı: 0
Mesleğiniz: Muhasebe
çok teşekkür ederim ben onları da kaldırdım diye hiç bakmıyorum kodla uğraşıyorum çok çok teşekkürler.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task