Help with OLE Automation

Now that I have information in a way that imports and exports the information correctly, I have been tasked with creating an OLE to automatically import the data into the SPC software. I have one that sort of works (as in opens the program, logs in, opens the right collection plan, etc) and I can get put in static information, but I am unsure how to call the information out of PC DMIS to have it be placed in the spots we need in the SPC software being used.

Has anyone else done this? Can anyone explain to me how find the variable and the measurement output in PC DMIS? I am using version 4.2 if that helps any.

Thanks so much.

Parents

DJAMS over 11 years ago

These also do not work:

Clock = ObjCmd.GetText(COMMENT_FIELD,2)
Clock = ObjCmd.GetText(OUTPUT_TYPE,2)

Here is how I would handle this:

If ObjCmd.IsComment Then
    If ObjCmd.CommentCommand.CommentType = PCD_COMMENT_INPUT Then 
      If ObjCmd.ID = "CLKNBR" Then
        strClkNbr = ObjCmd.CommentCommand.Input
      End If
    End If
  End If

I tested this using a COMMENT/INPUT that looks like this:

CLKNBR     =COMMENT/INPUT,NO,FULL SCREEN=NO,
            'Enter something'

Reply

DJAMS over 11 years ago

These also do not work:

Clock = ObjCmd.GetText(COMMENT_FIELD,2)
Clock = ObjCmd.GetText(OUTPUT_TYPE,2)

Here is how I would handle this:

If ObjCmd.IsComment Then
    If ObjCmd.CommentCommand.CommentType = PCD_COMMENT_INPUT Then 
      If ObjCmd.ID = "CLKNBR" Then
        strClkNbr = ObjCmd.CommentCommand.Input
      End If
    End If
  End If

I tested this using a COMMENT/INPUT that looks like this:

CLKNBR     =COMMENT/INPUT,NO,FULL SCREEN=NO,
            'Enter something'

Children

No Data