Newsgroup: it.comp.lang.visual-basic
Titolo: Stampante sputa fogli

Non si tratta di una sola stampante.
Prima collegata c'era una HP ink-jet, ora invece una Samsung laser, ma 
ogni tanto lanciando la stampa, si ottiene l'emissione continua di fogli 
bianchi. Ho controllato e ricontrollato, il codice VB non presenta cose 
particolari. Dove ciclavo dei dati ed ottenevo una stampa degli stessi 
su piùà fogli, ho rimediato eliminando il Do Loop oppure eliminando il 
For next per paura che fosse il ciclo a mandare in tilt il tutto...ma 
niente. la cosa si ripete. Non possono essere i driver della stampante, 
perchè ripeto ho anche cambiato stampante e driver aggiornatissimi per 
XP. Non so più che santi chiamare. Qualcuno ha avuto esperienze simili?
Grazie.

 Non si tratta di una sola stampante.
... dimenticavo la stampante è in rete.

 Grazie.
Stampi oltre i limiti utilizzabili della pagina.
-- 
-> GbC|
www.gbcweb.com
www.chiappori.com
 

la stampante emette fogli a nastro anche se stampi solo 10 parole ?
io proverei a ridure il tuo codice ai "minimi termini" come dicevo a poche e 
se continua a stampare in modo errato riduco fino a stampare una sola 
parola.


se non ricordo male stampare oltre i limiti è uguale a non stampare, ovvero 
la stampante taglia la parte che "sporge" 


Ricordi male


Vuoi dirmi che riporta a capo la "sporgenza" ?

 Vuoi dirmi che riporta a capo la "sporgenza" ?
Ho detto quello che ho scritto. Cioè:
[paste]
Stampi oltre i limiti utilizzabili della pagina.
[/paste]
Alcuni driver di stampanti reagiscono all'utilizzo di coordinate fuori 
dall'area stampabile emettendo fogli. Le vecchie HP a getto, per 
esempio. Utilizzo di coordinate significa valori di currentX e currentY 
fuori dall'area effettivamente stampabile della stampante.
Il driver della stampante non rilascia l'intera area del foglio A4, ed 
ogni stampante (in alcuni casi anche con versioni diverse del driver 
nella stessa stampante) è in grado di utilizzare una pare limitata 
dell'intera area del foglio. Nelle laser è necessario lasciare qualche 
millimetro per il trascinamento del foglio, ad esempio.
L'utilizzo di coordinate al di fuori di questa area 'disponibile' può 
generare problemi di quel genere.
Il workaround è -ove possibile e se non si intende modificare la stampa- 
indicare alla stampante che si sta utilizzando una formato di carta più 
grande (lettera invece che A4, ad esempio).
Ah, dimenticavo. Quota meglio, perché come hai fatto non è corretto. Ciò 
cui ci si riferisce deve essere riportato, altrimenti non si capisce.
Ciao cia'



doppie scuse:
- in effetti ho risposto fraintendendo la tua risposta.
- ho quotato male hai ragione! Sorry.
Ciao 

 Stampi oltre i limiti utilizzabili della pagina.
Ho paura di no.
Non mi sembra il caso di postare tutto il codice,dovrebbero bastare le 
ultime righe:
Printer.CurrentX = 2000
Printer.CurrentY = 8400
Printer.Print "Padova lì " & Date
Printer.EndDoc

XP ha scritto:

Non sei proprio chiaro. Se devo stampare 12 righe è perchè me ne servono 
12. Cosa vuol dire stapare una sola parola...non sto facendo una prova!

 la stampante taglia la parte che "sporge" 
E su questo potrei anche essere d'accordo....succede anche con la penna 
se scrivi sul tavolo
anzichè sul foglio!
Il fatto è che non viene stampato priprio nulla e vengono sputati fogli 
in continuazione....per non rovinare l'intera risma spengo la stampante!

 Printer.EndDoc
Non sò se può esserti utile:
Private Sub Form_Load()
    'Controlla la proprietà ScaleMode
    With Printer
        .ScaleMode = vbMillimeters
        w = .ScaleWidth
        h = .ScaleHeight
        wf = Printer.Width / 56.7
        hf = Printer.Height / 56.7
        MsgBox _
            "X Twips/mm: " & 2000 / 56.7 & vbCrLf & _
            "Y Twips/mm: " & 8400 / 56.7 & vbCrLf & _
            vbCrLf & _
            "Larghezza Area Stampabile: " & w & vbCrLf & _
            "Altezza Area Stampabile: " & h & vbCrLf & _
            "Margine Destro/Sinistro: " & (wf - w) / 2 & vbCrLf & _
            "Margine Superiore/Inferiore: " & (hf - h) / 2
    End With
End Sub
-- 
Ciao Fede
By Chicco Production
http://bcp.freetools.it

 Non sò se può esserti utile:
Grazie a tutti.