Problème de script vbs pour connecter une imprimante réseau au démarra - Windows & Software
Marsh Posté le 31-05-2006 à 18:24:05
Y'a cette ligne qui cloche. T'as du louper un copier/coller quelque part :
sPrintPath = "\\pharmacie\RICOHAfi\pharmacie\RICOH Aficio AP410N PS"
Et sinon, quand tu ajoutes la nouvelle imprimante manuellement ça fonctionne ? C'est laquelle ?
Marsh Posté le 31-05-2006 à 18:31:22
Wolfman a écrit : Y'a cette ligne qui cloche. T'as du louper un copier/coller quelque part : |
Bonjour,
La ligne qui cloche c'est un autre nom que j'ai essayé
Manuellement ça marche
En cherchant dans l'active directory il le trouve manuellement mais je ne peux pas me permettre de faire ça manuellement vue que ce sont des profils itinérant obligatoires.
le nom de l'imprimante est \\pharmacie\RICOH Aficio AP410N PS
J'espère que tu pourrais encore m'aider.
Merci
Marsh Posté le 31-05-2006 à 18:18:04
Bonjour le forum,
J'ai installé une nouvelle salle informatique il y'a un an.
Aujourd'hui, je reçois une nouvelle imprimante mais les profiles n'en tiennent pas compte.
j'ai essayé de créer des nouveaux profils et ça ne fonctionne pas.
J'ai donc essayé de récupérer un script sur le net, le customizer, le lancer par un GPO et là il me dit que le nom de mon imprimante n'est pas correcte, voici le script :
Option Explicit
Dim oNetwork, sPrintPath
Set oNetwork = CreateObject("WScript.Network" )
Select Case oNetwork.ComputerName
Case "SalleInfoPC02"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC03"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC04"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC05"
sPrintPath = "\\pharmacie\RICOHAfi\pharmacie\RICOH Aficio AP410N PS"
Case "SalleInfoPC06"
sPrintPath = "\\pharmacie\RICOHAfi sur pharmacie"
Case "SalleInfoPC07"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC08"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC09"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC10"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC11"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC12"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC13"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC14"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC15"
sPrintPath = "\\pharmacie\RICOH Aficio AP410N PS"
Case "SalleInfoPC16"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC17"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC18"
sPrintPath = "\\pharmacie\RICOHAfi"
Case "SalleInfoPC19"
sPrintPath = "\\pharmacie\RICOHAfi"
End Select
oNetwork.AddWindowsPrinterConnection sPrintPath
oNetwork.SetDefaultPrinter sPrintPath
Est-ce que vous voyez quelque qui ne serait pas normal ?
J'ai essayé plusieurs nom mais aucun ne fonctionne (\\pharmacie\nom du partage ou \\pharmacie\nom du partage\model imprimante...)
J'espère que vous pourrez m'aidez.
Je vous en rermecie d'avance.
bgs