12. juli 2006 - 11:57Der er
8 kommentarer og 1 løsning
Fjerne netværksprintere i VB script
Hej alle, Jeg har tidligere fået nogle fede scripts her til og tilføje printere, men hvordan fjerner man dem igen via et script? til at tilføje har jeg brugt: Set WshNetwork = CreateObject("WScript.Network")
Teknologi, AI og forretning er i centrum på Computerworlds Cloud og AI Festival i København d. 18. og 19. september. Se hele programmet for den store konference om strategisk brug af Cloud og AI på: www.cloud-festival.dk
Dim WshNetwork On error Resume Next Set WshNetwork = WScript.CreateObject("WScript.Network") Set oPrinters = WshNetwork.EnumPrinterConnections
For i = 0 to oPrinters.Count - 1 Step 2 IF InStr(1,oPrinters.Item(i+1), "\\")=1 THEN IF InStr(oPrinters.Item(i), "LPT")=1 THEN WshNetwork.RemovePrinterConnection oPrinters.Item(i), true, true Else WshNetwork.RemovePrinterConnection oPrinters.Item(i+1), true, true End If End If Next
Jeg ved godt det er en gammel tråd, men prøver alligevel:
Vi har skiftet print-server, og vil gerne fjerne alle printerene fra den gamle server, ude på brugernes PC'er (ikke dem fra den nye).
Nr. 2 Script, som mcgoat skriver - vil den fjerne ALLE netværks printere, eller kun de gamle, som ikke længere har forbindelse?
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.