如何用vb代码把应用程序添加成win2000的系统服务

lrgt

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services
怎样使用regsetvalue,regcreatekey把信息添加进去?
各个子项,数值该怎么添加?
请给个代码例子.

shadow

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\System Management ]
"Description"="SETI@HOME"

这是DELPHI的代码，VB应该差不多吧
Reg.RootKey := HKEY_LOCAL_MACHINE;
  if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\System Management', True) then
   Reg.WriteString('Description','SETI@HOME')

wjddjsm

就直要在System Management 项中加字符串 ："Description"="SETI@HOME"
System Management 项中还有其子项和字符串吗？