PDA

Tam Sürümünü Görmek İçin : combobox'a db'den veri aktarımı


caner
28/02/2004, 17:38
Merhaba,
Yeni üye olarak ilk sorumu soruyorum amacım birazda olsa vb bilgisi edinmek ve kendimi biraz geliştirmek bu nedenle kendimce bazı küçük programcıklar yapmaya çalışıyorum neyse sorumu sorsam daha iyi olucak.
1 adet combobox ve 6 adet textbox'ım var bunlardan 3 tanesine verileri ben giricem.Yapmaya çalıştığım combobox'a databasedeki musterikayit tablosunun adsoyad alanındaki tüm müşteri isimlerini comboboxa aktarmak ve buna bağlı olarak seçeceğim kişinin diğer bilgilerinide 3 adet texboxa yazdırması yani mehmet diye birini seçtiğimde bu kişinin adres,tel ve ünvanı texboxlara gelsin başka birini seçtiğimdede o kişinin bilgileri gelicek seçtiğim kişiyle beraber diğer kalan 3 textboxa borç bilgilerini girerek borçlar tablosundaki alanlara kaydettirmek istiyorum.Bununla ilgili örnekler aradım ama benim istediğimi yapacak bir örneğe henüz rastlayamadım.Bir kitap aldım öğreniyim diye ondada bu tür bilgilere hiç yer verilmemiş,hep additemle örneklendirilmiş.Umarım anlatabilmişimdir ilgilenen herkese şimdiden teşekkür ederim.


x-Acto
01/03/2004, 09:35
soyle bisey onerebilirim..

'Veritabani baglantisi ve sorgu islemleri

Dim iLast as integer
iLast=rs.RecordCount-1
For i=0 to iLast
Combo.AddItem rs("Ad") & " " & rs("Soyad")Combo.ItemData(i)=rs("MusteriID")
Next i

Bu Combo icine musteri isimlerini yazar
sectigin isime gore ilgili verileri getirmek icin de

Combo_Change olayina biseyler yazman lazim..

Dim sSQL as string
sSQL="SELECT * FROM Tablo WHERE Tablo.MusteriID=" & Combo.ItemData(Combo.SelectedIndex)
rs.Open sSQL
'TextBox icine yazdirma islemleri

su anda vb yok bilgisayarimda.. Combo.SelectedIndex yerine baska bisey kullanman gerekebilir... Secilen Item in indexini veren bi ozellik iste.. bulursun onu..

kolay gele...