NX Journal 環境の情報を取得

Share on:

NX Journalでコマンドを作成する場合、ユーザー名やカレントディレクトリなどを取得したい場合があるので、それらを表示するプログラムを作成しました。

VBコード

 1Option Strict Off
 2Imports System
 3Imports NXOpen
 4Module module1
 5    Sub Main()
 6        Dim s As Session = Session.GetSession()
 7        s.ListingWindow.Open()
 8        
 9        s.ListingWindow.WriteLine("User Name: " & Environment.UserName)
10        s.ListingWindow.WriteLine("Current Directory: " & Environment.CurrentDirectory)
11        s.ListingWindow.WriteLine("System Directory: " & Environment.SystemDirectory)
12        s.ListingWindow.WriteLine("My temporary directory is: " & Environment.GetEnvironmentVariable("TEMP"))
13        s.ListingWindow.WriteLine("Get Folder Path: " & Environment.GetFolderPath(Environment.SpecialFolder.System))
14        s.ListingWindow.WriteLine("Version: " & Environment.Version.ToString)
15    End Sub
16    
17End Module

関連記事