И так
Dicken, привожу пример
Пусть есть у нас драйвер для RICOH 2020D
Сначала распакуем его C:\Temp\r09114en\disk1\
Далее ищем в файле в секции [RICOH] имя принтера(objDriver.Name)
а в секции [RIC619_DATA] параметр DriverFile=RIC619K.DLL
и внизу скрипт, остается только сделать два действия подключить сетевой диск , если драйвера у тебя на шаре и после подключить принтер
strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
objWMIService.Security_.Privileges.AddAsString "SeLoadDriverPrivilege", True
set objDriver = objWMIService.Get("Win32_PrinterDriver")
objDriver.Name = "RICOH Aficio 2020D PCL 6"
objDriver.SupportedPlatform = "Windows NT x86"
objDriver.Version = "3"
objDriver.DriverPath = "C:\Temp\r09114en\disk1\RIC619K.DLL"
objDriver.Infname = "C:\Temp\r09114en\disk1\OEMSETUP.INF"
intResult = objDriver.AddPrinterDriver(objDriver)
Wscript.Echo intResult
http://www.microsoft.com/technet/scr....mspx?mfr=true
