+- 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ığı: Metin kutusunda birden fazla sorgulama (/konu-metin-kutusunda-birden-fazla-sorgulama.html)
Metin kutusunda birden fazla sorgulama - slayerrrrr - 12/03/2011
Merhabalar başlık ne kadar doğru oldu bilmiyorum ama af buyrun acces konusunda yeni sayılırım sorunuma gelince arıza formu giriş içerisnde ekipman bölümünde KM ile başlıyan ekipman seçtiğimde arıza kodu kısmına sadece kesme arıza kodu kısmı gelicek ama yine ekipman bölümünden US ile başlıyan bir ekipman seçersem arıza kodu kısmında sadece us arıza kodu gelicek yani us giridğinde sadece us km girildiğinde sadece kesme arızaları görünücek formdaki arıza kodu bölümünde böyle bi şey mümkünmüdür.... saygıdeğer hocalarım
Cvp: Metin kutusunda birden fazla sorgulama - mehmetdemiral - 12/03/2011
Mümkündür. Bu konuda oldukça bol da örnek mevcuttur.Ararken "il-ilçe" diye aratırsanız bulablirsiniz.
Cvp: Metin kutusunda birden fazla sorgulama - slayerrrrr - 12/03/2011
mümkünse gönderdiğim çalışamamda bir örnekleme yapmanız mümkünmü dediğiniz gibi arma yaptım ama nasıl uygulacagımı pek anlıyamadım kendi çalışamam üzerinde bir örnek olursa daha iyi anlarım yardımızı bekliyorum
Cvp: Metin kutusunda birden fazla sorgulama - schworse - 12/03/2011
Sn. slayerrrrr;
Ek'te örnek mevcut.
İndir
ek'teki örneğe göre bir örnek hazırlayabilirseniz yardımcı olabiliriz.
Kolay gelsin.
Cvp: Metin kutusunda birden fazla sorgulama - ozanakkaya - 12/03/2011
EKIPMAN açılan kutusunun "Güncelleştirme Sonrasında" olayındaki kodu aşağıdaki ile değiştir.
Private Sub ekipman_AfterUpdate()
Dim deger As String
ADRES = Me.EKIPMAN.Column(1)
LOKASYON = Me.EKIPMAN.Column(2)
deger = Left(EKIPMAN, 2)
Select Case deger
Case "KM"
Me.ARZKD.RowSource = "SELECT [ARIZA KODLARI].[KESME ARIZA KODU], [ARIZA KODLARI].[KESME ARIZA TANIMI] FROM [ARIZA KODLARI];"
Case "US"
Me.ARZKD.RowSource = "SELECT [ARIZA KODLARI].[US ARIZA KODU], [ARIZA KODLARI].[US ARIZA TANIMI] FROM [ARIZA KODLARI];"
Case Else
Me.ARZKD.RowSource = "SELECT [ARIZA KODLARI].[KESME ARIZA KODU], [ARIZA KODLARI].[KESME ARIZA TANIMI] FROM [ARIZA KODLARI]; UNION SELECT [ARIZA KODLARI].[US ARIZA KODU], [ARIZA KODLARI].[US ARIZA TANIMI] FROM [ARIZA KODLARI];"
End Select
End SubUS ile başlıyorsa US Arıza Kodu, KM ile başlıyorsa Kesme Arıza Kodu, her ikisi de değilse tablodaki sütunlar birleşiyor.
Cvp: Metin kutusunda birden fazla sorgulama - slayerrrrr - 12/03/2011
syn sledgeab hocam çok teşekkür ederim sizde olmasanız halimiz nice wallaha