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

admin

  E) O# Z% L5 A: UNX二次开发源码分享： 判断程序是外部运行方式还是内部？


[mw_shl_code=csharp,true]Imports NXOpen

. S  ^3 G# C- [( E+ b& I/ fModule NXJournal

    Dim theSession As Session = Session.GetSession()
; z# f* k* _) Y' T# g
    Sub Main
+ [" K& W- I1 }6 o/ ]2 p
. H1 c4 E; D  e9 X      If theSession.IsBaTCh
5 f. b4 K( K+ B* h( _. Z5 t3 k+ H* T        Echo("This is being run in Command Line (Batch) Mode NX")
  y! l8 @; L' d& D& V      Else
        Echo("This is being run in Interactive Mode NX")
+ f* w" |4 ~$ T, f( V  |      End If
  c% N2 r9 I: W$ a! g
! N" L3 B- G! X2 m( y    End Sub

  [/ m! k) w+ d1 j, K+ z' e7 i, A
3 f: z. w5 u" g' Y5 g( H1 r8 o    Sub Echo(ByVal output As String)
        theSession.ListingWindow.Open()
8 T- h$ s' {0 ?        theSession.ListingWindow.WriteLine(output)
  o2 {3 P1 e# _7 c3 A; j' b! G! ^        theSession.LogFile.WriteLine(output)
* }( V$ x5 x9 }9 z4 M2 v( P8 y    End Sub

& Q2 j! v. J$ v- a5 r% ]$ QEnd Module[/mw_shl_code]
; Q$ u3 Q! z1 }