A COM class wizard for VS.NET 2003

// (c) Microsoft Corporation
// modified by Martin M�ller

function OnFinish(selProj, selObj)
{
	try
	{
		var strTarget = wizard.FindSymbol("ITEM_NAME");
		var strClassName = strTarget.split(".");
		var bValid = wizard.ValidateCLRIdentifier(strClassName[0]);
		if (!bValid)
		{
			wizard.ReportError();
			return VS_E_WIZARDBACKBUTTONPRESS;
		}
		var strProjectName 	= wizard.FindSymbol("PROJECT_NAME");
		var strSafeProjectName 	= CreateSafeName(strProjectName);
		wizard.AddSymbol("SAFE_PROJECT_NAME", strSafeProjectName);
		SetTargetFullPath(selObj);
		var strProjectPath	= wizard.FindSymbol("TARGET_FULLPATH");

		wizard.AddSymbol("CLASS_NAME", strClassName[0]);
		wizard.AddSymbol("INTERFACE_NAME", "I"+strClassName[0]);
		wizard.AddSymbol("EVENTS_NAME", "I"+strClassName[0]+"Events");

		// GUIDS
		var strRawGuid = wizard.CreateGuid();
		wizard.AddSymbol("GUID_COCLASS", wizard.FormatGuid(strRawGuid, 0));
		strRawGuid = wizard.CreateGuid();
		wizard.AddSymbol("GUID_INTERFACE", wizard.FormatGuid(strRawGuid, 0));
		strRawGuid = wizard.CreateGuid();	
		wizard.AddSymbol("GUID_EVENTS", wizard.FormatGuid(strRawGuid, 0));

		var InfFile = CreateInfFile();

		AddReferencesForClass(selProj);
		AddFilesToCSharpProject(selObj, strProjectName, strProjectPath, InfFile, true);
				
		// Alle Konfigurationen so festlegen, dass das Element f�r COM-Interop registriert wird
		var configs = new Enumerator(selProj.ConfigurationManager);
		for(;!configs.atEnd();configs.moveNext())
		{
			configs.item().Properties("RegisterForComInterop").Value = 1;
		}
	}
	catch(e)
	{
		if( e.description.length > 0 )
			SetErrorInfo(e);
		return e.number;
	}
	finally
	{
		if( InfFile )
			InfFile.Delete();
	}
}

function SetFileProperties(oFileItem, strFileName)
{
}