Article View: free.it.visual-basic
Article #1260Come faccio ad impostare la stampante predefinita?
From: Tixio
Date: Sun, 05 Sep 2004 19:33
Date: Sun, 05 Sep 2004 19:33
19 lines
1484 bytes
1484 bytes
Salve a tutti!
Ho bisogno di aiuto: avrei bisogno di impostare via software la stampante
predefinita e impostare il formato di carta "A3"...possiedo Visual Basic 6.0
su Windows 98.
Ho provato ad utilizzare il seguente codice ma non succede niente...e non
ricevo alcun messaggio di errore.
Dim P As Printer
For Each P In Printers
If P.Port = "LPT1:" And P.DeviceName = "HP Laserjet" Then
Set Printer = P
Printer.PaperSize = vbPRPSA3 'Imposta il formato A3
Exit For
End If
Next P
Qualcuno pu� "illuminarmi"?
Grazie 1000!
Tiziano
Technical Details
Message-ID:
<YRJ_c.78408$1V3.1916344@twister2.libero.it>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!newsfeed.icl.net!news.mailgate.org!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Thread: f94ee,fe1237ce48693b48,start X-Google-Attributes: gidf94ee,public X-Google-Language: ITALIAN,ASCII Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!newsfeed.icl.net!news.mailgate.org!nntp.infostrada.it!twister2.libero.it.POSTED!not-for-mail From: "Tixio" <nom@il.thanks> Newsgroups: free.it.visual-basic Subject: Come faccio ad impostare la stampante predefinita? Lines: 23 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2600.0000 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000 Message-ID: <YRJ_c.78408$1V3.1916344@twister2.libero.it> Date: Sun, 05 Sep 2004 19:33:12 GMT NNTP-Posting-Host: 151.27.11.135 X-Complaints-To: abuse@libero.it X-Trace: twister2.libero.it 1094412792 151.27.11.135 (Sun, 05 Sep 2004 21:33:12 MET DST) NNTP-Posting-Date: Sun, 05 Sep 2004 21:33:12 MET DST Organization: [Infostrada]