Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
3326 connectés 

  FORUM HardWare.fr
  Windows & Software

  Imprimante réseau : installation automatique sur les clients ...

 
 


Dernière réponse
Sujet : Imprimante réseau : installation automatique sur les clients ...
lari80 oh j'avais oublier .voilà le script en question
 @echo off
 
:: Remplacer les 3 champs suivants par vos valeurs
:: ATTENTION: Le nom de l'imprimante doit correspondre au nom de vortre imprimante dans le fichier INF (cf section [DriverName.xxxxx])
:: Le nom de la file d'attente LPR peut etre trouvé en installant l'imprimante manuellement et en verifiant les propriétes du port TCP/IP d'une installation "témoin"
:: Mettre un chemin absolu pour le pilote d'impression
 
set AdresseIP=10.97.3.5
set Imprimante=HP LaserJet P2050 Series PCL 6
set Pilote=C:\windows\systeme32\DriverStore\FileRepository\hppcp6 13.inf_x86_neutral_a3fe7207764817d1\hppcp6 13.inf
set Raw=9100
 
:: --- Ne pas toucher ? la suite du fichier ---
 
 
echo Creation d'un port d'impression TCP/IP a l'adresse %AdresseIP%
 
set CLEPORT="HKLM\System\CurrentControlSet\Control\Print\Monitors\Standard TCP/IP Port\Ports"
REG ADD %CLEPORT%\TCP_%AdresseIP% /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v Protocol /t REG_DWORD /d 0x00000002 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v Version /t REG_DWORD /d 0x00000001 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v HostName /t REG_SZ /d "" /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v IPAddress /t REG_SZ /d %AdresseIP% /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v PortMonMibPortIndex /t REG_DWORD /d 0x00000001 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v HWAddress /t REG_SZ /d "" /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v PortNumber /t REG_DWORD /d 0x00000203 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "SNMP Community" /t REG_SZ /d Public /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "SNMP Enabled" /t REG_DWORD /d 0x00000000 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "SNMP Index" /t REG_DWORD /d 0x00000001 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v Queue /t REG_SZ /d %fileLPR% /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "Double Spool" /t REG_DWORD /d 0x00000000 /f > NUL
 
:: Redemarrage du spooler d'impression
net stop spooler
net start spooler
 
:: Installation de l'imprimante
echo Installation de l'imprimante %Imprimante% sur le port TCP_%AdresseIP%. Veuillez patienter...
rundll32 printui.dll,PrintUIEntry /if /f "%Pilote%" /b "%Imprimante%" /r TCP_%AdresseIP% /m "%Imprimante%"
 
:: Mettre l'imprimante par defaut
rundll32 printui.dll,PrintUIEntry /y /n "%Imprimante%"

Votre réponse
Nom d'utilisateur    Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !
Le ton de votre message                        
                       
Votre réponse
[b][i][u][strike][spoiler][fixed][cpp][url][email][img][*]   
 
   [quote]
 
Options

 
Vous avez perdu votre mot de passe ?


Vue Rapide de la discussion
lari80 oh j'avais oublier .voilà le script en question
 @echo off
 
:: Remplacer les 3 champs suivants par vos valeurs
:: ATTENTION: Le nom de l'imprimante doit correspondre au nom de vortre imprimante dans le fichier INF (cf section [DriverName.xxxxx])
:: Le nom de la file d'attente LPR peut etre trouvé en installant l'imprimante manuellement et en verifiant les propriétes du port TCP/IP d'une installation "témoin"
:: Mettre un chemin absolu pour le pilote d'impression
 
set AdresseIP=10.97.3.5
set Imprimante=HP LaserJet P2050 Series PCL 6
set Pilote=C:\windows\systeme32\DriverStore\FileRepository\hppcp6 13.inf_x86_neutral_a3fe7207764817d1\hppcp6 13.inf
set Raw=9100
 
:: --- Ne pas toucher ? la suite du fichier ---
 
 
echo Creation d'un port d'impression TCP/IP a l'adresse %AdresseIP%
 
set CLEPORT="HKLM\System\CurrentControlSet\Control\Print\Monitors\Standard TCP/IP Port\Ports"
REG ADD %CLEPORT%\TCP_%AdresseIP% /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v Protocol /t REG_DWORD /d 0x00000002 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v Version /t REG_DWORD /d 0x00000001 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v HostName /t REG_SZ /d "" /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v IPAddress /t REG_SZ /d %AdresseIP% /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v PortMonMibPortIndex /t REG_DWORD /d 0x00000001 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v HWAddress /t REG_SZ /d "" /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v PortNumber /t REG_DWORD /d 0x00000203 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "SNMP Community" /t REG_SZ /d Public /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "SNMP Enabled" /t REG_DWORD /d 0x00000000 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "SNMP Index" /t REG_DWORD /d 0x00000001 /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v Queue /t REG_SZ /d %fileLPR% /f > NUL
REG ADD %CLEPORT%\TCP_%AdresseIP% /v "Double Spool" /t REG_DWORD /d 0x00000000 /f > NUL
 
:: Redemarrage du spooler d'impression
net stop spooler
net start spooler
 
:: Installation de l'imprimante
echo Installation de l'imprimante %Imprimante% sur le port TCP_%AdresseIP%. Veuillez patienter...
rundll32 printui.dll,PrintUIEntry /if /f "%Pilote%" /b "%Imprimante%" /r TCP_%AdresseIP% /m "%Imprimante%"
 
:: Mettre l'imprimante par defaut
rundll32 printui.dll,PrintUIEntry /y /n "%Imprimante%"
lari80 j'ai touvé un script sur  un forum mais après avoir modifié les champs à modifier mais on me envoi deux message d'erreur à savoir: (erreur 0x00000003) et (erreur0x00000709). à l'aide svp
lari80 en fait ge sui bleu et j'aimerais savoir exactement quels sont les champs ke ge dois modifier pour pouvoir résoudre mon problème ki est le suivant.j'aimerais que les utilisateurs du réseau puissent se connecter au serveur d'impression pour  se voir connecter une imprimante disponible sur le réseau.
lari80 slt ! j'excecute le script posté par el pollo diablo sur un poste client mais je ne m'en sors pas .au secours
serial_xp Apres lecture de ce sujet j'en arrive a ce script :  
 

Code :
  1. Dim objPrinter
  2. Dim strComp
  3. Dim wshNetwork, wshShell, nReturnCode
  4. Dim i, j
  6. 'obtient le nom d'utilisateur
  7. Set wshShell = WScript.CreateObject("WScript.Shell" )
  8. strComp = wshShell.ExpandEnvironmentStrings("%COMPUTERNAME%" )
  10. 'definit l'imprimante par defaut
  11. Set objPrinter = CreateObject("WScript.Network" )
  12. Select Case strComp
  13. Case "Salle12", "Salle12", "Salleacte1", "Salleacte2", "Accueil1", "Accueil2"
  15. Dim colPrinters, aryPrinters
  17. aryPrinters = Array("\\SRVDUPONT\Oki1", "\\SRVDUPONT\SamsungCPL350" )
  18. Set wshNetwork = WScript.CreateObject("WScript.Network" )
  20. 'Connect printers
  21. Set colPrinters = wshNetwork.EnumPrinterConnections
  22. For i = 0 To colPrinters.Count - 1 Step 2
  23. 'Disconnect already connected printers
  24. For j = LBound(aryPrinters) To UBound(aryPrinters)
  25. If (colPrinters(i) = aryPrinters(j)) Then
  26. wshNetwork.RemovePrinterConnection aryPrinters(j)
  27. End If
  28. Next
  29. Next
  30. For j = LBound(aryPrinters) To UBound(aryPrinters)
  31. wshNetwork.AddWindowsPrinterConnection aryPrinters(j)
  33. objPrinter.SetDefaultPrinter "\\SRVDUPONT\Oki1"
  35. Case "salle21", "Salle22", "Bureau3"
  37. Dim colPrinters, aryPrinters
  39. aryPrinters = Array("\\SRVDUPONT\Oki2", "\\SRVDUPONT\SamsungCPL350" )
  40. Set wshNetwork = WScript.CreateObject("WScript.Network" )
  42. 'Connect printers
  43. Set colPrinters = wshNetwork.EnumPrinterConnections
  44. For i = 0 To colPrinters.Count - 1 Step 2
  45. 'Disconnect already connected printers
  46. For j = LBound(aryPrinters) To UBound(aryPrinters)
  47. If (colPrinters(i) = aryPrinters(j)) Then
  48. wshNetwork.RemovePrinterConnection aryPrinters(j)
  49. End If
  50. Next
  51. Next
  52. For j = LBound(aryPrinters) To UBound(aryPrinters)
  53. wshNetwork.AddWindowsPrinterConnection aryPrinters(j)
  55. objPrinter.SetDefaultPrinter "\\SRVDUPONT\Oki2"
  57. Case Else
  59. wshNetwork.AddWindowsPrinterConnection "\\SRVDUPONT\SamsungCPL350"
  61. End Select


 
Cela a-t-il l'air correct?
 
Merci d'avance pour votre réponse
Drwily Bonjour,
 
Juste pour savoir si le script de requin fonctionne aussi avec des imprimantes dont le chemin est en http. Dans ce cas je me demande comment va se faire l'installation du pilote puisque l'imprimante ne l'a pas dans sont firmware.
 
Alors ?
 
merci !  :jap:
hfrfc Trouvé sur un site :
 
@ECHO OFF
VER | FIND "Windows 2000" >NUL
IF ERRORLEVEL 1 GOTO Syntax
 
SETLOCAL
SET Printer=%1
SET RemotePC=%2
 
:: Check printer specified
IF NOT DEFINED Printer GOTO Syntax
IF NOT "%Printer:~0,2%"=="\\" GOTO Syntax
FOR /F "tokens=1* delims=\" %%A IN ('ECHO.%Printer%') DO (
 SET PrintServer=%%A
 Set PrintShare=%%B
)
IF NOT DEFINED PrintShare GOTO Syntax
PING %PrintServer% -n 1 -w 1000 2>&1 | FIND "TTL=" >NUL
IF ERRORLEVEL 1 GOTO Syntax
NET VIEW \\%PrintServer% 2>&1 | FIND /I "%PrintShare%" >NUL
IF ERRORLEVEL 1 GOTO Syntax
 
:: Check remote PC if specified
IF DEFINED RemotePC SET RemotePC=%RemotePC:\=%
IF DEFINED RemotePC (
 PING %RemotePC% -n 1 -w 1000 2>&1 | FIND "TTL=" >NUL
 IF ERRORLEVEL 1 GOTO Syntax
 SET RemotePC=/C\\%RemotePC%
)
 
:: Install the printer on the specified computer
RUNDLL32.EXE PRINTUI.DLL, PrintUIEntry /ga /n%Printer% %RemotePC%
IF NOT ERRORLEVEL 1 ECHO Printer installed, please reboot %RemotePC%
 
ENDLOCAL
GOTO:EOF
 
:Syntax
ECHO.
ECHO AddPrint.bat,  Version 1.01 for Windows 2000
ECHO Install a network printer on any PC on the network
ECHO.
ECHO Usage:  ADDPRINT  \\print_server\printer_share  [ remote_pc ]
ECHO.
ECHO Where:              "print_server"   is the print server name or IP address
ECHO                     "printer_share"  is the share name for the printer
ECHO                     "remote_pc"      is the PC that will be using the
ECHO                                      network printer -- default is local PC
ECHO.
ECHO Written by Rob van der Woude
ECHO http://www.robvanderwoude.com
 
IF "%OS%"=="Windows_NT" ENDLOCAL
 
 
marche bien !
poah42 drap itou
hfrfc drap tardif :p
skawn Je voudrais mettre un script en place pour donner accès au utilisateur du domaine.
Toutes les imprimantes sont accescible depuis un printserveur.
 
Chaque utilisateur à son imprimante à lui et dois être mis par défaut. Une deuxième imprimante serait une toutes grosse Xerox à chaque étage pour toutes les personnes de cette étage.
 
L'administration devrait se faire par l'Active Directory. Donc je crée des groupes (=OU) et dedans je crée des groupes comme GGXXX_IMP234A (nom groupe imprimante). La dedans je mettrais les personnes qui seront membre de ce groupe afin qu'ils aient l'imprimante en question.
 
J'ai déjà un script comme ceci mais il manque des choses.
 
 


Dim $Print
Dim $Group
 
$root = GetObject("LDAP://Ou=IMP Printers,Ou=IMPIM Groups,DC=nomdomaine,DC=UK" )
$PrintServer = "\\imprt04.nomdomaine.uk\"
 
For Each $object In $root
 
$Print = Split($Object.Name,"_" )
$Group = Split($Object.Name,"=" )
 
 ? $Group[1]
 ? $Print[1]
 
If InGroup ($Group[1])
 
 If ADDPRINTERCONNECTION ($PrintServer + $Print[1])=0
     ? "Added printer " + $Print[1]
 Endif
 
Endif
Next

petoulachi drapal !
Requin Tu vas pouvoir remplacer tes batchs avantageusement par des scripts Windows !
 
Va voir ici :
 
http://msdn.microsoft.com/library/ [...] olders.asp
 
Tu as des exemples de codes utilisant FSO pour la copie de fichiers ou répertoires.
 
Si tu souhaites la documentation complète de FSO :
 
http://msdn.microsoft.com/library/ [...] olders.asp
 
Rien ne t'empêche de faire un fichier log ou tenir à jour une base de données avec les entrées pour chaque machine (il suffit de lire la variable d'environnement %COMPUTERNAME% pour par exemple créer ta clef primaire) une fois la copie achevée et donc d'avoir en clin d'oeil la date du dernier backup d'une machine.
 
Pour ce qui est de l'installation FSO fait partie du corps de WSH, donc il est probablement déjà installé et prêt à l'emplois ;)
bigmelo je t'explique requin,
 
 
chez nous, les clients ont leurs docs en local, puis tous les jours une sauvegarde de leurs docs se fait sur le serveur via un .bat.
Je ne connait pas du tou FSO tu peux m'expliquer comment l'avoir et comment le configurer?
 
Requin

bigmelo a écrit :

C'est bon j'ai trouvé d'ou venait l'erreur, maintenant j'aimerais  
faire un script qui me permet de vérifier les sauvegardes des users et qui me signale celles qui n'ont pas marchées.
 
c'est possible? si oui comment?


 
Bon une fois que ton script est OK tu peux ajouter sur la première ligne :
 

Code :
  1. on error resume next


 
ce qui permettera à ton script de ne pas soulever les erreurs (imagein par exemple qu'un des serveurs est arrêté, le mappage n'est pas disponible et tu va avoir un message)
 
Tu les fais comment les savuegardes, avec quel utilitaire ? Car si tu as des fichiers tu peux utiliser File System Object (FSO) pour aller vérifier son existance, sa date, etc...
resan2 C'est bon le code (c'était quoi déjà ton erreur?)
 
Mais il y aurait une possibilité fiable de ne pas l'ajouter  
l'imprimante à chaque ouverture de session? dans le genre
n'Executer que le code lors du prochain logon et pas par la suite?
Encore mieux, verifier si l'imprimante est déja défini
serait la solution idéale.
Quelqu'un a ca ce bout de code???
 
thanks to all
 

bigmelo a écrit :

C'est bon j'ai trouvé d'ou venait l'erreur, maintenant j'aimerais  
faire un script qui me permet de vérifier les sauvegardes des users et qui me signale celles qui n'ont pas marchées.
 
c'est possible? si oui comment?
bigmelo C'est bon j'ai trouvé d'ou venait l'erreur, maintenant j'aimerais  
faire un script qui me permet de vérifier les sauvegardes des users et qui me signale celles qui n'ont pas marchées.
 
c'est possible? si oui comment?
bigmelo Voila mon script:
 
 
Dim objPrinter
Dim strUser
Set wshShell = WScript.CreateObject("WScript.shell" )
strUsername = wshShell.ExpandEnvironmentStrings("%USERNAME%" )
Set objPrinter = CreateObject("WScript.Network" )
Select Case strUsername
Case "toto"
objPrinter.SetDefaultPrinter "\\svr\HPinfo"
Case "tata"
objPrinter.SetDefaultPrinter "\\svr\HPinfo"
Case Else
objPrinter.SetDefaultPrinter "\\svr\HPCL"
End Select
 
voila l'erreur que j'ai:
 
\\chemin du .vbs
ligne:10
caract:1
erreur: il n'y a pas d'imprimante appelée "\\svr\HPinfo"
code:80020009
source:WSHNetwork.SetDefaultPrinter
 
pour info:
Toutes les imprimantes sont installées sur mon serveur "svr" (serveur 2000) et partagés avec le bon nom de partage et les bons droits.
 
qui pe m'aider?
bigmelo tou va bien sauf qu'il me dit maintenant que l'imprimante n'existe pas, j'ai bien vérifié sur le serveur si elle est bien installée, avec le bon nom, la bonne ip, et le bon driver ainsi que les droits, la je ne comprend pas, tu as une idée
 
pour info: j'ai installé toutes mes imprimantes sur un serveur 2000 sp3, avec le bon partage et les bons droits et elles sont toutes activé dans active directory.
Requin Sans les 6 première lignes du code source c'est un peu dur... en clair il s'agit d'une erreur de syntaxe.
 
Cela peut poser problème, les scripts de démarrage et d'arrêt s'exécutent je suppose dans le contexte SYSTEM (ce qui devrait quand même te permettre de faire bcp de choses)...
 
Si tu souhaites agir sur la partie machine vérifie que le compte de l'ordainteur se trouve bien dans l'OU sur laquelle tu as appliqué la policy.
bigmelo Requin, moi justement je ve agire sur les pc's et non les users, ca ne pose pas de pb?
 
deplus j'ai copier le script d 'El pollo diablo plus haut en changant le nom du serveur et de l'imprimante mais j'ai l'erreur suivante:
 
ligne: 6
caractere: 5
erreur: instruction attendue
code: 800A0400
source: erreur de compilation microsoft VBScript
 
qui peu m'aider pour ce message d'erreur?
costla Je viens de faire la même chose que toi, installer les nouvelles imprimantes via le login script,
J'ai créer des groupes NT, et mis les gens dedans, avec l'utilitaire IFMEMBER (ressource kit W2K), le loginscript determine dans quel groupe et le user et en fonction de ca fais appel au VBS avec les commandes que je t'ai donné

Forum MesDiscussions.Net, Version 2010.2
(c) 2000-2011 Doctissimo

Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)