Update COM host to match RegAsm registration behavior (#63292)

* Update COM host to match RegAsm registration behavior

Author: AaronRobinsonMSFT

src/native/corehost/comhost/comhost.cpp

@@ -339,15 +339,14 @@ namespace
 
         RegKey regKey{ regKeyRaw };
 
-        // Set the default value for all COM host servers
-        const WCHAR defServerName[] = _X("CoreCLR COMHost Server");
+        // Set the default value, type name - this matches RegAsm behavior.
         res = ::RegSetValueExW(
             regKey.get(),
             nullptr,
             0,
             REG_SZ,
-            reinterpret_cast<const BYTE*>(defServerName),
-            static_cast<DWORD>(sizeof(defServerName)));
+            reinterpret_cast<const BYTE*>(entry.type.c_str()),
+            static_cast<DWORD>(entry.type.size() + 1) * sizeof(entry.type[0]));
         if (res != ERROR_SUCCESS)
             return __HRESULT_FROM_WIN32(res);