none
SCRIPT ELIMINAR Y AGREGAR IMPRESORA RRS feed

  • Pregunta

  • Señores necesito un script que corran todos los usuarios de mi red desde el DC para que pueda eliminar la impresora que tienen agregada en sus perfiles (impresora IP) ya que hubo una migracion de servers y por ende queremos que sea transparente para los usuarios y no haya intervencion de ellos para agregarlas...y que automaticamente se les agregue la misma impresora que esta en un nuevo servidor muchas gracias. Sio fui claro haganmelo saber nos vemos!
    lunes, 12 de marzo de 2007 1:57

Respuestas

  •  Sebastian del Rio Escribió:
    Con este comando borras todas las unidades mapeadas , incluso impresoras
    NET USE * /DELETE /Y

    Si quieres borrar solo la impresora

    net use lpt1 \\impresora /delete

    Asignar impresora nuevamente

    net use lpt1
    \\impresora

    Slds
    Sebastian del Rio
    Buenas practicas para el uso de los foros
    Si la respuesta te fue de utilidad , marcala como respondida

     

     

    Colocas LPT1 peor la impresora no es local sino IP en vez de LPT1 que iria?

    martes, 13 de marzo de 2007 14:07

Todas las respuestas

  • Con este comando borras todas las unidades mapeadas , incluso impresoras
    NET USE * /DELETE /Y

    Si quieres borrar solo la impresora

    net use lpt1 \\impresora /delete

    Asignar impresora nuevamente

    net use lpt1
    \\impresora

    Slds
    Sebastian del Rio
    Buenas practicas para el uso de los foros
    Si la respuesta te fue de utilidad , marcala como respondida

     

    lunes, 12 de marzo de 2007 7:26
  •  Sebastian del Rio Escribió:
    Con este comando borras todas las unidades mapeadas , incluso impresoras
    NET USE * /DELETE /Y

    Si quieres borrar solo la impresora

    net use lpt1 \\impresora /delete

    Asignar impresora nuevamente

    net use lpt1
    \\impresora

    Slds
    Sebastian del Rio
    Buenas practicas para el uso de los foros
    Si la respuesta te fue de utilidad , marcala como respondida

     

     

    Colocas LPT1 peor la impresora no es local sino IP en vez de LPT1 que iria?

    martes, 13 de marzo de 2007 14:07
  • Podrías colocar la ip o nombre del servidor



    \\servidor\impresora
    \\10.1.1.200\impresora

    pueden ser ejemplos



    salu2!
    espero que te sirva la resp ^^
    miércoles, 23 de mayo de 2007 15:17
  • Comprendo que con el net use se pueda eliminar y agregar de una manera fácil y rápida, pero si se desea hacer mediante un script debido a nivel de permisos de los usuarios el "net use" no es posible ejecutarlo.. por lo que he averiguado va con algo así

     

    Code Snippet

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

    WScript.Echo "User Name: " & WshNetwork.UserName

    WshNetwork.MapNetworkDrive "S:", "\\server\share"

     

    o así...

     

    Code Snippet

    Dim obj_Wsh As WshNetwork

    Set obj_Wsh = New WshNetwork    

    obj_Wsh.AddWindowsPrinterConnection "\\server\share"

    obj_Wsh.RemovePrinterConnection "\\server\share"

     

    A ver si alguien puede ayudar


     


     

     

    martes, 5 de junio de 2007 15:43
  • Estimados: yo logre borrar las impresoras por medio de un script. pero el tema es que cuando ya estan borradas tira un error la idea es que haga un check y que verifique que si ya esta borrada no la quiera borrar de nuevo.

    A ver si alguein me puede ayudar en esto

     

    Este es el script

     

    Option Explicit
    Dim objNetwork, strUNCPrinter, bForce, bUpdateProfile
    strUNCPrinter = \\server\impresora
    bForce = "True"
    bUpdateProfile = "False"

    Set objNetwork = CreateObject("WScript.Network")
    ' Section which removes the network printer
    objNetwork.RemovePrinterConnection strUNCPrinter, _
    bForce, bUpdateProfile

    WScript.Echo "Check Printers folder NO: " & strUNCPrinter
    Wscript.Quit

    lunes, 6 de agosto de 2007 14:13
  • Buenas, En vista de que el post es muy antiguo y me hizo falta justamente este script para facilitar a los usuarios la actualización de las impresoras, usando tu código para partir una idea resulto esto.

    Solo deben nombrar la impresora en el host son el mismo nombre que la comparten y llenar las variables correspondientes, queda así

    Option Explicit
    Dim objNetwork, strUNCPrinter, bForce, bUpdateProfile, oPrinters, i, strRemoteName



    strUNCPrinter = "\\192.168.100.76\HPcredito"
    bForce = "True"
    bUpdateProfile = "False"
    strRemoteName = "HPcredito"


    Set objNetwork = CreateObject("WScript.Network") 
    Set oPrinters = objNetwork.EnumPrinterConnections

    For i = 0 to oPrinters.Count - 1 Step 2
    If oPrinters.Item(i+1) = strUNCPrinter Then
    objNetwork.RemovePrinterConnection strUNCPrinter, bForce, bUpdateProfile
    End If
    Next

    objNetwork.AddWindowsPrinterConnection strUNCPrinter, strRemoteName

    objNetwork.SetDefaultPrinter strUNCPrinter

    WScript.Echo "Impresora " & strUNCPrinter &  "agregada"

    Wscript.Quit 


        
    • Editado RonaldDGM sábado, 5 de enero de 2019 18:59
    sábado, 5 de enero de 2019 18:58