如何读取注册表键值并判断后修改

我考虑用vbs文件,因为reg文件貌似无法完成这样的功能.我要实现的目的是:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run下有个键值"abcd"="1"
我需要做的是:先读取这个键的值,如果是1,则改为2,如果是2或其他数,则改为1.我先用c语言写了个逻辑,不知哪位高手可以帮我改成vbs程序,因为vbs可以直接运行的.(如果有其他可以直接运行的格式也可)
if abcd<>1
  abcd=1
 elseif abcd<>2
   abcd=2
 endif
endif在此先谢谢了!

解决方案 »

  1.   

    Set oWS = CreateObject("WScript.Shell")v = oWS.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\abcd")
    If v = "1" Then
    v = "2"
    Else
    v = "1"
    End IfoWS.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\abcd", vSet oWS = Nothing
      

  2.   

    http://topic.csdn.net/u/20090825/20/232f954b-512f-4007-9cd8-fc39f622368d.html
    除键值不同外,几乎完全一样
      

  3.   


    谢谢大哥,不过好像有错啊.Script: c:\......\a.vbs
    Line: 3
    Char: 1
    Error Unable to open registry key
    "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\abcd" for reading.
    Code: 80070002
    Source: WshShell.RegRead麻烦看看什么原因,谢谢!
      

  4.   

    将HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\abcd改为HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\abcd看看