Масса вопросов по COM (OUT-OF-PROC)

[PAUK]

Всю голову поломал. Надеюсь кто нибудь тут хоть чем то поможет. Значит суть вопроса №1 вот в чем:
имеется exe OutOfProc ком сервер. Имеется клиент на C#.
через ProgId получается CLSID и соответственно тип объекта и далее сам объект. Так вот как раз объект создаться не может. Никаких ошибок не вылетает, ничего не происходит. Клиент просто висит.
вот кусок кода клиента :

            Type typeofOPCserver = Type.GetTypeFromProgID(clsidOPCserver);
            if (typeofOPCserver == null)
                Marshal.ThrowExceptionForHR(0);
            try
            {
                OPCserverObj = Activator.CreateInstance(typeofOPCserver); - Тут собственно и висит.
            }
            catch (Exception ee)
            { 
            
            }

Проверял с другими серверами. Все работает нормально. У меня же пока сервер не прекратит работу - клиент висит. Пытался выкинуть сервер в отдельный поток - не помогло.

Вопрос номер 2:

Возможно проблема краится в регистрации ком сервера. Возможно кто нибудь может дать какой нибудь шаблон для регистрации COM OutOfProc сервера.

я свой регистрирую следующим образом :

/// <summary>
        /// The main entry point for the application.
        /// </summary>
        [STAThread]
        static void Main()
        {
            Guid srv_guid = new Guid("7F7F5947-DFFE-3DC4-B1DD-60F946C10EBD");

            RegistryKey appkey = null;
            RegistryKey key = null;
            RegistryKey keyIC = null;
            RegistryKey keyIC1 = null;
            RegistryKey keyIC2 = null;
            RegistryKey key2 = null;
            RegistryKey key3 = null;
            RegistryKey key4 = null;
            RegistryKey key5 = null;
            try
            {
                appkey = Registry.ClassesRoot.CreateSubKey("AppId\\" + System.Windows.Forms.Application.ProductName + ".exe");
                appkey.SetValue("AppId", srv_guid.ToString("B"));
                key = Registry.ClassesRoot.CreateSubKey("CLSID\\" + srv_guid.ToString("B"));
                keyIC = key.CreateSubKey("Implemented Categories");
                keyIC1 = keyIC.CreateSubKey("{63D5F430-CFE4-11D1-B2C8-0060083BA1FB}");
                keyIC2 = keyIC.CreateSubKey("{63D5F432-CFE4-11D1-B2C8-0060083BA1FB}");
                key.SetValue(null, "BEMN.OPC_ServerDA_205.SERVER");
                key.SetValue("AppId", srv_guid.ToString("B"));
                key2 = key.CreateSubKey("LocalServer32");
                key2.SetValue(null, System.Windows.Forms.Application.ExecutablePath);
                key3 = key.CreateSubKey("ProgId");
                key3.SetValue(null, "BEMN.OPC_ServerDA_205.SERVER");
                key4 = Registry.ClassesRoot.CreateSubKey(System.Windows.Forms.Application.ProductName);
                key5 = key4.CreateSubKey("CLSID");
                key5.SetValue(null, srv_guid.ToString("B"));
            }
            catch (Exception ex)
            {
                MessageBox.Show("Error while registering the server:\n" + ex.ToString());
            }
            finally
            {
                if (key != null)
                    key.Close();
                if (key2 != null)
                    key2.Close();
                if (key3 != null)
                    key3.Close();
            }

            Application.EnableVisualStyles();
            Application.SetCompatibleTextRenderingDefault(false);
            Application.Run(new Form1());
        }

извините за переменные типа key2,key3. Уже не заморачивался над красотой. Главная цель чтобы хоть как то заработало. Потом марафет наведу.


Очень надеюсь на чью либо помощь в данном вопросе. Разыскиваю Гуру COM и реестра!

[armivl]

Регистрирую свой OPC Server DA вот так, все отлично работает

RegistrationServices regServ = new RegistrationServices();

                    System.IO.FileStream fsGac = System.IO.File.Create(System.IO.Path.Combine(System.Environment.SystemDirectory, "gacutil.exe"));
                    fsGac.Write(Armivl.Properties.Resources.gacutil, 0, Armivl.Properties.Resources.gacutil.Length);
                    fsGac.Close();
//добавляю сборку в GAC
                    System.Diagnostics.Process.Start(System.IO.Path.Combine(System.Environment.SystemDirectory, "gacutil.exe"),
                        "/i " + String.Format(@"""{0}", System.IO.Path.Combine(System.Environment.CurrentDirectory, Assembly.GetExecutingAssembly().GetName().Name + ".exe")));

                    regServ.RegisterTypeForComClients(typeof(OPCServer), RegistrationClassContext.LocalServer, RegistrationConnectionType.MultipleUse);
//запускаю сервер для того, чтобы он прописался в ComponentServices
                    OPCServer serv = new OPCServer();

                    RegistryKey regkey = Registry.ClassesRoot;
                    RegistryKey opcVend = regkey.CreateSubKey(@"Armivl.OPCServer\OPC\Vendor");
                    RegistryKey opcCLSID = regkey.CreateSubKey(@"CLSID\{6D01D76E-43CD-499F-82DB-B507972B27B4}\Implemented Categories\{CC603642-66D7-48F1-B69A-B625E73652D7}");
                    opcVend.SetValue("", "Armivl");
                    serv.Dispose();

                    regkey.Close();

[PAUK]

У тебя OUT OF PROCESS Exe сервер в виде простого COM?

[PAUK]

Если можешь напиши в ICQ - 412948357