Ilmu MUFA: Cara Setting PaperSize Crystal Report Pada Visual Basic 6.0

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 :