Skip to main content

AccessTr.neT M.

parametreli sorgu + rapor

Konu

Çö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.

Visual Basic Code
1
2
3
4
5
6
7
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.

SQL Code
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));

Visual Basic Code
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