AccessTr.neT

Tam Versiyon: Rapor Açma Problemi
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Selamlar
Hocam sizin güncelleyip gönderdiğiniz dosyayı örnek alarak ben bir dosya hazırladım ama düzgün çalıştıramadım. Sizden ricam acaba nerelerde hata yapmışım bakabilirmisiniz.

Saygılar


Dosya ekte


Ek Dosyalar
 ornek.rar(33.72 KB)
liste kutusunun satır kaynağındaki
Like IIf([Forms]![LİSTE_FORMU]![Kutu10];[Forms]![LİSTE_FORMU]![Kutu10];'*')
ölçütünü
Like IIf([Forms]![LİSTE]![Kutu10];[Forms]![LİSTE]![Kutu10];'*')
olarak değiştir. Çünkü formun adı LİSTE, önceki örnekte form adı LİSTE FORMU olduğu için bu şekilde yazılmış
Önizle butonunun tıklandığında olayına yazılan
 stDocName = ChrW(75) & ChrW(304) & ChrW(350) & ChrW(304) & ChrW(32) & ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69) & ChrW(83) & ChrW(304)
kodunu
     stDocName = ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69)
olarak değiştir. Raporun adı LİSTE


Raporun kayıt kaynağını da
SELECT LİSTE.SIRA, LİSTE.[ADI SOYADI], LİSTE.SINIFI FROM LİSTE WHERE (((LİSTE.SINIFI)=[Formlar]![LİSTE]![Kutu10])); 
olarak değiştir.
Selamlar
Hocam dediklerinizi yaptım sadece Rapor kısmında problem kaldı.
Saygılar

Neden
stDocName = ChrW(75) & ChrW(304) & ChrW(350) & ChrW(304) & ChrW(32) & ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69) & ChrW(83) & ChrW(304)
Bu kodları;

Bunlarla
stDocName = ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69)
değiştiriyoruz.




Ek Dosyalar
 ornek.rar(34.56 KB)
Yapılmaması gereken ölümcül hatalar
Kod:
1. Hiç bir raporun adında türkçe karakter geçmemeli.
2. Rapor isimleri büyük harf olarak yazılmalı
3. Rapor isimlerinde bir standart belirlenmeli. Örneğin rapor ismi R_ ile başlar...


 stDocName =ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69) 

yerine
 stDocName ="LİSTE"
yazabilirsiniz.

Rapor isminde türkçe karakter kullanırsanız buton oluşturduğunuzda ChrW olarak kodlanır. Yani;

ChrW(75) & ChrW(304) & ChrW(350) & ChrW(304) & ChrW(32) & ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69) & ChrW(83) & ChrW(304)
KİŞİ LİSTESİ

ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69)
LİSTE.

Sizin raporunuzun ismi LİSTE olduğu için kodun değiştirilmesi gerekli, ayrıca butonun tıklandğında olayındaki kodu bozmuşsunuz. Kodun tamamı aşağıdaki gibi olacak,

Private Sub Doktur_Click()
On Error GoTo Err_Doktur_Click

Dim stDocName As String

stDocName =ChrW(76) & ChrW(304) & ChrW(83) & ChrW(84) & ChrW(69)
DoCmd.OpenReport stDocName, acPreview

Exit_Doktur_Click:
Exit Sub

Err_Doktur_Click:
MsgBox Err.Description
Resume Exit_Doktur_Click

End Sub


Selamlar

hocam verdiğiniz kodları düzelttim. Rapor alıyor. Ancak açılan kutudan sınıf seçip ön izle dediğimde sadece o sınıfı listelemiyor.

Saygılar


Ek Dosyalar
 ornek.rar(33.56 KB)
sizce #2. mesajdaki

Alıntı:Raporun kayıt kaynağını da
SELECT LİSTE.SIRA, LİSTE.[ADI SOYADI], LİSTE.SINIFI FROM LİSTE WHERE (((LİSTE.SINIFI)=[Formlar]![LİSTE]![Kutu10])); 
olarak değiştir.

Şeklindeki yazdığım kodu raporunuza uygulayınız.
Sayfalar: 1 2