[VB6] Impostare in automatico una stampante tra quelle installate

[elfocaotico]

Ciao,
io ho installato nel mio pc tre stampanti
- Hp laserjet
- Epson Stylus
- Canon cx

Vorrei poter impostare da codice vb la stampante "Epson".
In particolare mi interessa una procedura che mi consenta di impostare la stampante in base al nome che gli dico io....

Cioè, esempio di cosa deve fare il codice ....

- luppa i nomi delle stampanti installate
-- se nel nome stampante esiste la stringa "Epso" settami questa stampante come defaul

E' possibile na cosa del genere???
Va bene anche solo sapere come impostare di default una stampante fra tutte.


Spero di essermi spiegato (disse il paracadute) :maLOL:

Grazie in anticipo

[XVincentX]

E se invece dai una scelta al tuo programma usando una finestra di dialogo?
Una cosa molto professionale e facile da realizzare
Questa semplice DLL permette di richiamare nei programmi una
finestra di dialogo per impostare le stampante.

Dal menu Progetto di Visual Basic aprire la voce Riferimenti e caricare
PrinWin.dll (ovviamente ricordati dove l'hai messa)

Nel modulo del form dichiarare:

Private prw As ImpostaStampante

Richiama poi la funzione o da un pulsante o da un menu nel seguente modo:

Private Sub Command1_Click()
    Set prw = New ImpostaStampante
    prw.Apri
End Sub

Creata da Mauro Rossi

rossimt@sistel.it
(in pratica non l'ho fatta io)

www.fenrir.it/printwin.dll
Fai presto a prenderla o metterla nell'archivio del sito, perchè in poco tempo verrà eliminata!

[elfocaotico]

Grazie mille provo subito e ti faccio sapere se riesco.

Grazie ancora