Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Tek sayfa çıktı almak sorunu

kenan827
kenan827
Access Cevaplanmış Soruları
9
4081

Tek sayfa çıktı almak sorunu

Çözüldü #1
kenan827
Aktif Üye
kenan827
Bul
Aktif Üye
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: -
Son Oturumu: 07/07/2016,21:28
Yorumları: 288
Konuları: 67
Kayıt Tarihi: 28/02/2013
Teşekkür Puanı: 0
Merhaba arkadaşlar eklediğim kodlarla Forum sayfasında baskı önzileme yapıp yazıcıdan çıktı alıyorum. Kullandığım yazıcı Epson LX_350 yazıcı yeni olmasına rağmen bazen tek sayfa çıktı çıkarıyor. Bazen durmadan yazmaya devam ediyor. Bazen de bir sayfa yazdırıyor. Ondan sonra iki sayfa boş kağıt çıkarıyor tekrar yazdırmaya devam ediyor. 

Tek sayfa çıktı alabilecek bir kodu aşağıdaki kodlara eklerseniz sevinirim. veya yazdır butonuna tıkladığım zaman resimdeki gibi yazdır da  Sayfa seçili İlk 1 son 1 seçili duruma gelsin. 

Kod:
Private Sub Komut33_Click()

     If Me.FaturaID = "" Or IsNull(Me.FaturaID) Then
    MsgBox ("Lütfen FATURA işlemi için kayıt seçiniz"), vbCritical, "KAYIT SEÇME UYARISI"
    Me.Undo
    Exit Sub
    End If
    If IsNull(Forms![FaturaGiris]![FaturaDetay].Form![Toplam]) Or Forms![FaturaGiris]![FaturaDetay].Form![Toplam] = "" Or IsNull(Forms![FaturaGiris]![FaturaDetay].Form![Yekun]) Or Forms![FaturaGiris]![FaturaDetay].Form![Yekun] = "" Then
    MsgBox ("Alt formdaki" & vbCr & vbCr & "Toplam" & vbCr & "Yekun" & vbCr & vbCr & "denetimleri BOŞ olduğu için" & vbCr & "KAYIT İŞLEMİ İPTAL EDİLMİŞTİR."), vbCritical, "KAYDETME İPTAL BİLGİLENDİRMESİ"
    Cancel = True
    DoCmd.SetWarnings False
    DoCmd.RunCommand acCmdUndo
    DoCmd.SetWarnings True
    Exit Sub
    Else
    DoCmd.OpenReport "FaturaDokum", acPreview
    End If
End Sub


[Resim: 14555520481.png]
Cevapla
#2
atoz112
Onursal Üye
atoz112
Bul
Onursal Üye
Adı Soyadı:
Yaşı: 55
Konum: İstanbul
Ofis Versiyonu: Ofis 2007
Son Oturumu: 09/12/2017,11:02
Yorumları: 5.716
Konuları: 9
Kayıt Tarihi: 04/08/2009
Teşekkür Puanı: 1.172
sayın kenan827,

bahsettiğiniz talebinize yönelik olarak;

Kod:
DoCmd.PrintOut acPages, 1, 1
kod satırını kullanabilirsiniz.

AÇIKLAMASI
tek sayfayı yazdır anlamındadır.

eklediğiniz kodların içerisindeki

Kod:
DoCmd.OpenReport "FaturaDokum", acPreview
kod satırının bir altına dahil edebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
kenan827
Aktif Üye
kenan827
Bul
Aktif Üye
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: -
Son Oturumu: 07/07/2016,21:28
Yorumları: 288
Konuları: 67
Kayıt Tarihi: 28/02/2013
Teşekkür Puanı: 0
Çok teşekkürler hocam elleriniz sağlık. Hocam kodu ekledim deme imkanım olmadı. Olup olmadığını yarın işyerinde deneyerek size dönüş yapacağım. Saygılarımla iyi akşamlar.
Son Düzenleme: 15/02/2016, 20:26, Düzenleyen: kenan827.
Cevapla
#4
atoz112
Onursal Üye
atoz112
Bul
Onursal Üye
Adı Soyadı:
Yaşı: 55
Konum: İstanbul
Ofis Versiyonu: Ofis 2007
Son Oturumu: 09/12/2017,11:02
Yorumları: 5.716
Konuları: 9
Kayıt Tarihi: 04/08/2009
Teşekkür Puanı: 1.172
sayın kenan827,

DoCmd.PrintOut Yöntemi hakkında daha ayrıntılı bilgi edinmek isterseniz;
fikir vermesi ve içeriği itibarı ile bilgi sağlaması adına aşağıdaki bağlantılarda yer alan konuları inceleyiniz.

DoCmd.PrintOut Method

Yazdırma seçeneklerini ayarlama

faydalı olması temennisi ile.

son olarak;bir de,naçizane tavsiye olması adına,
eğer raporu tasarım olarak açıp,üst menüden de SAYFA YAPISI menüsünü (simgesini) seçtiğinizde,ekrana gelecek olan SAYFA YAPISI başlıklı pencerenin YAZDIRMA SEÇENEKLERİ sekmesindeki KENAR BOŞLUKLARI başlığı altındaki ÜST,ALT,SOL,SAĞ satırlarındaki değerleri 4-5 mm olarak işaretlemenizde bir bakıma katkı sağlayabilir,eğer ki bu kodu kullanmadığınızda.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#5
kenan827
Aktif Üye
kenan827
Bul
Aktif Üye
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: -
Son Oturumu: 07/07/2016,21:28
Yorumları: 288
Konuları: 67
Kayıt Tarihi: 28/02/2013
Teşekkür Puanı: 0
Hocam Eklediğiniz Kodu Kullanmak istiyorum. Şöyle bir sorun çıkıyor. Baskı önzileme açılır açılmaz hemen faturayı yazdırıyor baskı önizlemede faturayı kontrol etikten sonra yazdır komutunu biz verseydik çok iyi olurdu.
Cevapla
#6
atoz112
Onursal Üye
atoz112
Bul
Onursal Üye
Adı Soyadı:
Yaşı: 55
Konum: İstanbul
Ofis Versiyonu: Ofis 2007
Son Oturumu: 09/12/2017,11:02
Yorumları: 5.716
Konuları: 9
Kayıt Tarihi: 04/08/2009
Teşekkür Puanı: 1.172
sayın kenan827,

Alıntı:...baskı önizlemede faturayı kontrol etikten sonra yazdır komutunu biz verseydik çok iyi olurdu...

ifadenize yönelik olarak;
şu öneride bulunmanın faydalı olacağı kanısındayım.

ön izleme sonrasında yazılan yazdırma komutunu,bir tuş kullanımına atamak sureti ile kullanabilirsiniz.

böylece,ön izleme akabinde kontrollerinizi de bitirip baskıya hazır duruma geldikten sonra bu tuşa basmak neticesinde yazdırma işlemini gerçekleştirebilirsiniz.

site arama sayfasında,"sendkey" ya da "keycode" benzeri ifadeleri yazmak sureti ile edineceğiniz çeşitli içeriklerdeki konularda yer alan bilgileri ve örnekleri inceleyiniz.aşağıda bunlardan iki tanesi mevcut.

Fonksiyon Tuşları (F1)

Alt+f tuşları ile form açmak

son olarak,belki bunlara bile gerek kalmaksızın,raporu ön izleme açıp kontrolleri yaptıktan sonra,rapor üzerinde SAĞ TUŞ ile menüden YAZDIR ifadesini seçerek bu yazdırmayı direkt de yapabilirsiniz.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task