Solved

Retrieving the COM class factory for component with CLSID , class not registered

Posted on 2012-04-02
7
569 Views
Last Modified: 2012-04-08
Getting error :

Retrieving the COM class factory for component with CLSID , class not registered at RichTechSTK1.SIMToolkit,

modem initialise error
having put MSCOMM32.OCX in windows/system32, and added relevant .dlls.
0
Comment
Question by:doramail05
  • 4
  • 3
7 Comments
 
LVL 19

Expert Comment

by:Rimvis
ID: 37799708
Hi doramail05,
putting components to System32 is not enough. You have to register them with regsvr32 command. And I don't think RichTechSTK1.SIMToolkit comes from MSCOMM32.OCX. Do you have something like RichTechSTK.dll?
0
 
LVL 1

Author Comment

by:doramail05
ID: 37799766
when trying to run command

C:\>REGSVR32 C:\RichTechSTK1.dll

it having the error :
The Module "C:\RichTechSTK1.dll' was loaded but the entry-point DllRegisterServer was not found.

Makesure that "C:\RichTechSTK1.dll' is a valid DLL or OCX file and then try again
0
 
LVL 19

Expert Comment

by:Rimvis
ID: 37799796
So, this is not a COm library.  What object is invoked at like 6? Can you show your code?
0
3 Use Cases for Connected Systems

Our Dev teams are like yours. They’re continually cranking out code for new features/bugs fixes, testing, deploying, testing some more, responding to production monitoring events and more. It’s complex. So, we thought you’d like to see what’s working for us.

 
LVL 1

Author Comment

by:doramail05
ID: 37799800
here they are

Imports RichTechSTK1
Imports SIMToolKit

Module Module1

    Private oSMSMOMT As New RichTechSTK1.SIMToolKit
    Private simtoolkit As New SIMToolKit.SIMToolKit
    Dim aTimer As New System.Timers.Timer

    Sub Main()

        aTimer.AutoReset = True
        aTimer.Interval = 1000 '2 seconds 
        AddHandler aTimer.Elapsed, AddressOf tick
        aTimer.Start()
        'Console.ReadKey()

    End Sub

    Private Sub tick(ByVal sender As Object, ByVal e As System.Timers.ElapsedEventArgs)

        Dim sResponse As String = ""

        Dim sModemStatus As String = oSMSMOMT.ModemInit(3, "", sResponse)

        Dim sModemStatus1 As String = simtoolkit.ModemInit(3, "", sResponse)

Open in new window

0
 
LVL 19

Expert Comment

by:Rimvis
ID: 37799850
I'm confused by these lines:
    Private oSMSMOMT As New RichTechSTK1.SIMToolKit
    Private simtoolkit As New SIMToolKit.SIMToolKit

Why there is same class in separate namespaces? Ar you sure you need them? Where does "RichTechSTK1.SIMToolKit" come from?
0
 
LVL 1

Accepted Solution

by:
doramail05 earned 0 total points
ID: 37804492
solved with running

REGSVR32 with the OCX file
0
 
LVL 1

Author Closing Comment

by:doramail05
ID: 37820943
assisted from other forum
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In my previous two articles we discussed Binary Serialization (http://www.experts-exchange.com/A_4362.html) and XML Serialization (http://www.experts-exchange.com/A_4425.html). In this article we will try to know more about SOAP (Simple Object Acces…
Today I had a very interesting conundrum that had to get solved quickly. Needless to say, it wasn't resolved quickly because when we needed it we were very rushed, but as soon as the conference call was over and I took a step back I saw the correct …
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, just open a new email message. In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
Both in life and business – not all partnerships are created equal. As the demand for cloud services increases, so do the number of self-proclaimed cloud partners. Asking the right questions up front in the partnership, will enable both parties …

895 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

14 Experts available now in Live!

Get 1:1 Help Now