NX Journal 環境の情報を取得

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

VBコード

Option Strict Off
Imports System
Imports NXOpen
Module module1
    Sub Main()
        Dim s As Session = Session.GetSession()
        s.ListingWindow.Open()
        
        s.ListingWindow.WriteLine("User Name: " & Environment.UserName)
        s.ListingWindow.WriteLine("Current Directory: " & Environment.CurrentDirectory)
        s.ListingWindow.WriteLine("System Directory: " & Environment.SystemDirectory)
        s.ListingWindow.WriteLine("My temporary directory is: " & Environment.GetEnvironmentVariable("TEMP"))
        s.ListingWindow.WriteLine("Get Folder Path: " & Environment.GetFolderPath(Environment.SpecialFolder.System))
        s.ListingWindow.WriteLine("Version: " & Environment.Version.ToString)
    End Sub
    
End Module

記事の共有

関連記事

コメント

comments powered by Disqus