ufun 获取文件夹下所有prt文件名

iPhone

ufun 获取文件夹下所有prt文件名

admin

C#的  没有用NX 函数
( L# ^5 L0 D$ @/ |2 C$ u

[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

$ m6 S) x% c( B: ~/ P        Public Shared Sub Main()

/ j% c! y+ y6 H0 s8 H# V            Dim theSession As Session = Session.GetSession()
( m+ @6 ^! c, j" }            Dim lw As ListingWindow = theSession.ListingWindow()

# A# X$ r: t: R1 X( s2 [# S            Dim foldername As String = ""
            lw.Open()
            If (select_directory(foldername) <> DialogResult.OK) Then
7 @; g+ G" K' ~( N7 T: c7 J                lw.WriteLine("Input canceled...exit" & vbCrLf)
6 A" {4 ~) L) h5 g                Return
0 h- M( y! ^0 l: B; Y            End If

; e  H6 O( Z. P8 S            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
            Dim fsi As FileSystemInfo
% B; T" ^9 y: F3 J5 A( w/ v0 l- a3 F
            lw.Open()
            lw.WriteLine("Parts in directory: " _
3 V: `) p2 j5 w( r* N" k7 D              & Path.GetFullPath(dir.ToString()) & vbCrLf)

            For Each fsi In dir.GetFileSystemInfos()
                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
! [3 X2 g# c8 p0 _& p                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
                End If
            Next fsi
" Y) I! X7 {+ C3 y/ E( z
        End Sub
0 Z0 I" k5 m5 ]7 j2 `
        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult

            Dim fbd As FolderBrowserDialog
4 @1 E' _. K6 G" f2 L0 q) j, x            Dim result As System.Windows.Forms.DialogResult

            fbd = New System.Windows.Forms.FolderBrowserDialog()
            fbd.Description = "Select directory to check"
            fbd.ShowNewFolderButton = False
            ' start browsing at Desktop folder, uncomment for any other default directory
            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
' K* ~. n5 l' @& Q; K            fbd.Dispose()
' n& d. Z. r- T1 I' w            Return result
; q& Y: v6 J: K2 k9 d" Q. X, ?' b
: k5 E* Z* y+ q! u- F) i5 n9 J        End Function
& P- S! m" e3 J& S# p8 @0 x6 P( L" [
        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
, v: _7 _  D9 `1 F        End Function

    End Class[/mw_shl_code]
0 F3 D) _: l- E' }3 |7 s

admin

ufun 的 方法

3 w7 a3 T8 \4 z' o+ v# Q
$ d$ g8 R& @7 H7 g) O  w[mw_shl_code=c,true]int
        cnt = 0,
        resp;
    tag_t
1 B; K6 N4 Y$ c5 s# B        part;
    char
3 o; E: j9 P" s( P' t, L: ]        dirspec[MAX_FSPEC_SIZE+1] = { "" },
        fname[MAX_FSPEC_SIZE+1],
1 z" h) U3 v7 Y( O* ?/ W- k        part_name[MAX_FSPEC_SIZE+1];
* \  W+ J; r( Y9 W2 Y    UF_PART_load_status_t
5 D' x. N! Q5 S* a5 |2 X        status;
# S& W! `8 X4 _0 }+ ^
    if (UF_CALL(UF_initialize())) return 1;
% B2 o8 r8 w# P4 p  N( ]1 G
& L5 K$ O7 ]5 ~6 e( n    while (printf("Enter directory path:\n") && gets(dirspec) &&
' y+ C: g1 H) V& x; u$ l        strlen(dirspec))
( a5 ~- _" K# s7 p0 b    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
        {
; |2 b' a$ K+ [8 J            UF_CALL(uc4600(fname));
            UF_CALL(uc4575(dirspec, 2, fname, part_name));

            ECHO( "%d.  %s\n", ++cnt, part_name);

) E, \, p6 e1 d% e: j! l! n            UF_CALL(UF_PART_open(part_name, &part, &status));
            if (status.n_parts > 0) report_load_status(&status);
7 z6 S. ?, Q- W  L* i6 l            if (!status.failed)
1 \/ ?2 U/ w4 r7 g+ u/ y! I            {
                do_it();
8 V. I4 @3 e5 I7 ~% E+ ~                UF_PART_close_all();
            }
6 Y$ f3 ]' r3 b5 I" Z  o0 @( m6 L1 C, }        }

5 T- Z9 c1 h) t& O: E9 w7 R; S        UF_CALL(uc4548());

        ECHO("\nProcessed %d parts.\n", cnt);
8 ~4 y1 z% j$ a4 H) J0 s    }[/mw_shl_code]
2 V+ ^0 _/ I6 x1 j* i+ E