今回はOSの識別(XP以外は動作不可とする)コードを考える。 NT4.0時代ではOSの【Ver】コマンドを使用して振り分けていたが何故かVBAではエラーとなる。 記述したコードは以下の通り。 1: Set objSll = CreateObject("WScript.Shell") 2: Set objExec = objSll.Exec("ver") 3: Do Until objExec.StdOut.AtEndOfStream 4: strLine = objExec.StdOut.ReadLine 5: Debug.Print(strLine) 6: Loop 2行目で「指定されたファイルが見つかりません」となる。 仕方なく他のコードをあたって見るがその手法は様々だ。 私が管理している環境ではあり得ないことだが、Win95や98等でログインされてもエラーとならないコードにしたい
