birden fazla kritere göre form açmak - 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ığı: birden fazla kritere göre form açmak (/konu-birden-fazla-kritere-gore-form-acmak.html) |
Cvp: birden fazla kritere göre form açmak - farukpoyraz - 25/01/2010 peki birşey daha sormak istiyorum şimdi ben bu 3 kriterden birini yada ikisini boş bıraktım ona göre aramayı yapmıyor bu komutla.onu nasıl yapacağım. Cvp: birden fazla kritere göre form açmak - Nurullah_Serdar - 25/01/2010 dim kriterim as string If Not IsNull(Me.adı) Then 'Ad alanınde değer varsa kriterim = "adı='" & Me.adı & "'" End If If Not IsNull(Me.Senet_no) Then ' hizmet alanında değer varsa If Len(kriterim) > 0 Then ' kriter var ise kriterim = kriterim & " and [Senet no]=" & Me.Senet_no Else ' kriter yoksa kriterim = "[Senet no]=" & Me.Senet_no End If End If kriteri bu şekilde oluştur. sorun olmayacaktır.[/align] Cvp: birden fazla kritere göre form açmak - farukpoyraz - 25/01/2010 beceremedim.eke dosyamı koydum bir uygulayabilirmisiniz. ben ülke , vekil ve hizmete göre search yapmak istiyorum dediğim gibi birini yada ikisini yada üçünü girdiğimde seçtiğim bilgileri getirsin istiyorum.birde birşey daha ben searche nasıl boş getirebilirim açılan kutuları. teşekkürler. Cvp: birden fazla kritere göre form açmak - Nurullah_Serdar - 25/01/2010 kodu bununla değiştir Dim kriterim As String If Not IsNull(Me.ulke) Then 'ulke alanınde değer varsa kriterim = "ulke='" & Me.ulke & "'" End If If Not IsNull(Me.vekil) Then ' hizmet alanında değer varsa If Len(kriterim) > 0 Then ' kriter var ise kriterim = kriterim & " and [vekil]='" & Me.vekil & "'" Else ' kriter yoksa kriterim = "[vekil]='" & Me.vekil & "'" End If End If If Not IsNull(Me.hizmet) Then ' hizmet alanında değer varsa If Len(kriterim) > 0 Then ' kriter var ise kriterim = kriterim & " and [hizmet]='" & Me.hizmet & "'" Else ' kriter yoksa kriterim = "[hizmet]='" & Me.hizmet & "'" End If End If DoCmd.OpenForm "firmadetaylari", , , kriterim yalnız anlamadığım bir konu var. arama yaptığın formun neden denetim kaynağı var. arama yapmak için kriter belirlediğin formun denetim kaynağı olmamasını tavsiye ederim. yalnızca arama işlemine hizmet etmeli. kolay gelsin Cvp: birden fazla kritere göre form açmak - farukpoyraz - 25/01/2010 ben bu işin acemisiyim ondan :-) Peki size birşey sorsam arama yapacağım kriterler varya onlara ayrı bir tablo açmam gereklimi? yani firma detayları tablosundan arama yaptırmak istesem yapamammı?bu fikrine çok ihtiyacım var. Cvp: birden fazla kritere göre form açmak - Nurullah_Serdar - 25/01/2010 gerek yok. arama kriterlerini açılan kutu ile tablolarınızın ilgili bölümlerinden seçebilirsiniz. mesela adı alanında arama yaptırmak istiyorsun. bir açılan kutu oluştur ve sihirbazı takip ederek adı alanını içeren tablondan yalnızca adı alanını seç. kolay gelsin. |