Link to home
Start Free TrialLog in
Avatar of mrochac
mrochac

asked on

Mapping a pritner for a user...

...how would i map a printer for a remote user to a lpt3 port. Windows 2000 enviroment, locally would be net use lpt3: \\server\printer /persistent:yes now how would i do on a remote machine?

MCR
ASKER CERTIFIED SOLUTION
Avatar of David Lee
David Lee
Flag of United States of America image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of mrochac
mrochac

ASKER

Exacly what i wanted, one more ? do you know how to find out what printers are installed locally?

MCR
Yes.  Here's a simple script (VBScript) that uses WMI (Windows Management Instrumentation) to return the details of all the installed printers on the local computer.  If you have adequate rights you can use this script to get the details from a remote computer.  To do that simply change

    strComputer = "."

to
 
    strComputer = "SomeComputerName"

Save the script below into a file ending with .vbs, then run it using CScript.  If you use WScript instead of CScript, then each Wscript.Echo command will create its own dialog-box, which is a real pain.

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Printer",,48)
For Each objItem in colItems
    Wscript.Echo "Attributes: " & objItem.Attributes
    Wscript.Echo "Availability: " & objItem.Availability
    Wscript.Echo "AveragePagesPerMinute: " & objItem.AveragePagesPerMinute
    Wscript.Echo "Capabilities: " & objItem.Capabilities
    Wscript.Echo "CapabilityDescriptions: " & objItem.CapabilityDescriptions
    Wscript.Echo "Caption: " & objItem.Caption
    Wscript.Echo "ConfigManagerErrorCode: " & objItem.ConfigManagerErrorCode
    Wscript.Echo "ConfigManagerUserConfig: " & objItem.ConfigManagerUserConfig
    Wscript.Echo "CreationClassName: " & objItem.CreationClassName
    Wscript.Echo "DefaultPriority: " & objItem.DefaultPriority
    Wscript.Echo "Description: " & objItem.Description
    Wscript.Echo "DetectedErrorState: " & objItem.DetectedErrorState
    Wscript.Echo "DeviceID: " & objItem.DeviceID
    Wscript.Echo "DriverName: " & objItem.DriverName
    Wscript.Echo "ErrorCleared: " & objItem.ErrorCleared
    Wscript.Echo "ErrorDescription: " & objItem.ErrorDescription
    Wscript.Echo "HorizontalResolution: " & objItem.HorizontalResolution
    Wscript.Echo "InstallDate: " & objItem.InstallDate
    Wscript.Echo "JobCountSinceLastReset: " & objItem.JobCountSinceLastReset
    Wscript.Echo "LanguagesSupported: " & objItem.LanguagesSupported
    Wscript.Echo "LastErrorCode: " & objItem.LastErrorCode
    Wscript.Echo "Location: " & objItem.Location
    Wscript.Echo "Name: " & objItem.Name
    Wscript.Echo "PaperSizesSupported: " & objItem.PaperSizesSupported
    Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
    Wscript.Echo "PortName: " & objItem.PortName
    Wscript.Echo "PowerManagementCapabilities: " & objItem.PowerManagementCapabilities
    Wscript.Echo "PowerManagementSupported: " & objItem.PowerManagementSupported
    Wscript.Echo "PrinterPaperNames: " & objItem.PrinterPaperNames
    Wscript.Echo "PrinterState: " & objItem.PrinterState
    Wscript.Echo "PrinterStatus: " & objItem.PrinterStatus
    Wscript.Echo "PrintJobDataType: " & objItem.PrintJobDataType
    Wscript.Echo "PrintProcessor: " & objItem.PrintProcessor
    Wscript.Echo "SeparatorFile: " & objItem.SeparatorFile
    Wscript.Echo "ServerName: " & objItem.ServerName
    Wscript.Echo "ShareName: " & objItem.ShareName
    Wscript.Echo "SpoolEnabled: " & objItem.SpoolEnabled
    Wscript.Echo "StartTime: " & objItem.StartTime
    Wscript.Echo "Status: " & objItem.Status
    Wscript.Echo "StatusInfo: " & objItem.StatusInfo
    Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
    Wscript.Echo "SystemName: " & objItem.SystemName
    Wscript.Echo "TimeOfLastReset: " & objItem.TimeOfLastReset
    Wscript.Echo "UntilTime: " & objItem.UntilTime
    Wscript.Echo "VerticalResolution: " & objItem.VerticalResolution
    Wscript.Echo ""
Next