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

admin

/ \0 V! [: ~5 ~6 x7 p
: I9 n8 j. ~1 i' t* dNX二次开发源码分享： 判断程序是外部运行方式还是内部？

# J4 f. R+ {+ d. M' B# ]
[mw_shl_code=csharp,true]Imports NXOpen
. Q/ ?8 E! f8 }, N
Module NXJournal

    Dim theSession As Session = Session.GetSession()
8 |& b2 V4 y0 c% [* d- k. l
    Sub Main

      If theSession.IsBaTCh
. P) @7 E0 B* @$ b1 H3 J        Echo("This is being run in Command Line (Batch) Mode NX")
" B$ L- s2 @7 \- H9 X      Else
        Echo("This is being run in Interactive Mode NX")
4 k0 I4 _% @: n8 _2 |' Z  r      End If

! u7 z& }/ J! f, T; b) ^" t( `4 A& e    End Sub
% k- k# @0 f( q7 r; |9 \1 \

    Sub Echo(ByVal output As String)
; f% ?* K. J  \- J$ Y        theSession.ListingWindow.Open()
        theSession.ListingWindow.WriteLine(output)
        theSession.LogFile.WriteLine(output)
    End Sub

End Module[/mw_shl_code]
! ?- S" Y8 g# ~! y6 m4 Q