UC知道vb 注册表写入的问题
来源：百度知道 编辑：UC知道 时间：2024/07/03 00:08:22
[HKEY_CURRENT_USER\Software\Classes\{941FE014-BB34-8E64-B5EC-45552B3D4440}]
"{abc}"=hex:0e,57,52,dc,ae,01,0a,0c,a7,7d,90,\
b5,40,4c,65,77
注册表里导出来的是这个样子的。想问一下如何用VB写入注册表。 因为hex:0e,57,52,dc,ae,01,0a,0c,a7,7d,90,\ 和b5,40,4c,65,77 是两行，不知道如何写
直接写入0e,57,52,dc,ae,01,0a,0c,a7,7d,90,b5,40,4c,65,77 发现总是数据不对
"{abc}"=hex:0e,57,52,dc,ae,01,0a,0c,a7,7d,90,\
b5,40,4c,65,77
注册表里导出来的是这个样子的。想问一下如何用VB写入注册表。 因为hex:0e,57,52,dc,ae,01,0a,0c,a7,7d,90,\ 和b5,40,4c,65,77 是两行，不知道如何写
直接写入0e,57,52,dc,ae,01,0a,0c,a7,7d,90,b5,40,4c,65,77 发现总是数据不对
这样就行：
Dim strPath, uBinary, objreg
Const HKEY_CURRENT_USER = &H80000001
strPath = "Software\Classes\{941FE014-BB34-8E64-B5EC-45552B3D4440}"
Set objreg = GetObject("Winmgmts:root\default:StdRegProv")
uBinary = Array(&H0e,&H57,&H52,&Hdc,&Hae,&H01,&H0a,&H0c,&Ha7,&H7d,&H90,&Hb5,&H40,&H4c,&H65,&H77)
objreg.SetBinaryValue HKEY_CURRENT_USER, strPath, "abc", uBinary
Set objreg = Nothing
是一行，最后那个\是续行符。