找回密码  加入

AUTOIT CN

搜索
查看: 2356|回复: 8

[系统综合] 关于for循环删除注册表某项删除不干净只能删除部分项[已解决]

[复制链接]
发表于 2016-1-31 11:26:33 | 显示全部楼层 |阅读模式
本帖最后由 m765555 于 2016-4-18 22:26 编辑

请教一下各位大大们:下面的脚本是删除注册表hkcu下run项右侧所有的启动项目,因个人工作需要,读取run所有启动并删除,保留ctfmon.exe。但本人这个脚本一次只能删除出部分,多建立几个启动项就无法删除,不知道原因在哪里,仔细好像没错呀。请指教下!
  1. Local $sWow64 = ""
  2. If @AutoItX64 Then $sWow64 = "\Wow6432Node"

  3. ;Local $mm = ""

  4. For $i = 1 To 100
  5.         $mm = RegEnumVal("HKEY_CURRENT_USER\Software" & $sWow64 & "\Microsoft\Windows\CurrentVersion\Run", $i)
  6.         If @error <> 0 Then
  7.                 ExitLoop
  8.                 MsgBox(0,"没有了","为空或读取失败!")
  9.         EndIf
  10.        
  11.         MsgBox(0, "第" & $i & " 个值", "第" & $i & "个值是"& $mm)
  12.         RegDelete("HKEY_CURRENT_USER\Software" & $sWow64 & "\Microsoft\Windows\CurrentVersion\Run",$mm)
  13. Next

  14. RegWrite("HKEY_CURRENT_USER\Software" & $sWow64 & "\Microsoft\Windows\CurrentVersion\Run","ctfmon.exe","REG_SZ","C:\\WINDOWS\\system32\\ctfmon.exe")
复制代码
发表于 2016-1-31 11:44:03 | 显示全部楼层
For $i = 1 To 100 改为 For $i = 1 To 100 Step 0.1 试试
 楼主| 发表于 2016-1-31 12:51:59 | 显示全部楼层
感谢,OK了,神!
发表于 2016-2-13 12:54:18 | 显示全部楼层
必须支持一下,学习中
发表于 2016-2-14 12:15:24 | 显示全部楼层
回复 2# afan


    这是为什么?
发表于 2016-4-25 13:30:14 | 显示全部楼层
#include <MsgBoxConstants.au3>
#RequireAdmin
For $n=2 To 10 Step 0.1
$enVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", $n)
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "$enVal")
Next
Exit(0)
可是我的这个代码 一个都删除不了,我的是WIN7 32位的系统,是管理员administrator支行的,是啥情况呢?请指点一下,多谢!
发表于 2016-4-25 13:56:10 | 显示全部楼层
#include
#RequireAdmin
For $n=2 To 10 Step 0.1
$enVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE ...
bill.chen 发表于 2016-4-25 13:30



    "$enVal"  去掉外围引号
发表于 2016-4-25 13:58:22 | 显示全部楼层
回复  afan


    这是为什么?
nmgwddj 发表于 2016-2-14 12:15



    具体原因不明,相当于延时吧~  Reg枚举一直都是这样
发表于 2016-4-26 11:47:54 | 显示全部楼层
非常感谢各位 的帮助!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|小黑屋|手机版|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2021-9-23 11:28 , Processed in 0.225595 second(s), 31 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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