Office中国论坛/Access中国论坛

标题: 求助!局域网内访问注册表的问题? [打印本页]

作者: wjb5645 时间: 2009-1-11 11:06
标题: 求助!局域网内访问注册表的问题?
我想在A机的窗体上显示查到B机注册表的键值,如:B机的:HKEY_LOCAL_MACHINE\SYSTEM 下, 键名是:SYS 键值:AAA
找来找去好象只能用API,请教前辈们该咋写?谢谢!!!

作者: Grant 时间: 2009-1-11 13:48
你需要访问局域网注册表还要共享注册表,你能确定你访问的机器都开启了注册表共享?
用RegConnectRegistry和远程的计算机注册表连按
再用RegQueryInfoKey等函数读和写

作者: wjb5645 时间: 2009-1-11 14:50
谢谢Grant
B机的注册表共享服务我是可以手工打开的
用API连接和读取能帮忙写个例子吗,我对API一窍不通呀
再次感谢!

作者: Grant 时间: 2009-1-11 16:31
年底比较忙,这里也才一台电脑要回去后才有电脑给你测试

作者: wjb5645 时间: 2009-1-11 17:26
好的,谢谢!等你的好消息

作者: wjb5645 时间: 2009-1-17 12:26
对等网的我试出来了.建了域的我没试,用域的朋友可试试不知行不行

Dim hKey As Long, ret As Long
Dim Name As String
Dim aa As String * 256
Name = "iFormat"
ret = RegConnectRegistry("\\B机", HKEY_CURRENT_USER, lKey)
If ret = 0 Then
ret = RegOpenKey(lKey, "Software\Microsoft\Clock", hKey)
ret = RegQueryValueEx(hKey, Name, 0, REG_SZ, ByVal aa, 50)
ret = RegCloseKey(lKey)
ret = RegCloseKey(hKey)
aa = Replace(aa, Chr(1), "")
MsgBox aa
End If

前提是用户名和密码需和B机相同

作者: wjb5645 时间: 2009-2-26 16:45
再顶下.....................

作者: jxq998 时间: 2009-5-22 15:00
哈哈，都能打开B的注册表了

作者: shiningdays 时间: 2009-5-22 16:04
？？新手，不太懂！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)