網(wǎng)友評論 0 條 轉(zhuǎn)載到博客 2007-5-7 13:24:47 來源: 互聯(lián)網(wǎng)
頂一下 - vs.net提供了microsoft.win32類,下面有三個子類,全是針對注冊表的,Microsoft.Win32.RegistryKey、Microsoft.Win32.Registry、Microsoft.Win32.RegistryHive Microsoft.Win32.Registry提供了訪問各個注冊表中根的值 Microsoft.Win32.Registry.CurrentUser '為HKEY_CURRENT_USER根鍵 Microsoft.Win32.Registry.ClassesRoot '為HKEY_CLASSES_ROOT根鍵 Microsoft.Win32.Registry.CurrentConfig '為HKEY_CURRENT_CONFIG根鍵 Microsoft.Win32.Registry.Users '為HKEY_USERS根鍵 Microsoft.Win32.Registry.DynDa '對應于HKEY_DYN_DATA主鍵 Microsoft.Win32.Registry.PerformanceData '對應于HKEY_PERFORMANCE_DATA主鍵
Microsoft.Win32.Registry.LocalMachine '為HKEY_LOCAL_MACHINE根鍵 了解了這么多,讓我們來對注冊表進行操作吧!舉個小例子: Dim key As Microsoft.Win32.RegistryKey, subkey As Microsoft.Win32.RegistryKey key = Microsoft.Win32.Registry.CurrentUser 'key為HKEY_USERS根鍵 subkey = key.CreateSubKey("Software\vb.net") '在HKEY_USERS\software下創(chuàng)建一個vb.net子鍵 subkey.SetValue("GOOD?", "of course") '在HKEY_USERS\software\vb.net下設置一個鍵值,鍵值名為good?,值為of course了 上面是在注冊表里創(chuàng)建鍵了,下面我們用程序來訪問我們剛創(chuàng)建的注冊表的鍵吧: key = microsoft.Win32.Registry.CurrentUser '如上 subkey=key.OpenSubKey("software\vb.net",True) 'subkey即為HKEY_USERS\software\vb.net鍵 dim value as object=subkey.GetValue("Good?") 'value為HKEY_USERS\software\vb.net鍵中的GOOD?的值 msgbox(value.tostring()) '將出現(xiàn)of course了 上面是獲取注冊表鍵值了,要設值,還是用subkey.setvalue了 來講講刪除吧: key.DeleteSubKey("software\vb.net") '刪除這個鍵了也可以用: key.DeleteSubKeyTree("software\vb.net") 還可以用key.GetSubKeyNames來遍歷子鍵 即:for i=0 to ubound(key.GetSubKeyNames()) subkey=key.OpenSubKey(key.GetSubKeyNames()(i),True) ....... '對每個子鍵的處理 next 用key.GetValueNames來遍歷各個值 即: for i=0 to ubound(key.GetValueNames()) key.GetValueNames()(i) '為每個值的名稱 value=key.Getvalue(key.GetValueNames()(i)) '為每個值的值 講到這兒,對注冊表的各項操作也差不多了吧!如果結合起來用,什么都可以干了呀,呵呵!
|