Link to home
Start Free TrialLog in
Avatar of VBdotnet2005
VBdotnet2005Flag for United States of America

asked on

copier machine - ip address

I have a color copier which is installed  on one of our servers. I tried using Share printer so that other client computers can use it. My question is how can I connect it via ip address? Is there such a way?
Avatar of Jay_Jay70
Jay_Jay70
Flag of Australia image

Hi VBdotnet2005,

from what i think you are getting at - you want to assign the printer an IP??? if thats so the printer must have a network card or you need to buy a print server such as an HP jetdirect

otherwise you are stuck with from each client doing the following  \\servername(or IP)       and then right clicking and hitting connect

Cheers!
Avatar of VBdotnet2005

ASKER

When the printer has its own IP, I don't need to use Share the printer, right?  How can I add a printer on a client?
Avatar of rairdonm
rairdonm

as Jay_Jay70 said...no can do without network card.

however, you don't have to have individuals connect their own printers.

There is an answer here https://www.experts-exchange.com/questions/20943033/Login-script-for-printers.html?qid=20943033 for that.

Brief summary of scripts:
'SETS NETWORK SHARED PRINTER AS DEFAULT PRINTER
Option Explicit
Dim objPrinter
Set objPrinter = CreateObject("WScript.Network")
objPrinter.SetDefaultPrinter "\\server\printer"
' End of Script

'CONNECTS NETWORK SHARED PRINTER (NOT AS DEFAULT)
Set objWSHNetwork = CreateObject("WScript.Network")  'create network object
strConnectString = "\\server\printer"
strResult = objWSHNetwork.AddWindowsPrinterConnection(strConnectString)
Read up on that article for how to automate this for the clients and use with group policy.  You sould already have a login script based on groups such as this:
Here's a sample script for mapping drives based on group membership just add your printer(s) to it that you want to share.

On Error Resume Next

Set objSysInfo = CreateObject("ADSystemInfo")
Set objNetwork = CreateObject("Wscript.Network")

strUserPath = "LDAP://" & objSysInfo.UserName
Set objUser = GetObject(strUserPath)

For Each strGroup in objUser.MemberOf
    strGroupPath = "LDAP://" & strGroup
    Set objGroup = GetObject(strGroupPath)
    strGroupName = objGroup.CN

    Select Case strGroupName
        Case "Finance Users"
            objNetwork.MapNetworkDrive "X:", "\\atl-fs-01\finance"
       
        Case "Human Resource Users"
            objNetwork.MapNetworkDrive "X:", "\\atl-fs-01\hr"

        Case "Manufacturing Users"
            objNetwork.MapNetworkDrive "X:", "\\atl-fs-01\manufacturing"

        Case "Shipping and Receiving Users"
            objNetwork.MapNetworkDrive "X:", "\\atl-fs-01\shipping"
    End Select
Next

Just add the printer to the appropriate groups or put it in front of the FOR EACH section of code so ALL users map to this printer.
You also have to make sure that if you are sharing the printer via server, the driver support for all kind of OS should be installed which you have in your network otherwise it may give problems. For example if you only install the driver for XP on server and you also have NT machines in your network, you need to add NT driver support too on server.
ASKER CERTIFIED SOLUTION
Avatar of Jay_Jay70
Jay_Jay70
Flag of Australia 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