Need vbscript or VB6 code to grant full access to everyone on a registry key, not using an exe such as subinacl

See if this helps you.

http://support.microsoft.com/?kbid=245031

I checked that out, but have yet to get it to work. I have read many other posts on forums with lots of people saying that they cannot get this to work either. Here is what I did. I created a text file named cmd.txt in the root directory. I put this in it:
\Registry\Machine\SYSTEM\CurrentControlSet\Services\test [7]
Then I created a subkey under HKLM\System\CurrentControlSet\Services\test
I verified that it did not have the everyone group already added.
Then I ran this command from cmd:
regini c:\cmd.txt
I do not get an error. But if I goto the reg key in regedit, the everyone group has not been added.
Not sure what I am doing wrong. Any suggestions?

What should be showing in the key after you grant World Full Access?

Your text file would need this:

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\test [7]

Select allOpen in new window

Then call:

 regini.exe "path\to\textfile.txt"

Hope this helps,
Daz.

Daz,

That is what advcom has already tried out.

If I find out what is needed in the key I have the answer for the author. The use of regini is not wanted, from what I gather.

All the info I found on regini showed the other format, but what you posted worked and it worked on XP Home. I just wanted something that would work on xp and not have to install anything. I just need to add the everyone group so that unreadable values are now readable.

Great, I'm glad that worked for you (and thanks for the grade).  But please remember that the regini functionality is to replace the permissions not add.  So after your test example above, all the other permissions will have gone, and only the Everyone / Full permission will be on that test key.

Thanks again,
Daz.