vbscript和prncnfg.vbs裏面？

我有一個vbscript來獲取有關係統打印遠程計算機的一些信息。我可以安裝所有的驅動程序，默認的網絡打印機名稱和我的所有結果都發送到輸出文件中。我想從打印機服務器（驅動程序，位置等）通過prncnfg.vbs獲取有關我的默認網絡打印機的信息，並將這些信息發送到我的輸出文件中。也許還有其他方法可以做到這一點？vbscript和prncnfg.vbs裏面？

感謝您的任何建議

來源

2016-01-11 brs65

這是你正在尋找的東西： http://www.computerperformance.co.uk/vbscript/wmi_printer.htm – user5612655

謝謝。但有2個問題。第一個問題是我無法獲得任何遠程計算機的網絡打印機，因爲每個Windows配置文件都有一個默認打印機。我只能爲我登錄的計算機獲取此信息。第二個是你的鏈接不能解釋如何獲取有關網絡打印機的信息。如何在vbscript中使用prncnfg .. – brs65

你知道如何使用prncnfg以外的vbscript來找到你需要的信息??。如果是，那麼我們需要找到一種方法來運行你需要的命令，我不認爲這應該是困難的。如果是這種情況，那就讓我知道 – user5612655

所以，我開始明白如何做到這一點。但有些東西不起作用。

首先，我需要閱讀文件並刪除10個caracters創建我的變量，這個過程中工作得非常好：

「讀取C：\ TEMP \ DefaultPrinter 昏暗shortDefaultPrinter 如果objFSO.FileExists（「\」 & strComputer的& 「\ C $ \ TEMP \ DefaultPrinter.txt」），那麼設置 = objFileToRead的CreateObject（「Scripting.FileSystemObject的」）。的OpenTextFile（「\」 & strComputer的& 「\ C $ \ TEMP \ DefaultPrinter.txt」，1 ） DefaultPrinter = objFileToRead.ReadAll（） 'remove text \ vangogh \ shortDef aultPrinter =右（DefaultPrinter，萊恩（DefaultPrinter） - 10）「MSGBOX（shortDefaultPrinter） objFileToRead.Close 設置objFileToRead =無

其次，我想用我的變量shortDefaultPrinter爲我的查詢找到我的打印機的位置：

「選擇DefaultPrinter和展示位置常量ADS_SCOPE_SUBTREE = 2

Set objConnection = CreateObject("ADODB.Connection") 
Set objCommand = CreateObject("ADODB.Command") 
objConnection.Provider = "ADsDSOObject" 
objConnection.Open "Active Directory Provider" 

Set objCommand.ActiveConnection = objConnection 
objCommand.CommandText = "Select printerName, serverName, Location from " _  
    & " 'LDAP://DC=huge,DC=ad,DC=hcuge,DC=ch' where objectClass='printQueue' and printerName='" & shortDefaultPrinter & "' " 

objCommand.Properties("Page Size") = 1000 
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE 
Set objRecordSet = objCommand.Execute 
objRecordSet.MoveFirst 

Do Until objRecordSet.EOF 
    PrinterLocation = objRecordSet.Fields("Location").Value 
    MsgBox(PrinterLocation) 
    objRecordSet.MoveNext 

Loop

MSGBOX不開，但如果我寫的打印機的名稱來代替「& shortDefaultPrinter &「，ex dmed-i714，該過程起作用。

我在這裏。如果任何人有一個建議，將不勝感激。

來源

2016-01-21 07:16:43 brs65

vbscript和prncnfg.vbs裏面？

回答

相關問題