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

admin

  E7 z; d6 I- K) [NX二次开发源码分享： 判断程序是外部运行方式还是内部？

% W9 y  V* A+ {6 z0 ]9 v
[mw_shl_code=csharp,true]Imports NXOpen

Module NXJournal
9 x5 g6 _* `3 T5 O" ]  N' e
5 ~! Q+ v' u( S$ u6 C    Dim theSession As Session = Session.GetSession()

$ K" p2 y4 ~0 O. g# {" W( q1 j    Sub Main

; l  f, ?9 X* p! x8 H5 R  v      If theSession.IsBaTCh
! W, _9 ?# N, h& G% W, K) C        Echo("This is being run in Command Line (Batch) Mode NX")
      Else
# {+ f, M2 d5 a  X" v        Echo("This is being run in Interactive Mode NX")
4 n& g/ i& N9 F2 ^9 N0 D      End If
* r! f* T- p7 ^
1 `% b: z8 l# ?+ c! [. X! i    End Sub
1 e* f4 O" T" G$ x9 \  }2 h" T+ l

( ~4 N$ I* h% C" b    Sub Echo(ByVal output As String)
9 ^5 P, x1 `/ i+ w, [$ ~, K  t' i! R        theSession.ListingWindow.Open()
        theSession.ListingWindow.WriteLine(output)
        theSession.LogFile.WriteLine(output)
; D; o. R) N# B    End Sub

End Module[/mw_shl_code]