Skip to main content

AccessTr.neT


kritere göre form rapor açmak

kritere göre form rapor açmak

Çözüldü #1
Sayın hocalarım
Birincisi...ekteki örnekte alt form üzerinde cari_kod'a çift tıkladığımda o satırdaki tüm bilgileri görebileceğim formu açmasını istiyorum (yaptım ama tam olmadı) Başka yolla yaptım ama bunu bulmak istiyorum.
İkincisi...yine aynı yerde cari_isme çift tıklayarak seçtiklerimi listeye aktarmak sonrada seçim sayısı yazarak yazdığım sayı kadar aynı raporu tekrarlamasını istiyorum.
Ben seçme işini tabloya secim alanı ekleyerek yaptım ama sağlıklı olduğunu düşünmüyorum.(şu anda o alanda kritere göre form açma kod denemeleri var. Ama başarısız.)
Kod örneklerini inceleyip yapmaya çalıştım ama olmadı. Bu bana temel olacak.
yardım ederseniz çok memnun olacağım. Herkese selamlar.
(Uzun bir ayrılıktan sonra sizleri yanımda hissetmek çok güzel)
Filtrelemede Ölçüt
Like"*"&[metin kutusu]&"*"
Cevapla
Çözüldü #2
Fazla ayrıntılı bakamadım ancak çift tıklama olayını hallettim. Raporu istediğim sayıda yazdırayım demişsiniz onu online kod bankamızda aratırsanız örnek kodu bulabilirsiniz. Ben yine her ihtimale karşı elimdeki başka bir dosyayı daha ekleyeceğim.
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
stLinkCriteria = "[Cari_Kod]=" & Me![Cari_Kod] çalışmıyor
stLinkCriteria = "[Cari_Kod]='" & Me![Cari_Kod] & "'" çalışıyor
Çok teşekkür ederim
eksik işleç deyip duruyordu bir tepesine tırnak atmak gerekiyormuş Img-grin
Peki ismin üzerine tıklayınca neden hata veriyor? Orda neyi eksik yazmışım?
Filtrelemede Ölçüt
Like"*"&[metin kutusu]&"*"
Cevapla
Çözüldü #4
Cari kod alanı String tipte olduğu için tek tırnak içine almanız gerekiyor. Eğer sayı tipinde bir alan olsaydı tek tırnak kullanmaya gerek kalmazdı.
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ü #5
Teşekkür ederim bu türlü açıklamalar ancak bize yol aldırır.
Kod:
DoCmd.OpenReport "Rapor1", acViewPreview  DoCmd.PrintOut acPrintAll, , , , 3
Kod Bankasında bunu buldum
burada sayıyı koda yazmak yerine
Kod:
Private Sub Komut45_Click()
On Error GoTo Err_Komut45_Click

    Dim stDocName As String

    stDocName = "R_kargo"
    DoCmd.OpenReport stDocName, acPreview

Exit_Komut45_Click:
    Exit Sub

Err_Komut45_Click:
    MsgBox Err.Description
    Resume Exit_Komut45_Click
   End Sub

bu kod rapor açıyor buna
Kod:
DoCmd.OpenReport "R_kargo", acViewPreview  DoCmd.PrintOut acPrintAll, , , , me.kopyasayısıbox value
gibi bir ilave nasıl yapabilirim?
Yani aktif form üzerinde rakam yazdığım kutudaki sayıyı alsın.
Teşekkürler iyi geceler
Filtrelemede Ölçüt
Like"*"&[metin kutusu]&"*"
Cevapla
Çözüldü #6
Nasıl ki yukarıda kodlarınız içinde rapor adını bir değişkene atıyorsunuz:

Kod:
Dim stDocName As String
stDocName = "R_kargo"

ve daha sonra rapor adını yazmadan sadece değişkeni

Kod:
DoCmd.OpenReport stDocName, acPreview
kodunda olduğu gibi stDocName ile getiriyorsunuz aynı şekilde kaç adet kayıt yazdırılacaksa o zaman o metin kutusunu bir değişkene atayıp kayıt sayısı yerinde de o değişkeni kullanmanız çözüm olabilir.

Siz bir uğraşın olmazsa biz adım atarız Img-grin
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

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task