2016-12-05 10 views
0

私はコンピュータ上の壁紙を変更するために、VBとバットに2つのスクリプトを持っています。それは次のようになります。複数のコンピュータにVBScriptファイルをコピー

VBS:

Set oShell = CreateObject("WScript.Shell") 
sWallPaper = "\\server\Shares\folder1\folder2\test\wallpapertest.png" 
oShell.RegWrite "HKCU\Control Panel\Desktop\Wallpaper", sWallPaper 
oShell.Run "%windir%\System32\RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters", 1, True 

BAT:

@echo off 
C:\programdata\microsoft\windows\start menu\programs\startup\wallpaper.vbs /TIMER:00 /SILENT /NOLICPROMPT 

私は手動でファイルをコピーします。C:\はProgramData \マイクロソフト\ Windows \スタートメニュー\プログラム\スタートアップすべてにマシン。

これはうまくいきましたが、今ではホスト名を使用してそれ以上のマシンにautomaticllyコピーしたいと思います。私は何をする必要がありますか?私はどこから始めるべきかわかりません。私は2番目のVBSスクリプトが必要だと思う。誰もが複数のコンピュータ上のファイルをコピーするスクリプトを持っていますか?

+2

ドメイン環境では、任意のユーザーに対してGPO経由で壁紙を設定できます。 –

+0

'pushd \\ hostname \ c $ \ copy files popd'のようなことはできませんか? – geisterfurz007

+0

alex-kはい、この場合はGPOを使用できません。 @ geisterfurz007はい、このようなものですが、私はvbscriptが必要です –

答えて

0

管理者権限を持っている場合は、ホスト上の管理共有にアクセスできます。管理者株式はのようにアクセスすることができます。\\ホスト名\ C $ \ ThefolderwhereyouwantoCopy \ファイル名.txt(C $ドライブを表す)

は、単純にファイルをコピーするFSO copyコマンドを使用して...

Set objFSO = CreateObject("Scripting.FileSystemObject") 
strHostPath = "\\HostName\C$\TargetFolder" 
objFSO.CopyFile (CopyFromPath ,strHostPath,true) 'true overwrite existing files 
をotherhandで

、あなたは

Invoke-Command -ScriptBlock ([scriptblock]::Create("Copy-Item -Path `"\\UNC\path\File.png`" -Destination `"C:\targetfolder\File.png`"")) -ComputerName hostnameYouwanttoRunOn 

注UNCパスからファイルをコピーするためにPowerShellを使用することができ、管理者権限を持っていけない場合:上記のためにあなたがWinRMのは、両方のマシン上で有効にする必要があり実行します。有効にする場合はlinkです。

関連する問題