Obter nomes de portas e endereços IP associados no servidor de impressão W2K

1

Espero que alguém possa ajudar, meu cérebro está frito! No W2K3, posso usar o prnmngr.vbs e obter absolutamente tudo o que preciso do servidor de impressão para listar filas instaladas, nomes de portas, detalhes do driver, endereços IP, etc.

Mas no Server 2000, o script não funciona e não consigo encontrar uma maneira de obter uma lista de portas TCP instaladas e endereços IP associados.

Alguma idéia?

    
por LegalITTech 03.06.2009 / 13:49

3 respostas

2

Você pode usar o seguinte script. Salve-o em "printerlist.vbs" e chame-o usando cscript.exe printerlist.vbs (para obter a saída no console da linha de comando).

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
 & "{impersonationLevel=impersonate}!\" & strComputer & "\root\cimv2")

Set colInstalledPrinters = objWMIService.ExecQuery _
 ("SELECT * FROM Win32_Printer")

Set WshNetwork = WScript.CreateObject("WScript.Network")

WScript.Echo("This Computer's Name = " & WshNetwork.ComputerName)

For Each objPrinter in colInstalledPrinters

    If (objPrinter.Attributes AND 4) = 4 then
      WScript.Echo("*****> Default printer -- Start")
    Else
      WScript.Echo("---")
    End If

    WScript.Echo("Name: " & objPrinter.Name)
    WScript.Echo("Share name: " & objPrinter.ShareName)
    WScript.Echo("Driver name: " & objPrinter.DriverName)
    WScript.Echo("Caption: " & objPrinter.Caption)
    WScript.Echo("Port: " & objPrinter.PortName)
    WScript.Echo("Location: " & objPrinter.Location)
    WScript.Echo("Description: " & objPrinter.Description)
    WScript.Echo("Server: " & objPrinter.ServerName)
    WScript.Echo("System name: " & objPrinter.SystemName)
    WScript.Echo("Print processor: " & objPrinter.PrintProcessor)

    If (objPrinter.Attributes AND 4) = 4 then
       WScript.Echo("*****> Default printer -- End")
    Else
       WScript.Echo("---")
    End If

Next
    
por 03.06.2009 / 14:39
0

Eu finalmente decifrei. O provedor não estava disponível para consultar as portas no servidor W2K, mas a solução era simples depois de tudo isso. Acabei de exportar as chaves de registro para as portas na configuração atual e limpei-as no Excel. Voila! Usando o relatório gerado a partir de filas de impressão criadas no servidor, combinei os dados e agora posso compilar um inventário completo de dispositivos com filas no meu servidor de impressão W2K.

Resultado.

    
por 14.08.2009 / 17:14
0

Aqui está um link para PowerShell for Printers que você pode achar útil para referência futura.

    
por 19.10.2009 / 14:09