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