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

admin

5 U" h$ m1 N; B" }! k& M
NX二次开发源码分享： 判断程序是外部运行方式还是内部？

4 p  f2 R5 y+ f' a1 w
[mw_shl_code=csharp,true]Imports NXOpen
6 Z6 V& I7 y4 F* K! P
2 E6 ]& V) I0 }( ^Module NXJournal

    Dim theSession As Session = Session.GetSession()
4 P) j$ U4 S# k8 j+ W" F+ K
    Sub Main

      If theSession.IsBaTCh
. t8 D+ P* i% U9 w5 o) J        Echo("This is being run in Command Line (Batch) Mode NX")
      Else
        Echo("This is being run in Interactive Mode NX")
& R2 u* A8 S* z! j: h      End If

8 X2 y. @; y- E  ]% b/ I0 M    End Sub

9 S" |1 `9 f- y7 T6 A+ _6 d
: x  D* A: q( \    Sub Echo(ByVal output As String)
# I6 H+ p% [" r        theSession.ListingWindow.Open()
% N4 E+ x$ \1 h% g- H) d        theSession.ListingWindow.WriteLine(output)
        theSession.LogFile.WriteLine(output)
    End Sub
5 B; t& ]& a! Z  Y! r2 t
1 [7 I- h' |5 y6 TEnd Module[/mw_shl_code]