COM

i'm using the reference Microsoft.Office.Interop.Visio to create a visio drawing document. When trying to obtain a visio application in my c# program as follow : "Application application =new Application()", i got the error below:

La récupération de la fabrique de classes COM pour le composant avec le CLSID {00021A20-0000-0000-C000-000000000046} a échoué en raison de l'erreur suivante : 80040154 Classe non enregistrée (Exception de HRESULT : 0x80040154 (REGDB_E_CLASSNOTREG)).

When using the same type of reference such as "Microsoft.Office.Interop.Word" or "Microsoft.Office.Interop.Excel" everything works properly. Any suggestion on how to address this issue will be really appreciated. Thanks!!

            Boolean resultado = false; ;
            ICOMAdminCatalog catalog;
            ICatalogCollection applicationCollection;
            ICatalogObject application;
            int applicationCount;
            int i;

            try
            {
                catalog = (ICOMAdminCatalog)new COMAdminCatalog();
                applicationCollection = (ICatalogCollection)catalog.GetCollection("Applications");
                applicationCollection.Populate();
                applicationCount = applicationCollection.Count;
                

                for (i = 0; i < applicationCount; i++)
                {
                    application = (ICatalogObject)applicationCollection.get_Item(i);
                    
                    if (application.Name == nombreApp)
                    {
                        application.Value["ApplicationAccessChecksEnabled"] = false;

// Interactive User:
 application.Value["Identity"] = "Interactive User";
                                applicationCollection.SaveChanges();

//Specific user:

 application.Value["Identity"] = txtUsuario.Text;
                                application.Value["Password"] = txtClave.Text; 

//Save Changes

 applicationCollection.SaveChanges();

            }

            catch (Exception ex)
           {
                resultado = false;
                MessageBox.Show(ex.Message);
            }
        }

Command used: WINDIR%\Microsoft.Net\Framework\v2.0.50727\regasm <dllname> /tlb /codebase <network folder path> 

COleVariant
covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
 CApplication app;
 CWorkbooks books;
 CWorkbook book;



    app.CreateDispatch(TEXT("Excel.Application"));
    books = app.get_Workbooks();
    COleVariant myvar;
    myvar.vt = VT_I4;
    myvar.lVal = NULL;
    COleVariant Orgin((short)2),
                StartRow((short)1),
                DataType((short)1),
                ConsecutiveDelimter((short) FALSE, VT_BOOL),
                TAB((short) FALSE, VT_BOOL),
                Semicolon((short) FALSE, VT_BOOL),
                Comma((short) FALSE, VT_BOOL),
                Space((short) FALSE, VT_BOOL),
                Other((short) FALSE, VT_BOOL),
                OtherChar((short) FALSE, VT_BOOL),
                FieldInfo((short) FALSE, VT_BOOL),
                TextVisualLayout((short) FALSE, VT_BOOL),
                DecimalSeprator((short) FALSE, VT_BOOL),
                ThousandSeprator((short) FALSE, VT_BOOL),
                TrailingMinusNumbers((short) FALSE, VT_BOOL),
                Local((short) FALSE, VT_BOOL);
   books.OpenText(L"C:\\PATH1\\PATH2\\PATH2\\FILE.TXT,
                                            Orgin,
                       StartRow,
                       DataType,
                       myvar.lVal,
                       ConsecutiveDelimter,
                       TAB,
                       Semicolon,
                       Comma,
                       Space,
                       Other,
                       OtherChar,
                       FieldInfo,
                       TextVisualLayout,
                       DecimalSeprator,
                       ThousandSeprator,
                       TrailingMinusNumbers,
                       Local);

SCODE sc = m_lpDispatch->Invoke(dwDispID, IID_NULL, 0, wFlags,
       &dispparams, pvarResult, &excepInfo, &nArgErr);