Skip to main content

AccessTr.neT


parametreli sorgu + rapor

parametreli sorgu + rapor

Çözüldü #1
merhaba arkadaşlar,
bir okul için öğrenci belgesi programı yaptım. benim sorum şöyle ana formda öğrenci belgesini tıkladığında premetreli sorgu çalışıp öğrenci numarası sorarak öğrenci belgesi raporunu getirmektedir ancak eğer öğrenci mezun olmuşsa "öğrenci mezundur,belge verilemez." uyarısını vermesini istiyorum. kaç gndür sitenizdeki örneklere bakıyorum ama bir türlü bir kod bulamadım. yardımcı olan arkadaşlara şimdiden çok teşekkür ederim.

Ek Dosyalar
 ogrenci_blg_db - Kopya.rar(985.16 KB)
Cevapla
Çözüldü #2
Makro ve Katıştırılmış Makro kullanmayın.


varmi = Dcount("ogrenci_no_alani","ogrencilerin_oldugu_tablo",[ogrenci_no_alani]='" & metin_kutusu_adi & "')

if (varmi>0) then
' raporu açtır
else
' mesaj verdir böyle öğrenci yok diye
end if

akıldan yazdım hatalar olabilir.

NOT : Belirtmeyi unutmuşun tablodaki alan Metin formatında ise DCount komutundaki tek tırnaklar olmalı eğer Sayı türünde ise tek tırnakları silersiniz.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #3
Ekteki Örneği inceleyiniz.
Rapora parametre girmek yerine öğrencci bilgileri formundan seçtiğiniz öğrenciye ait belgeyi yazdırabilirsiniz.
Böylece mezundur demesine gerek kalmaz.
Ek Dosyalar
 ogrenci_blg_db - Kopya.zip(42.45 KB)
Cevapla
Çözüldü #4
süpersiniz, hızlı cevabınız için çok teşekkür ederim. kodları deneyip size döneceğim..
Cevapla
Çözüldü #5
sayın Kur@l kardeşim teşekkür ederim cevabınız için ama ben ana formda öğrenci belgesi butonuna tıklayınca yapmak istiyorum. alpeki99 kardeşim gönderdiği kodları ekledim ama çalıştıramadım.
Cevapla
Çözüldü #6
Raporunuzu sizin ilk çalışmanızdaki halinde iken aşağıdaki kodu ekleyerek deneyiniz. İstediğiniz Gibi Olacaktır.
Sorgunuzuda Bu cümle ile değiştirin.

SELECT ogrenciBilgileri.siraNo, ogrenciBilgileri.ogrenciNo, ogrenciBilgileri.adi, ogrenciBilgileri.soyadi, ogrenciBilgileri.babaAdi, ogrenciBilgileri.dogumYeri, ogrenciBilgileri.yuksekOkulu, ogrenciBilgileri.bolumu, ogrenciBilgileri.sinifi, ogrenciBilgileri.mezun
FROM ogrenciBilgileri
WHERE (((ogrenciBilgileri.ogrenciNo)=[Öğrenci Noyu Giriniz?]) AND ((ogrenciBilgileri.mezun)=No));


Private Sub Report_NoData(Cancel As Integer)
MsgBox "Yazdığınız Numaralı Öğrenci Yok Yada Mezun Olmuştur."
Cancel = True
End Sub
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task