AccessTr.neT
Verileri Otomatik Yazma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Verileri Otomatik Yazma (/konu-verileri-otomatik-yazma.html)

Sayfalar: 1 2


Cvp: Verileri Otomatik Yazma - hyavuz - 24/04/2009

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. Icon_rolleyes

(21/04/2009, 20:31)goodfalles yazdı: Img-grin pek değişik bişi değil Img-grin



Cvp: Verileri Otomatik Yazma - ozanakkaya - 24/04/2009

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-kutudan-secilen-kayda-gore-bilgileri-guncelleme.html
https://accesstr.net/konu-verileri-otomatik-olarak-getirme.html
https://accesstr.net/konu-acilir-kutuda-gunceleme-sonrasi.html


Cvp: Verileri Otomatik Yazma - hyavuz - 25/04/2009

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?


Cvp: Verileri Otomatik Yazma - ozanakkaya - 25/04/2009

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;



Cvp: Verileri Otomatik Yazma - hyavuz - 25/04/2009

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