V4.3 mr1
Using marked sets to run programs in operator mode.
When I run them in online mode I use a window layout with the graphics window closed and then use a script to show the report window at the end.
Perfect!
Does not work in Operator mode. The graphics window is there every time.
Attempted the following script:
Sub Main
Dim App As Object
Dim PartProg As Object
Dim CadWin As Object
Set App = CreateObject("Pcdlrn.Application")
Set PartProg = App.ActivePartProgram
Set CadWin = PartProg.CadWindow
' Hide Cad Window
CadWin.Visible = False
End Sub
Get this error:
Error: Unknown name: CadWindow
Error: Unable to run basic script.
Dim App As Object
Dim PartProg As Object
Dim CadWin As Object
Dim Wind As Object
Set App = CreateObject("Pcdlrn.Application")
Set PartProg = App.ActivePartProgram
Set CadWin=PartProg.CadWindows
Set Wind=CadWin.Item(1)
' Hide Cad Window
Wind.Visible = False
End Sub
but I get an "expected end of statement" error code 800A0401 in line 3 char 9
I know this was posted in 2009 and I'm using 2011 mr1, could that be what the problem is?