kritere göre form rapor açmak

kritere göre form rapor açmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: kritere göre form rapor açmak (/konu-kritere-gore-form-rapor-acmak.html)

Sayfalar: 1 2 3

kritere göre form rapor açmak - firdevs - 01/12/2009

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)

Cvp: kritere göre form rapor açmak - alpeki99 - 02/12/2009

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.

Cvp: kritere göre form rapor açmak - firdevs - 02/12/2009

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?

Cvp: kritere göre form rapor açmak - alpeki99 - 02/12/2009

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ı.

Cvp: kritere göre form rapor açmak - firdevs - 02/12/2009

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

Cvp: kritere göre form rapor açmak - alpeki99 - 02/12/2009

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