Senin, 04 Juli 2011

[belajar-access] Bagaimana cara print ke lx-300 dgn ukuran font 8

 

guy,
aku mau print dari ms.access ke printer epson lx300
cara nya :

Function c()
Open "\\namaPrinter\lx300" For Output As #1
 Print #1, Chr(27) & "@" 'Initialize printer
   Print #1, Chr(27) & "A" & Chr(10) ' set to 10/72"
   Print #1, "This is a test first row"
   Print #1, "This is a test second row"
   Print #1, Chr(27) & "A" & Chr(30) ' set to 30/72"
   Print #1, Chr(27) & "E" 'Bold
   Print #1, "This is a test first row"
   Print #1, "This is a test second row"
   Print #1, Chr(27) & "F"
Close #1
End Function

hasil dari print di atas tidak menghasil kan font yang kecil.....
mohon solusi nya thx

note: kebutuhan nya direct print , tak bisa melalui report access
 
Best regard
Erwin Sugiawan


__._,_.___
Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar