Oh yeah...add this on too!

Code:
Private Type DRIVER_INFO_3
    cVersion As Long                   '  2 (Driver for Windows NT 4.0)
    pName As String                    '  QMS 810
    pEnvironment As String             '  Win32 x86
    pDriverPath As String              '  c:\drivers\pscript.dll
    pDataFile As String                '  c:\drivers\QMS810.PPD
    pConfigFile As String              '  c:\drivers\PSCRPTUI.DLL
    pHelpFile As String                '  c:\drivers\PSCRPTUI.HLP
    pDependentFiles As String          '
    pMonitorName As String             '  "PJL monitor"
    pDefaultDataType As String         '  "EMF"
End Type
Private udtDriverInfo As DRIVER_INFO_3