Scripting a printer driver change

::===================================================
:: Automated Printer Driver Change
::
:: This batch file was written by NetCMH
::
:: Version 1.0 for Windows XP
::
:: Script to:
:: 1. Enumerate the printers on the computer
:: 2. List the default printer
:: 3. Delete and re-add printers with UPD 5.0 driver
:: 4. Re-establish the default printer
::=================================================== 
@echo off
setLocal EnableDelayedExpansion 
ver | find "2003" > nul
if %ERRORLEVEL% == 0 goto ver_2003 
ver | find "XP" > nul
if %ERRORLEVEL% == 0 goto ver_xp 
ver | find "2000" > nul
if %ERRORLEVEL% == 0 goto ver_2000 
ver | find "NT" > nul
if %ERRORLEVEL% == 0 goto ver_nt 
echo Machine undetermined.
goto exit 
:ver_2003
echo Windows 2003
call :create_temp
call :list_printers
call :list_default_printer
call :process_files
rem call :rename_old_files
call :change_drivers
call :cleanup
goto :eof 
:ver_xp
echo Windows XP
call :create_temp
call :list_printers
call :list_default_printer
call :process_files
rem call :rename_old_files
call :change_drivers
call :cleanup
goto :eof 
:ver_2000
echo Windows 2000: Not supported in this version
goto :eof 
:ver_nt
echo Windows NT: Not supported in this version
goto :eof 
:create_temp
if exist "C:\temp\" (
echo. Folder Exists
) else (
mkdir c:\temp\
)
exit /b 
:list_printers
echo Listing printers & ports to text files : c:\temp\prns.txt & c:\temp\prts.txt
cscript //nologo %SYSTEMROOT%\SYSTEM32\prnmngr.vbs -l | findstr /c:"Printer name" | findstr /v "Microsoft" >>  
c:\temp\prns.txt
cscript //nologo %SYSTEMROOT%\SYSTEM32\prnmngr.vbs -l | findstr /c:"Port name" | findstr /v "Microsoft" >> c:\temp\prts.txt
exit /b 
:list_default_printer
echo Listing default printer to text file : c:\temp\defprn.txt
cscript //nologo %SYSTEMROOT%\SYSTEM32\prnmngr.vbs -g >> c:\temp\defprn.txt
exit /b 
:process_files
echo Processing files to extract variables
FOR /F "tokens=1 delims=" %%A in ('type c:\temp\prns.txt') do SET myVar1=%%A
set myvar1=%myvar1:Printer name =%
FOR /F "tokens=1 delims=" %%A in ('type c:\temp\prts.txt') do SET myVar2=%%A
set myvar2=%myvar2:Port name =%
FOR /F "tokens=1 delims=" %%A in ('type c:\temp\defprn.txt') do SET myVar3=%%A
set myvar3=%myvar3:The default printer is =%
exit /b 
:rename_old_files
ren C:\WINDOWS\system32\spool\drivers\w32x86\3\HPBMINI.dll C:\WINDOWS\system32\spool\drivers\w32x86\3\OLD_HPBMINI.dll
ren C:\WINDOWS\system32\spool\drivers\w32x86\3\HPCDMC32.dll C:\WINDOWS\system32\spool\drivers\w32x86\3\OLD_HPCDMC32.dll
exit /b 
:change_drivers
echo Changing Drivers:
for /f "tokens=* delims= " %%a in (c:\temp\prns.txt) do (
cd %SystemRoot%\system32
echo Deleting exisiting UPD 5.0 driver if exists
Cscript Prndrvr.vbs -d -m "HP Universal Printing PCL 5 (v5.0)" -v 3 -e "Windows NT x86"
echo Installing fresh UPD 5.0 driver from server
rundll32 printui.dll,PrintUIEntry /ia /m "HP Universal Printing PCL 5 (v5.0)" /f "\\server01\upd5pcl5\hpcu091b.inf" /u
echo Deleting printers
Cscript Prnmngr.vbs -d -p "%myvar1%"
echo Adding printers
cscript prnmngr.vbs -ac -p "%myvar1%" -m "HP Universal Printing PCL 5 (v5.0)" -r "%myvar2%"
echo Re-instating the default printer
Cscript Prnmngr.vbs -t -p "%myvar3%"
if errorlevel 1 (echo %%a >> c:\temp\failed.txt
) else (
echo Success
)
) 
:cleanup
echo Cleaning up
echo y|del c:\temp\prns.txt
echo y|del c:\temp\prts.txt
echo y|del c:\temp\defprn.txt 
:eof
exit

                                              

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:

::===================================================
:: Automated Printer Driver Change
::
:: This batch file was written by NetCMH
::
:: Version 1.0 for Windows XP
::
:: Script to:
:: 1. Enumerate the printers on the computer
:: 2. List the default printer
:: 3. Delete and re-add printers with UPD 5.0 driver
:: 4. Re-establish the default printer
::=================================================== 
@echo off
setLocal EnableDelayedExpansion 
Rem Querying what OS the batch file's being called from
ver | find "2003" > nul
if %ERRORLEVEL% == 0 goto ver_2003 
ver | find "XP" > nul
if %ERRORLEVEL% == 0 goto ver_xp 
ver | find "2000" > nul
if %ERRORLEVEL% == 0 goto ver_2000 
ver | find "NT" > nul
if %ERRORLEVEL% == 0 goto ver_nt 
echo Machine undetermined.
goto eof 
:ver_2003
echo Windows 2003: Not supported in this version
goto :eof 
:ver_xp
echo Windows XP
call :create_temp
call :list_default_printer
call :create_printerportvbs
call :change_drivers
call :cleanup
goto :eof
 
:ver_2000
echo Windows 2000: Not supported in this version
goto :eof 
:ver_nt
echo Windows NT: Not supported in this version
goto :eof 
:create_temp
Rem Creating a c:\temp folder if it does not exist
if exist "C:\temp\" (
echo Temp Folder Exists
) else (
mkdir c:\temp\
)
exit /b 
:list_default_printer
Rem Listing and storing the default printer
echo Listing default printer to text file : c:\temp\defprn.txt
cscript //nologo %SYSTEMROOT%\SYSTEM32\prnmngr.vbs -g >> c:\tempdefprn.txt
FOR /F "tokens=1 delims=" %%A in ('type c:\temp\defprn.txt') do SET myVar3=%%A
set myvar3=%myvar3:The default printer is =%
exit /b 
:create_printerportvbs
Rem Creating a vbs to query the computer for the printers installed and their respective ports
echo On Error Resume Next > c:\temp\printerport.vbs
echo. >> c:\temp\printerport.vbs 
echo strComputer = "."  >> c:\temp\printerport.vbs
echo Set objWMIService = GetObject("winmgmts:" _ >> c:\temp\printerport.vbs
echo ^& "{impersonationLevel=impersonate}!\\" _>> c:\temp\printerport.vbs
echo ^& strComputer ^& "\root\cimv2")>> c:\temp\printerport.vbs
echo. >> c:\temp\printerport.vbs
echo Set colItems = objWMIService.ExecQuery("Select * from Win32_Printer")>> c:\temp\printerport.vbs
echo. >> c:\temp\printerport.vbs
echo For Each objItem In colItems>> c:\temp\printerport.vbs
echo ^WScript.Echo objItem.DeviceID ^& "," _>> c:\temp\printerport.vbs
echo ^& objItem.PortName ^& "," _>> c:\temp\printerport.vbs
echo ^& objItem.Default>> c:\temp\printerport.vbs
echo. >> c:\temp\printerport.vbs
echo 'WScript.Echo>> c:\temp\printerport.vbs
echo Next>> c:\temp\printerport.vbs
cscript //nologo c:\temp\printerport.vbs | findstr /v "Microsoft" > output.txt
exit /b 
:change_drivers
Rem Drivers section
echo Changing Drivers:
cd %SystemRoot%\system32
echo Deleting exisiting UPD 5.0 driver if exists
Cscript Prndrvr.vbs -d -m "HP Universal Printing PCL 5 (v5.0)" -v 3 -e "Windows NT x86"
echo Installing fresh UPD 5.0 driver from server
rundll32 printui.dll,PrintUIEntry /ia /m "HP Universal Printing PCL 5 (v5.0)" /f "\\server01\upd5pcl5\hpcu091b.inf" /u
call :sleepy 5
for /f "tokens=1,2 delims=," %%a in (c:\temp\output.txt) do (
echo Deleting printers
Cscript Prnmngr.vbs -d -p "%%a"
call :sleepy 5
echo Adding printers
Cscript prnmngr.vbs -ac -p "%%a" -m "HP Universal Printing PCL 5 (v5.0)" -r "%%b"
echo Re-instating the default printer
Cscript Prnmngr.vbs -t -p "%myvar3%"
)
exit /b 
:sleepy
REM %1 is the number of seconds for the delay, as specified on the command line
> "%Temp%.\sleep.vbs" ECHO WScript.Sleep %~1 * 1000
CSCRIPT //NoLogo "%Temp%.\sleep.vbs"
DEL "%Temp%.\sleep.vbs"
exit /b 
:cleanup
echo Cleaning up
echo y|del c:\temp\output.txt
echo y|del c:\temp\defprn.txt
echo y|del c:\temp\printerport.vbs 
:eof

                                              

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126: