WSHからのコマンドプロンプト実行
お世話になります。
OS:Windows7 Professional SP1
UAC:既定(上から2番目)
上記の条件で、WSHからコマンドプロンプトを管理者権限で立ち上げ、
ファイルをコピーするスクリプトを作成したいのですが・・・
当方あまり知識が無く困り果ててる次第でございます。
***************************************************************************
Do while WScript.Arguments.Count = 0 and WScript.Version >= 5.7
Set wmi = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
Set os = wmi.ExecQuery("SELECT *FROM Win32_OperatingSystem")
For Each value in os
if left(value.Version, 3) < 6.0 then exit do
Next
Set sha = CreateObject("Shell.Application")
sha.ShellExecute "cmd.exe", """" & WScript.ScriptFullName & """ uac", "", "runas"
WScript.Quit
loop
***************************************************************************
以上のコマンドでUsersからでも管理者権限でプロンプトが立ち上がる所までは確認しています。
このあと、プロンプト上で
"Copy D:\A.txt C:\Windows\System32 /y"
を自動的に実行してくれるようなスクリプトにしたいのですが、どう記述すればよいのでしょうか?
なるべくユーザーに負担をかけない形で、スクリプト一発で処理できたらと考えていますが・・・
ご指導よろしくお願い致します。
お礼
mousengokeさん、こんにちは。 単純なスクリプトでよかったんですね。 難しく考えすぎたようです。 どうもありがとうございました。