Skip to main content

AccessTr.neT


Acceste Raporun İlk Sayfasını Goruntuleme

ertuğrul2022
ertuğrul2022
4
178

Acceste Raporun İlk Sayfasını Goruntuleme

Çözüldü #1
Hayırlı günler

Dim myreport aş string
Myreport =currentproject.path & "\ Raporlar\Tutanak.pdf"
Docmd.Outputto acoutputreport, "Tutanak", "Performans (*.pdf)", motorsport, true, "",0


Komutu ile tutanağı PDF olarak açtırıyorum Ama benim istediğim tutanak çok fazla sayfalı olduğu zaman ilk sayfasını göstersin ve ilk sayfasını yazdırayım
Şimdiden ilgili için çok teşekkür ediyorum.
Cevapla
#2
Kod:
DoCmd.SelectObject acReport, RAPORADI
DoCmd.PrintOut acPages, 1, 1

kodunu deneyin.
Cevapla
#3
(17/01/2023, 12:02)atoykan yazdı:
Kod:
DoCmd.SelectObject acReport, RAPORADI
DoCmd.PrintOut acPages, 1, 1

kodunu deneyin.

Olmadı hocam rapor açıyor ama rapor önemli değil yazdır dedigimde 1. Sayfayı yazdirirsa çok iyi olacaktı.
Cevapla
#4
DoCmd.OpenReport "RAPORADI", acViewPreview
DoCmd.SelectObject acReport, "RAPORADI"
DoCmd.PrintOut acPages, 1, 1
DoCmd.Close acReport, "RAPORADI"


Yukarıdaki kod raporu açar, object olarak seçer 1. sayfasını yazdırır ve raporu kapatır. Biraz araştırma yapmaktan veya mantığı anlamaya çalışmaktan imtina etmeyin sürekli doğrudan işinizi görecek cevaba odaklanıyorsunuz. Sürekli belirtiyoruz bizim işimiz sizin yerinize yapmak değil yol göstermek. Zaman zaman örneklerin içinde uygulayarak paylaşıyoruz çözümleri ancak bu ya zamansızlıktan soru cevapsız kalmasın diye veya soru sahibinin gerçek anlmada efor sarfedip ilerleyemediği durumlarda. Bu işe hevesliyseniz paylaşılan bilgi ve örnekleri incelerken mantığını kavramaya ve/veya başka varyasyonlar ve başka senaryolarda uygulamaya çalışarak kendinizi geliştirin. Bizim verdiğimiz odlarla bir yere kadar yol alırsınız.
Cevapla
#5
Teşekkür ederim hocam bir daha olmaz
Son Düzenleme: 17/01/2023, 19:47, Düzenleyen: ertuğrul2022.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da