Code:

Dim $PrinterName, $NewPrinterName
$PrinterName = "Client\pailles_dom-nns\\\hfdc01pl \laserjet 1320"
$NewPrinterName = Split($PrinterName,"\")[Ubound(Split($PrinterName,"\"))]
? $NewPrinterName

I just copied and pasted the printername like you wrote it. Please revise that name. There is IMHO an error in it. Shouldn't it read:
"\\Client\pailles_dom-nns\hfdc01pl \laserjet 1320" ?

Edited by Witto (2006-09-19 09:51 AM)