This work for me @LarsJ
Global Const $S_OK = 0
Global $tCLSID_CLRMetaHost = _WinAPI_CLSIDFromString("{9280188d-0e8e-4867-b30c-7fa83884e8de}")
Global $tIID_ICLRMetaHost = _WinAPI_CLSIDFromString("{D332DB9E-B9B3-4125-8207-A14884F53216}")
Local $aRet = DllCall("MSCorEE.DLL", "long", "CLRCreateInstance", "struct*", $tCLSID_CLRMetaHost, _
"struct*", $tIID_ICLRMetaHost, "ptr*", 0)
If $aRet[0] = $S_OK Then
Local $pClrHost = $aRet[3]
ConsoleWrite("$pClrHost: " & $pClrHost & @CRLF)
EndIf
Func _WinAPI_CLSIDFromString($sGUID)
$tGUID = DllStructCreate('ulong Data1;ushort Data2;ushort Data3;byte Data4[8]')
$iRet = DllCall('ole32.dll', 'uint', 'CLSIDFromString', 'wstr', $sGUID, 'ptr', DllStructGetPtr($tGUID))
If (@error) Or ($iRet[0]) Then
Return SetError(@error, @extended, 0)
EndIf
Return $tGUID
EndFunc ;==>_WinAPI_CLSIDFromString
Saludos