Skip to main content

AccessTr.neT


birden fazla kritere göre form açmak

birden fazla kritere göre form açmak

Çözüldü #7
Kod:
kriterim = [vekil adı] & "" & [anabaslık]
stDocName = "form1"
stLinkCriteria = "[kriter]=" & "'" & kriterim & "'"

Burada formun kayıt kaynağında kriter adına sahip bir alanın kriterim adlı değişkendeki bilgiye ([vekil adı] & "" & [anabaslık]) sahip olup olmadığını kontrol ettirmiş oluyorsunuz.
Ve büyük ihtimalle sizin formunuzda kriter diye bir alan yok. Bunun için size Kriter nedir diye soruyor.

Mevcut formunuzdaki [vekil adı] ve [anabaslık] adlı metin kutuları olduğunu ve açtığınız formun kayıt kaynağında da aynı isme sahip alanlar olduğunu varsayarsak,
sadece ilgili satırı şu şekilde yazmalısınız.

Kod:
kriterim = "[vekil adı]='" & me.[vekil adı] & "' And [anabaslık]='" & me.[anabaslık] & "'"
Burada başına me. konulan alanlar mevcut formunuzdaki metin kutularının isimleri, başında me olmayanlar ise açılacak formun kayıt kaynağındaki alan isimleri olmalı.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #8
benimki metin kutusu değilde aşağı açılan kutu.Farkedermi peki? ekli dosyama bakabildinizmi?
farukpoyraz, 18-08-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #9
Ben cevap yazdığımda, ekte dosyanız yoktu. Sonradan eklemişsiniz.
Formunuza baktım, açılan kutu içinde aynı metni kullanabilirsiniz.

Form1 ile yine form1'i açmaya çalıştığınız ve başka da form olmadığı için test edemedim.

Size acil tavsiyem şudur;
Alan isimlerinde kesinlikle boşluk kullanmayın, kullanırsanız kodlamada sorunlar yaşarsınız, kullanmazsanız rahat ederseniz.
Tabii ilaveten türkçe karakter de kullanmamanız lazım.
Yapılmaması gereken ölümcül hatalar
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #10
kusura bakmayın ekte yeni dosyayı gönderiyorum aynen uyguladım ama olmadı seçtiğim kritere göre veriler gelmiyor.bir bakarmısınız.bir düzenleyebilirmisiniz.
.rar Yeni WinRAR archive (2).rar (Dosya Boyutu: 15,53 KB | İndirme Sayısı: 9)
farukpoyraz, 18-08-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #11
Kod:
kriterim = "[ad]='" & Me.[ad] & "' And [hizmetad]='" & Me.[hizmetad] & "'"
stDocName = "form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria

kriterim adlı değişkende gerekli düzenlemeyi yapıyorsunuz ama formu açarken kriter olarak stLinkCriteria adlı değişkeni kullanıyorsunuz.

sadece ilgili satırı aşağıdaki şekilde düzeltin, çalışır.
Kod:
DoCmd.OpenForm stDocName, , , kriterim
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #12
oldu çok teşekkür ederim. sagolun.:-)
farukpoyraz, 18-08-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task