stampa virmana na lx300 (3 na 1 stranici)

Ovo mi je problem koji ne znam nikako da resim.
U izvestaju postavim tri reda, tako da tri virmana stanu na jednu stranicu.
Problem mi je kad stampam jedan ili dva virmana stampac posle stampe predje na sledecu stranicu, a ja bih hteo da ostane na sledecem virmanu.
Stampac je epson lx300, a papir je perforirani, beskonacni letter, tri virmana su na jednom papiru.

 Imao sam isti problem kada sam ja radio program za stampanje virmana (VB6). Problem se javljao kada sam koristio komandu Printer, a kod matricnog stampaca je najbolje da koristis Raw print metod: Private Declare Function ClosePrinter Lib "winspool.drv" (ByVal hPrinter As Long) As Long
Private Declare Function EndDocPrinter Lib "winspool.drv" (ByVal hPrinter As Long) As Long
Private Declare Function EndPagePrinter Lib "winspool.drv" (ByVal hPrinter As Long) As Long
Private Declare Function OpenPrinter Lib "winspool.drv" Alias "OpenPrinterA" (ByVal pPrinterName As String, phPrinter As Long, ByVal pDefault As Long) As Long
Private Declare Function StartDocPrinter Lib "winspool.drv" Alias "StartDocPrinterA" (ByVal hPrinter As Long, ByVal Level As Long, pDocInfo As DOCINFO) As Long
Private Declare Function StartPagePrinter Lib "winspool.drv" (ByVal hPrinter As Long) As Long
Private Declare Function WritePrinter Lib "winspool.drv" (ByVal hPrinter As Long, pBuf As Any, ByVal cdBuf As Long, pcWritten As Long) As Long Private Type DOCINFO
pDocName As String
pOutputFile As String
pDatatype As String
End Type Public Sub RawPrint(PrinterName As String, ByVal Data As String, NrOfCopies As Integer)
Printer
Dim lhPrinter As Long
Dim lReturn As Long
Dim lpcWritten As Long
Dim lDoc As Long
Dim MyDocInfo As DOCINFO

lReturn = OpenPrinter(PrinterName, lhPrinter, 0)
If lReturn = 0 Then Exit Sub

With MyDocInfo
.pDocName = "RawPrinterData"
..pOutputFile = vbNullString
.pDatatype = vbNullString
End With

lDoc = StartDocPrinter(lhPrinter, 1, MyDocInfo)
Call StartPagePrinter(lhPrinter)

For i = 1 To NrOfCopies
lReturn = WritePrinter(lhPrinter, ByVal Data, Len(Data), lpcWritten)
lReturn = EndPagePrinter(lhPrinter)
Next i

lReturn = EndDocPrinter(lhPrinter)
lReturn = ClosePrinter(lhPrinter)
End Sub

lepo ti sve ovo napisao, ali mi nista nije jasno.
podaci za virman mi se nalaze na formi,odnosno u tabeli.
Kako ih poslati na stampu?

Jednostavno, U properties-u sa stampac u windowsu/control panel ... stavi CUSTOM za default stranicu za stampac, a dimenzije upisi koje odgovaraju uplatnici (lenjir u ruke), tj. virmanu. odnosno sirina je manje bitna, najbitnija je duzina i mislim da je 101mm, ako se dobro secam. Kod mene to radi godinama tako i to dobro. Nemoj da stavljas 3 na jednu stranu, nego svaki nalog posebno i kad podesis ovako strano mozes da stampas proizvoljan broj naloga ... i svi ce biti OK

Na lx300 nemam custom.

 Pa ovako: Procedura RawPrint(PrinterName As String, ByVal Data As String, NrOfCopies As Integer) se koristi za slanje podataka na stampac. Ako stavis RawPrint Printer.DeviceName, strData, brKopija gde ti je Printer.DeviceName naziv stampaca, strData podaci koje saljes na stampu (u ovom slucaju pretpostavi da saljes string Zdravo) i brKopija integer koji ti odredjuje broj kopija istog teksta onda ova procedura na stampac ti salje rec: Zdravo ^ i glava za stampu staje odmah posle slova o. Tako ako zelis da odstampas sledeci tekst: Hello World strData treba da postavis: strData = "Hello" vbcrlf "World" i pozoves funkciju: RawPrint Printer.DeviceName, strData, 1 Evo ti materijala, sada lenjir u ruke, proracunaj gde sta treba da se nalazi, ako pa malo eksperimentisi.... cu

da te nebih davio mnogo glupim pitanjima, kazi mi u kojoj knjizi o tome mogu procitati.
Nije mi bas jasno kako da odredim pozicije na kojim treba odstampati, uplatio, svrha uplate, iznos, zracun, poziv na broj itd.

... Da ne otvaram novu temu, tiče se sličnog problema. Ja sam u excel-u napravio tabelu sa tri uplatnice (virmana) to sve sjajno funkcioniše kada odštampam samo tri uplatnice (1 stranu),medutim kada stampam npr 9 virmana (3 stranice) prva je OK, na drugoj mi text bezi 8mm gore u odnosu na polje, na trećoj strani bezi 16mm u odnosu na polje i tako dalje. problem je u tome sto mi je stampač podešen na A4 format koji je dim 210x297mm a dužina 3 virmana je 305mm, odnosno 8 mm duzi papir od A4 i svaki naredni list beži za 8 mm. koristim papir sa perforacijom. nadam se da sam sve objasnio kako treba , pa ako može neko da mi objasni kako da podesim štampač EPSON LQ630 da odradi dobro svaku stranu koju mu zadam. Ako je moguće da ga setujem samo za taj dokument sa virmanima... malo sam laik za ovako stručne odgovore kao gore navedeno :( hvala na razumevanju...

Potpis

...ptice ne znaju za granice

@ proka_sm
Ovo je Access forum i deo je foruma Baze podataka. Pošto se radi o podešavanju u Excelu, pitanje postavi na:
http://www.elitesecurity.org/f254-Excel
Poruka će ti biti obrisana kroz nekoliko sati.

Potpis

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski