'有时候需要扫描远程计算机的注册表,判断一些键值项的存在与否,或者修改他们
'.net 里的microsoft.win32命名空间下的registrykey ,registry,registryhive就是用来操作注册表的
'______ scanremoteregister ___________
' coypright wgscd (c)2005
' qq:153964481 e-mail:wgscd@126.com
' blog:http://blog.csdn.net/wg.net
'______________________________________
dim treev as new treeview
dim subnode as new treenode
dim treen as new treenode
function openremoteregister(byval remotebasekey as string, byval computername as string) as string
dim subkey as microsoft.win32.registrykey
dim k as microsoft.win32.registrykey = microsoft.win32.registrykey.openremotebasekey(remotebasekey,.net.dns.gethostbyname(computername).hostname)
treev.nodes.add.net.dns.gethostbyname(computername).hostname) '将计算机名添加到treeview
treev.nodes.add(k.name)
dim s as string
for each s in k.getsubkeynames '得到子键项name
treen.nodes.add(s)
subkey = k.opensubkey(s)
openkeys(subkey) '打开子项/键
next
treev.nodes.add(treen)
end function
sub openkeys(byval key as microsoft.win32.registrykey)
'k.subkeycount'得到子键项数
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器