Titolo: Quando non riesco a cambiare stampante con SET CURRENT PRINTER
Categoria: Codice |
|
Ultimo Aggiornamento: 12/12/07 |
Mi è capitato a volte che SET CURRENT PRINTER non mi cambiasse la stampante, soprattutto se la stampante era una stampante di rete. Per autorisolvermi il problema ho adottato alcune strategie.
Il primo tentativo, poco fruttuoso in realtà, è stato quello di pingare l'ip della stampante o del print server associato, usando:
C_LONGINT($alive)
For ($i;1;3)
NET_Ping ([Stampanti]IP_da_controllare;"";$alive;1)
If ($alive=1)
$i:=5
End if End for ma a volte la stampante non veniva variata ugualmente.
Allora sono passato all'approccio "controllo se la stampante è cambiata", cioè:
Repeat SET CURRENT PRINTER([Stampanti]Stampante)
$StampanteCorrente:=Get current printer
Until ($StampanteCorrente=[Stampanti]Stampante)
Avendo poi visto che in massimo due/tre passaggi la stampante veniva settata, per evitare un controllo troppo bloccante ho deciso di usare:
For ($i;1;5)
SET CURRENT PRINTER([Stampanti]Stampante)
End for Così, se la stampante non viene settata per un qualsiasi motivo, stamperebbe comunque sulla stampante di default, ma questo errore non si è più verificato.
Inviato da: PierPaolo Sichera |
|
Visite: 11060 |
Se accedi con utente e password, puoi aggiungere dei commenti.