NX二次开发源码分享： 判断程序是外部运行方式还是内部？

admin

9 Q# E$ d; {, |- {+ H
NX二次开发源码分享： 判断程序是外部运行方式还是内部？


[mw_shl_code=csharp,true]Imports NXOpen

$ ?. I$ Z7 o* f6 U* R. c- q  b; wModule NXJournal
! n8 a5 ]. Y6 F% f* ?
    Dim theSession As Session = Session.GetSession()
  i. N  R/ Z+ a: o  c. ]
' Q* n/ l) |* ]2 i: h    Sub Main
5 X% m9 |, [: v1 ~4 I1 M' N! |' J! q0 i
      If theSession.IsBaTCh
0 p; H1 N- r8 |+ S9 L4 |$ C        Echo("This is being run in Command Line (Batch) Mode NX")
      Else
" S$ P$ `$ R2 v5 Y        Echo("This is being run in Interactive Mode NX")
      End If
( C$ {7 S9 R3 }  }
4 W3 {( @' q( N' }* Z( H    End Sub
- p- {: _' I6 O
/ T% I) f8 U0 e' x
    Sub Echo(ByVal output As String)
        theSession.ListingWindow.Open()
2 o, Q. Z/ }  l# i% T        theSession.ListingWindow.WriteLine(output)
        theSession.LogFile.WriteLine(output)
3 c$ [9 Y4 k) L' t9 R    End Sub

End Module[/mw_shl_code]
* S, ~( w: U+ ?8 ^$ d1 A9 \