1

我正在尝试为与我一起工作的一群计算机技能很少的人简化安装。我有一个 vbs 脚本，可以将各种配置文件复制到其正确的目录中。但是，有一个文件我无法复制。

我正在尝试将一个名为 hosts 的新文件复制到 C:\windows\systems32\drivers\etc 文件夹中，但无论我做什么，我都会不断获得权限被拒绝。

Const OverWriteExisting = True
Dim fso

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "C:\users\IBM_ADMIN\Desktop\Colgate Socks\hosts", "C:\Windows\System32\drivers\etc\hosts", OverWriteExisting

有任何想法吗？

4

2 回答 2

2

以管理员身份运行？

您可以通过任务调度程序轻松完成此操作。

另一个选项是如何在 Windows 7 中以管理员身份运行脚本？

把它放在脚本的开头

Set WshShell = WScript.CreateObject("WScript.Shell")
If WScript.Arguments.length = 0 Then
Set ObjShell = CreateObject("Shell.Application")
ObjShell.ShellExecute "wscript.exe", """" & _
WScript.ScriptFullName & """" &_
 " RunAsAdministrator", , "runas", 1
Else
[your code here]
end if
于 2013-10-19T00:14:08.800 回答
1

使用此 %windir%\Sysnative 而不是 C:\Windows\System32。

于 2013-12-03T16:56:56.407 回答