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

admin

/ e7 A6 W; a9 Y# s, `NX二次开发源码分享： 判断程序是外部运行方式还是内部？

! L* }( ~4 N  v( u
$ C( H% H& P3 \# U! O. e: r8 }" v. E[mw_shl_code=csharp,true]Imports NXOpen

" k9 M3 G. p# L- Z8 `2 YModule NXJournal

3 B2 Q3 Q3 x" f    Dim theSession As Session = Session.GetSession()

; o# [7 }0 s: @5 ]  h    Sub Main

      If theSession.IsBaTCh
        Echo("This is being run in Command Line (Batch) Mode NX")
; {: |& t  B; o+ t% ?. g      Else
        Echo("This is being run in Interactive Mode NX")
      End If

    End Sub


% \+ [9 l* l4 v; C5 ~    Sub Echo(ByVal output As String)
0 R, P$ U% {; U0 d        theSession.ListingWindow.Open()
2 A. p  B& M: D8 p7 E! K* R        theSession.ListingWindow.WriteLine(output)
# }4 |0 M: N, x  M% F0 s7 }        theSession.LogFile.WriteLine(output)
    End Sub
: l% \  g$ C& Z0 y8 {" h! x
End Module[/mw_shl_code]