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

admin

9 k! k* D! z5 R: W1 b' q, X# T- h
NX二次开发源码分享： 判断程序是外部运行方式还是内部？

1 q+ x% Z* F: P7 `" b2 j
[mw_shl_code=csharp,true]Imports NXOpen

Module NXJournal

    Dim theSession As Session = Session.GetSession()
# B3 B" K' m+ L) k) p) O4 C- O) U
+ y  X. P' Y% _) h5 A) f& W4 w9 S    Sub Main

! L. [' {" W; I: \! R2 w. y      If theSession.IsBaTCh
3 u; i+ A3 J. _" @        Echo("This is being run in Command Line (Batch) Mode NX")
      Else
        Echo("This is being run in Interactive Mode NX")
      End If

    End Sub

8 M+ C) c1 W2 u, a
; q( Y) ?/ {! x* E9 h; u1 e* {5 E    Sub Echo(ByVal output As String)
        theSession.ListingWindow.Open()
        theSession.ListingWindow.WriteLine(output)
5 A# c! t) F: Q% o" S0 _        theSession.LogFile.WriteLine(output)
    End Sub
" l; H# Z) B( J! C
# D3 {1 W; S( v! |; Z: nEnd Module[/mw_shl_code]
3 Y4 `. J! z0 u* g) R( |  `