Pada artikel sebelumnya sedikit disinggung mengenai papersize. Ada keterbatasan yang bisa dilakukan suatu program untuk menggunakan Crystal Report (tepatnya dalam mengatur setting papersize). Nilai konstanta papersize sudah diatur dalam Crystal Report. Lalu pertanyaanya bagaimana bila kita ingin mengatur sizenya sendiri (Misalnya print stiker pada printer zebra). Lebih jauh lagi bagaimana tekniknya bila printer tersebut disetting dalam print server dan aplikasi disimpan dalam server dimana pemakaian program digunakan melalui Remote Desktop Connection.
JANGAN KAGET DULU. kita perhatikan satu-satu
Konstanta papersize yang sudah ditetapkan oleh Crystal Report adalah sebagai berikut :
Konstanta Value
crDefaultPaperSize 0
crPaper10x14 16
crPaper11x17 17
crPaperA3 8
crDefaultPaperSize 0
crPaperA4 9
crPaperA4Small 10
crPaperA5 11
crPaperB4 12
crPaperB5 13
crPaperCsheet 24
crPaperDsheet 25
crPaperEnvelope10 20
crPaperEnvelope11 21
crPaperEnvelope12 22
crPaperEnvelope14 23
crPaperEnvelope9 19
crPaperEnvelopeB4 33
crPaperEnvelopeB5 34
crPaperEnvelopeB6 35
crPaperEnvelopeC3 29
crPaperEnvelopeC4 30
crPaperEnvelopeC5 28
crPaperEnvelopeC6 31
crPaperEnvelopeC65 32
crPaperEnvelopeDL 27
crPaperEnvelopeItaly 36
crPaperEnvelopeMonarch 37
crPaperEnvelopePersonal 38
crPaperExecutive 7
crPaperFanfoldLegalGerman 41
crPaperFanfoldStdGerman 40
crPaperFanfoldUS 39
crPaperFolio 14
crPaperLedger 4
crPaperLegal 5
crPaperLetter 1
crPaperLetterSmall 2
crPaperNote 18
crPaperQuarto 15
crPaperStatement 6
crPaperTabloid 3
dengan berdasarkan tabel tersebut kita dapat mengatur papersyze dengan syntax
Report.PaperSize = ?
Misalkan kita ingin melakukan setting papersize dengan kertas A4, maka settingnya adalah
Report.PaperSize = crPaperA4
atau
Report.PaperSize = 9
Sekarang bagaimana kalau ukuran kertas tidak ada dalam tabel. Maka langkahnya masukkan dulu ukuran kertas yang dibutuhkan dalam printer setting papersize. kemudian cek konstantanya (biasanya nomor terakhir + 1). Berarti kalau sesuai tabel, nomor berikutnya adalah 42. Nah inilah yang susah karena kita harus tes dengan debug berapa nomor papersizenya. Kemudian set papersize secara otomatis
Report.PaperSize = 42
Kemudian bagaimana kalau printer diset sebagai printer server???? maka setiap melakukan pencetakan kita harus menset nama printer, Driver, Port, Papersize, PaperSource dan PaperOrientation
MASIH RIBET Kaaaaaan……
Artinya kembali lagi seperti yang sudah dijelaskan dalam artikel sebelumnya, sebaiknya kita tampilkan saja printer dialog sebelum memunculkan view laporan dengan syntax :
Report.PrinterSetup Me.hwnd
tapi kembali lagi semoga artikel ini dapat bermanfaat. karena tetap ada kelebihan dan kekurangannya dari masing-masing cara. Mungkin anda memerlukan ini.
Salam Hangat Code Vb.6

[My-Blog's]