hexagon logo

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
  • So are you talking to change it like this:

    For i = 1 To PCDCommands.Count
    Set StrDimID = PCDCommands(i)
    If StrDimID.IsDimension Then
    Set ObjDimCmd = currentcommand.DimensionCommand
    Set StrDimFeature = StrDimID.ID
    Set StrDimNominal = ObjDimCmd.Nominal
    Set StrDimUTol = ObjDimCmd.Plus
    Set StrDimLTol = ObjDimCmd.Minus
    Set MyReading1 = StrDimID.StrDimMeasure

    And then, I wasn't meaning the tolerances, but the AX, which I only assume is axis and tells whether you are on the x axis, the y axis, z axis, or measuring a diameter (d). Which I have a variable of StrDimType on top for it, but it isn't called out in the code you laid out for me. And of course that has gotten me all confused again.

    Thank you so much for your patience and help.

    Kelly
Reply
  • So are you talking to change it like this:

    For i = 1 To PCDCommands.Count
    Set StrDimID = PCDCommands(i)
    If StrDimID.IsDimension Then
    Set ObjDimCmd = currentcommand.DimensionCommand
    Set StrDimFeature = StrDimID.ID
    Set StrDimNominal = ObjDimCmd.Nominal
    Set StrDimUTol = ObjDimCmd.Plus
    Set StrDimLTol = ObjDimCmd.Minus
    Set MyReading1 = StrDimID.StrDimMeasure

    And then, I wasn't meaning the tolerances, but the AX, which I only assume is axis and tells whether you are on the x axis, the y axis, z axis, or measuring a diameter (d). Which I have a variable of StrDimType on top for it, but it isn't called out in the code you laid out for me. And of course that has gotten me all confused again.

    Thank you so much for your patience and help.

    Kelly
Children
No Data