Interactive PowerBasic Forum

Legacy Software (PBWIN 9.0+/PBCC 5.0+) => Source Code => Scripting => Windows Script Host => Topic started by: José Roca on July 14, 2008, 06:55:26 PM

Title: IWshNetwork.RemovePrinterConnection Method
Post by: José Roca on July 14, 2008, 06:55:26 PM


The following code disconnects a network printer.

JScript


var WshNetwork = WScript.CreateObject("WScript.Network");
var PrinterPath = "\\\\PRN-CORP1\\B41-4523-A";
WshNetwork.RemovePrinterConnection(PrinterPath, true, true);


VBScript


Set WshNetwork = WScript.CreateObject("WScript.Network")
PrinterPath = "\\printserv\DefaultPrinter"
WshNetwork.RemovePrinterConnection PrinterPath, true, true


PowerBASIC


DIM pWshNet AS IWshNetwork
DIM strPrinterPath AS STRING
DIM vForce AS VARIANT
DIM vUpdateProfile AS VARIANT
strPrinterPath = UCODE$("\\printserv\DefaultPrinter")
pWshNet = NEWCOM "WScript.Network"
vForce = %VARIANT_TRUE AS INTEGER
vUpdateProfile = %VARIANT_TRUE AS INTEGER
pWshNet.RemovePrinterConnection strPrinterPath, vForce, vUpdateProfile