プリンタポートの取得の仕方 (ID:85415)

名前

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

本文 現在、プリンタポートを次のように取得しています。 For Each defPrinter In Printers If defPrinter.DeviceName = "あるプリンタ名" Then pb_pdforigin = defPrinter.Port End If Next Windows98ではうまくいくのですが、WindowsXPではうまくいきません。 ポートが"Ne02"となってしまっています。 98とXPでは取得の仕方が違うのでしょうか？ 環境 VB5.0