testlog.rgs

来自「中间件编写示例 COM与.NET组件服务」· RGS 代码 · 共 27 行

HKCR
{
	TestServer.TestLog.1 = s 'TestLog Class'
	{
		CLSID = s '{A30E8320-C0B4-4C0B-91C7-60DCF6BABAB3}'
	}
	TestServer.TestLog = s 'TestLog Class'
	{
		CLSID = s '{A30E8320-C0B4-4C0B-91C7-60DCF6BABAB3}'
		CurVer = s 'TestServer.TestLog.1'
	}
	NoRemove CLSID
	{
		ForceRemove {A30E8320-C0B4-4C0B-91C7-60DCF6BABAB3} = s 'TestLog Class'
		{
			ProgID = s 'TestServer.TestLog.1'
			VersionIndependentProgID = s 'TestServer.TestLog'
			ForceRemove 'Programmable'
			InprocServer32 = s '%MODULE%'
			{
				val ThreadingModel = s 'Apartment'
			}
			'TypeLib' = s '{5352959D-CC5F-4103-8A83-3F4BE7A6838E}'
		}
	}
}