hexagon logo
Register Sign in
  • Replies 20 replies
  • Subscribers 31 subscribers
  • Views 342 views
  • Users 0 members are here
Options
Related

problems running script

kurzws
Has anyone else tried to run this script from the Wilcox site "tracesheet.bas"? I added all the assignments per the instructions and I get no output to the variables at all. If I'm correct should I not see the selections from the menu in the assignments in my pcdims program?



Thanks Bill



PCDMIS 3.7 MR3
PCDMIS 4.3 MR1
Parents
  • I did this

    If Dialog (Dlg1) = "-1" Then
    V3 = "OK"
    Else
    V3 = "Cancel"
    If V3 = "Cancel" Then
    GoTo CPRESS
    End If
    End If

    and put the label CPRESS right before
    CPRESS

    Dim App As Object
    Set App = CreateObject("PCDLRN.Application")

    Dim Part As Object
    Set Part = App.ActivePartProgram

    Dim Cmds As Object
    Dim Cmd As Object

    Set Cmds = Part.Commands
Reply
  • I did this

    If Dialog (Dlg1) = "-1" Then
    V3 = "OK"
    Else
    V3 = "Cancel"
    If V3 = "Cancel" Then
    GoTo CPRESS
    End If
    End If

    and put the label CPRESS right before
    CPRESS

    Dim App As Object
    Set App = CreateObject("PCDLRN.Application")

    Dim Part As Object
    Set Part = App.ActivePartProgram

    Dim Cmds As Object
    Dim Cmd As Object

    Set Cmds = Part.Commands
Children
No Data
© 2024 Hexagon AB and/or its subsidiaries. Privacy Policy | Cloud Services Agreement