Verileri Otomatik Yazma

1 2
24/04/2009, 19:38

hyavuz

Benim burda asıl yapmak istediğim şu;
Mesela ben sürekli olarak
Afirması
Bfirması
Cfirması

bu firmalara irsaliye kesiyorum amacım açılır kutudan bu firmaları seçtğimde bilgileri gerekli alanlara doldurması sizin yolladığını dosyadaki örnekte seçim yaptığımız zaman şeçilen kayıda gidiyor
umarım anlatabilmişimdir.
(21/04/2009, 20:31)goodfalles yazdı:
24/04/2009, 20:38

ozanakkaya

Açılır kutunun güncellenme sonrası'na
Kod:
Private Sub Firma_AfterUpdate()
Me.Adres = Me.Firma.Column(1)
Me.il = Me.Firma.Column(2)
Me.ilce = Me.Firma.Column(3)
Me.VergiD = Me.Firma.Column(4)
Me.VergiNo = Me.Firma.Column(5)
End Sub

Açılır kutunun satır kaynağı:
Kod:
SELECT efirma.Firma, efirma.Adres, efirma.il, efirma.ilce, efirma.VergiD, efirma.VergiNo FROM efirma;
Sütun sayısı=6
Sütun genişlikleri=5cm;0cm;0cm;0cm;0cm;0cm

Benzeri konular
https://accesstr.net/konu-formda-acilan-...lleme.html
https://accesstr.net/konu-verileri-otoma...tirme.html
https://accesstr.net/konu-acilir-kutuda-...nrasi.html
25/04/2009, 10:59

hyavuz

sledgeab usta teşekkürler,
Bu şekilde halledebildim ancak şöyle bir sorun var açılır kutuda örneğin Afirmasına 5 kere irsaliye kesmişsem açılır kutuda 5 tane afirması yazıyor yenilenen verileri engelleyebilirmiyiz?
25/04/2009, 11:06

ozanakkaya

açılır kutunun satır kaynağına DISTINCT ekle, yani sorgu aşağıdaki gibi olsun.

Kod:
SELECT DISTINCT efirma.Firma, efirma.Adres, efirma.il, efirma.ilce, efirma.VergiD, efirma.VergiNo FROM efirma;
25/04/2009, 13:16

hyavuz

Tamam Ustam bu şekilde çözüldü çok teşekkür ederim.
1 2