OLE - Automation server cannot create object

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • OLE - Automation server cannot create object

    Hello all,

    I ran into this when trying to run a basic script to refresh my report window. This is the script i am using. Any ideas or suggestions to fix this?

    'Report Screen Refresh

    Sub Main()


    '************PC-DMIS declarations************
    Dim pcdApp As Object
    Set pcdApp = CreateObject("PCDLRN.Application")

    Dim pcdPart As Object
    Set pcdPart = pcdApp.ActivePartProgram

    Dim pcdReportWindow As Object
    Set pcdReportWindow = pcdPart.ReportWindow

    '***********Repaint the report window*********
    pcdReportWindow.RefreshReport

    '********************Cleanup**********************
    Set pcdReportWindow = Nothing
    Set pcdPart = Nothing
    Set pcdApp = Nothing

    End Sub

    Specific error is "error on Line 8 -OLE automation server cannot create object"

  • #2
    is there a part program already open when you run this? Thinking about that, I suppose you could not run the script if the program were not already open.

    I just tried your script on my system with PC-DMIS 2011 and it worked fine here. Not sure what is going on.
    Last edited by Don Ruggieri; 08-09-2013, 02:08 PM.
    "You may be right, I may be crazy. . ." - Billy Joel

    Comment


    • #3
      I assume you are running this on the computer that have PC-DMIS installed?

      It seems that the OLE object hasn't been properly registered as it can't create it?
      PC-DMIS CAD++ 2o16.0 SP1

      Comment


      • #4
        you probably need to register pcdmisutils.dll

        If not on you computer you can pm me for a copy

        32 bit systems use regsvr32 to install
        64 bit needs to be in "wow" directory under windows and admin priv's when in cmd to run regsvr32

        Comment


        • #5
          yes I am trying to run this on the machine Pc Dmis is currently installed on. yes there is a program running to call the script up to run. Pc dmis runs fine.

          I am running 4.3 MR1. My company just bought this machine from a 3rd party about 8 months ago. It sadly has been sitting unused for the last 7 months. I have been self teaching myself pc dmis, and learning its twerks.

          I also noticed that most activex applications don't run and error out as well. like pcd2xcel, datafieldedit, probe wizard etc. throws a "Runtime error '429', Activex component cannot create object."

          Comment


          • #6
            first off what o/s are you running pcdmis on?

            sounds like vpt is correct, the ole library doesn't exist or is incorrectly registered.

            you may need to reinstall pcdmis and/or reregister the ole automation library.
            if you are not setup as administrator then you need to be when installing pcdmis.
            Roses are red
            Violets are glorious
            Don't try to sneak up
            On Oscar Pistorius.

            MIL-TFP-41C

            3.7mr3, 2012mr1, 2013mr1

            Comment


            • #7
              its windows xp pro sp3. Unfortunately it looks like the machine came with 4.0 and 4.3 mr1. I assumed we were suppose to be running 4.3, you know the latest version installed on it. Looks like i might of been wrong. Everything runs fine in 4.0. Unfortunately I hate 4.0. With a passion. Thank you all for the help anyways.

              Comment


              • #8
                Find out what the dongle is enabled for.
                Ditch 4.0 its the worst of the 4.* series by a long way.
                Even hex didn't put it on general release cos of the problems with it.
                Exactmeasure is a joke in 4.0.
                Roses are red
                Violets are glorious
                Don't try to sneak up
                On Oscar Pistorius.

                MIL-TFP-41C

                3.7mr3, 2012mr1, 2013mr1

                Comment


                • #9
                  Originally posted by Rploughe View Post
                  its windows xp pro sp3. Unfortunately it looks like the machine came with 4.0 and 4.3 mr1. I assumed we were suppose to be running 4.3, you know the latest version installed on it. Looks like i might of been wrong. Everything runs fine in 4.0. Unfortunately I hate 4.0. With a passion. Thank you all for the help anyways.
                  Try running version 4.3 as administrator.

                  Comment


                  • #10
                    My IT guy won't even give me the option to do so. He gave me full access rights to it, which i tried to explain to him wasn't the same thing. I figured out that wilocx website no longer supports 4.3. The oldest version they support is 2009 release. My Dongle should be able to run 4.3. So for now i am stuck with the wonders of 4.0. As i highly doubt my company will shell out the cash for an upgrade or even be willing to look into the situation for me.

                    Comment


                    • #11
                      Originally posted by Rploughe View Post
                      My IT guy won't even give me the option to do so.
                      Then have him do it. It only needs to be done once.

                      Comment


                      • #12
                        Just to follow up and provide a little more information - I found this email I received from tech support when I initially had the multiple versions installed issue. This is the reason I suggested running as administrator.
                        You should run PCDMIS 2010 MR3 as administrator in order to set the PCDLRN.Application registry key to the PCDMIS 2010 MR3.
                        On system with more than one PCDMIS version installed it would be useful to specify the PCDMIS version you want connect to:

                        - For PCDMIS 2010 MR3 Set DmisApp = CreateObject("PCDLRN.Application.5.9")


                        - For PCDMIS 2011
                        Set DmisApp = CreateObject("PCDLRN.Application.6.0")

                        - For PCDMIS 2011 MR1
                        Set DmisApp = CreateObject("PCDLRN.Application.6.1")

                        - For PCDMIS 2012
                        Set DmisApp = CreateObject("PCDLRN.Application.7.0")

                        - For PCDMIS 2012 MR1
                        Set DmisApp = CreateObject("PCDLRN.Application.7.1")

                        Comment

                        Working...
                        X