プリンタドライバを追加するには (ID:81769)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 WindowsXP-SP1です。 WMIのバージョンはどうのようにすれば確認できるのでしょうか？？ プリンターはXeroxのDC400のものをインストールしようとしています。 次のドライバをダウンロードしてます。 ↓FX DC 250/350/400 ART4-ADV↓ http://download.fujixerox.co.jp/docucentre/download/dc_w2kart2.html ダウンロードされたARTフォルダをC:\に置いて下記コードで実行しています。 VB6を使用しています。 下記実行するとエラーコード(Ret)は-536870353となります。 Private Sub Command5_Click() Dim PrtSet As SWbemObjectSet Dim Prt As SWbemObject Dim Locator As SWbemLocator Dim Service As SWbemServices Dim Ret As Long Set Locator = New WbemScripting.SWbemLocator Set Service = Locator.ConnectServer Set Prt = Service.Get("Win32_PrinterDriver") Prt.Name = "FX DC 250/350/400 ART4-ADV" Prt.SupportedPlatform = "Windows NT x86" Prt.Version = "3" Prt.FilePath = "C:\ART" Prt.Infname = "C:\ART\FXARTH.INF" Ret = Prt.AddPrinterDriver(Prt) If Ret = 0 Then MsgBox "プリンタドライバを追加しました。" Else MsgBox "プリンタドライバの追加に失敗しました。" End If Set PrtSet = Nothing Set Prt = Nothing Set Locator = Nothing Set Service = Nothing End Sub