Запустить командную строку и команду из VBS

Мне нужно запустить команду для копирования файла из одного места в другое с помощью командной строки с помощью файла vbs. это то, что у меня есть, однако, он все время меняет ошибку.

'Dim oShell
Set oShell = WScript.CreateObject ("WScript.Shell")
oShell.run "cmd.exe /C copy "S:Claims\Sound.wav" "C:\WINDOWS\Media\Sound.wav"
Set oShell = Nothing'

Ошибка, которую я получаю:

'Script: C:\******\command.vbs
Char: 30
Error: Expected end of statement
Code: 80040401

Источник: ошибка компиляции Microsoft VBScript '

Пожалуйста, помогите:)

Ответ 1

Проблема в этой строке:

oShell.run "cmd.exe /C copy "S:Claims\Sound.wav" "C:\WINDOWS\Media\Sound.wav"

Ваша первая цитата рядом с "S: Claims" заканчивает строку; вам нужно избежать котировок вокруг ваших файлов со второй цитатой, например:

oShell.run "cmd.exe /C copy ""S:\Claims\Sound.wav"" ""C:\WINDOWS\Media\Sound.wav"" "

У вас также есть опечатка в S:Claims\Sound.wav, должна быть S:\Claims\Sound.wav.

Я также предполагаю апостроф до Dim oShell и после Set oShell = Nothing тоже опечатки.

Ответ 2

Set oShell = CreateObject ("WScript.Shell") 
oShell.run "cmd.exe /C copy ""S:Claims\Sound.wav"" ""C:\WINDOWS\Media\Sound.wav"" "