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

admin

NX二次开发源码分享： 判断程序是外部运行方式还是内部？
# D' S2 ~+ {  C0 N$ z" M' T1 M& i
5 C+ P$ q9 e5 [  X9 L
5 ?) H8 ]4 R- s# x( ~- `' j1 @[mw_shl_code=csharp,true]Imports NXOpen

Module NXJournal
7 V  ?* }3 }8 D. X0 O7 e
    Dim theSession As Session = Session.GetSession()
/ q. m: o$ ]5 @/ O0 H) ?( L: F
    Sub Main
, z9 S  ~4 j& G, [+ `; H
+ q5 ^5 H  f7 A" z      If theSession.IsBaTCh
; j9 J/ n, M! x/ n6 B+ r( r        Echo("This is being run in Command Line (Batch) Mode NX")
      Else
        Echo("This is being run in Interactive Mode NX")
      End If
; b' ^) Q7 a2 ]0 a7 v) B
    End Sub


    Sub Echo(ByVal output As String)
        theSession.ListingWindow.Open()
8 Q5 M' }7 p; x) ^! d        theSession.ListingWindow.WriteLine(output)
        theSession.LogFile.WriteLine(output)
( T+ ~$ `1 G. \5 [" g( p" [) z) \    End Sub

End Module[/mw_shl_code]
0 e" n+ T$ k# O, B; S