' menggunakan port LPT1
Open "LPT1" For Output As #1
'Begin print
Print #1, Chr$(&H1B); "@";
Print #1, Tab((PAPER_WIDTH - Len(mHeader1)) / 2); mHeader1
Print #1, Tab((PAPER_WIDTH - Len(mHeader2)) / 2); mHeader2
Print #1, Tab((PAPER_WIDTH - Len(mHeader3)) / 2); mHeader3
Print #1, GARIS2
Print #1, Tab(LEFT_MARGIN); "Tanggal : "; mTanggal
Print #1, Tab(LEFT_MARGIN); "Nomor : "; mNomor
Print #1, Tab(LEFT_MARGIN); "Sales : "; mSales
Print #1, GARIS1
Close #1
Kalau USB , spertinya harus per halaman ( karena semua cetakan di buffer dulu ).
ttg kode ESC/P , silkan baca buku referensi printer anda ( atau cari di internet ).
--- In belajar-access@yahoogroups.com, "hstod" <hstudio7@...> wrote:
>
> gimana cara atau kode nya supaya hasil print/laporan berhenti tepat setelah baris terakhir record pada waktu melakukan print. saya gunakan printer lx 300+.
>
> tks
>
> --- In belajar-access@yahoogroups.com, "hstod" hstudio7@ wrote:
> >
> > pls share, gmn cara ketika melakukan print out baik itu berupa invoice atau strug, hasil cetakan berhenti langsung pada baris terakhir print?
> > jadi tidak sampai menghabiskan lembaran kertas.
> >
> > apa kah ini berlaku untuk printer dotmatriks saja atau juga pada inkjet. saat ini sy masih menggunakan inkjet, blm mencoba di dotmatrix
> >
> > tks
> >
>
Tidak ada komentar:
Posting Komentar