ＷＳＨのCopyFile()メソッドで%systemroot%の使い方を教えてください

質問

ネット等でいろいろ調べましたがわかりません。どなたか教えて頂けますでしょうか？

VBSのCopyFolder()メソッドを使用し、あるフォルダを他の複数のＰＣのシステムフォルダ(C:\winnt or C:\Windows)へコピーしたいのですが、コピー先のＯＳが異なります（Windows2000とwindowsXP)。この場合、スクリプト中に"%systemroot%"を使うことは可能でしょうか？
可能なら、どのように書けばよいのでしょうか？

よろしくお願いします。

回答No.3

necomimi

みつけました！
以下の方法でも環境変数から取れます
Set ws=WScript.CreateObject("WScript.Shell")
i=ws.ExpandEnvironmentStrings("%systemroot%")

お礼

ありがとうございました。
iをもとに、.Copyfolder i,"・・・"
とやればよいと言うことですよね。

回答No.2

notnot

環境変数の値の取得はこのように：
Set WshShell = WScript.CreateObject("WScript.Shell")
Set WshEnv = WshShell.Environment("PROCESS")
WScript.Echo WshEnv("SYSTEMROOT")

お礼

このような方法もあるのですね。
ありがとうございました。

回答No.1

necomimi

環境変数から調べるのがわからなかったんで次の方法で
GetSpecialFolder(0)は、Windowsフォルダを取得する

Set fs=WScript.CreateObject("Scripting.FileSystemObject")
Set ws=WScript.CreateObject("WScript.Shell")
i=fs.GetSpecialFolder(0)
o="C:\downloads2"
msg=MsgBox (i&"から"&o&"へコピーします。いいですか?",vbYesNo)
If msg=vbYes Then fs.CopyFolder i,o

お礼

ありがとうございます。
てっきり、
%systemroot%をコマンドラインに入れないとダメ、と思い込んでました。
助かりました。またよろしくお願いします。