newfolder.rgs

来自「大量windows shell编程例子」· RGS 代码 · 共 50 行

HKCR
{
	ObjFolder.NewFolder.1 = s 'NewFolder Class'
	{
		CLSID = s '{5F974BAE-7885-11D2-8CDB-205850C10000}'
	}
	ObjFolder.NewFolder = s 'NewFolder Class'
	{
		CLSID = s '{5F974BAE-7885-11D2-8CDB-205850C10000}'
		CurVer = s 'ObjFolder.NewFolder.1'
	}
	NoRemove CLSID
	{
		ForceRemove {5F974BAE-7885-11D2-8CDB-205850C10000} = s 'NewFolder Class'
		{
			ProgID = s 'ObjFolder.NewFolder.1'
			VersionIndependentProgID = s 'ObjFolder.NewFolder'
			ForceRemove 'Programmable'
			InprocServer32 = s '%MODULE%'
			{
				val ThreadingModel = s 'Apartment'
			}
			'TypeLib' = s '{5F974BA1-7885-11D2-8CDB-205850C10000}'
		}
	}
}

HKLM
{
   SOFTWARE
   {
      Microsoft
      {
         Windows
         {
            CurrentVersion
            {
               Explorer
               {
                  'Browser Helper Objects'
                  {
                     {5F974BAE-7885-11D2-8CDB-205850C10000}
                  }
               }
            }
         }
      }
   }
}