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

iPhone

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

admin

C#的  没有用NX 函数

2 S" y  B; `6 G0 \: e
[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory
2 ~, Z( ~( O* D% I" {7 p
3 o6 m" s# `1 K, a- N, x5 r3 w        Public Shared Sub Main()
$ m+ O5 z! U# B2 y5 n
0 {1 H' y4 H, k! b% Q. M% z            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()

            Dim foldername As String = ""
            lw.Open()
8 X& H8 }9 L+ |6 M2 S            If (select_directory(foldername) <> DialogResult.OK) Then
9 f; ^. @. ?# Y& u) A1 A                lw.WriteLine("Input canceled...exit" & vbCrLf)
                Return
' }) o7 r0 B+ ]# C6 e            End If

            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
& g! x6 e5 m. o! h  o: R3 F4 e5 i            Dim fsi As FileSystemInfo
/ B9 R  u9 |5 y% G* r  c
            lw.Open()
  l7 i* @- i' b8 K" ?* Q9 c; a" n) C            lw.WriteLine("Parts in directory: " _
              & Path.GetFullPath(dir.ToString()) & vbCrLf)
6 Y; J* J' H6 v6 q' B8 k( }% L6 d
            For Each fsi In dir.GetFileSystemInfos()
* y" i2 T, Y; j* P! v% I                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
! W4 f& F) \$ }) J# j2 G+ t3 D4 Q                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
# V. _$ Z4 }7 w                End If
6 M2 O3 r5 Z0 t4 y# T5 X            Next fsi

        End Sub
) g8 M( e# o4 p! s( f& ?
        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
& M: i% A* a. |! o9 l7 f" M, P" z
( Y) i0 N1 ]: C- I3 T( t            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult

9 a% L0 u: ]8 ~1 Q7 g            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"
& @% g! r4 q/ w' X            ' fbd.SelectedPath = "c:\aaa\bbb"
' Q( `8 a1 {* p4 I6 p/ I            result = fbd.ShowDialog()
! y9 q) g! Z1 G1 b6 ~' H            foldername = fbd.SelectedPath
0 e0 y$ Q' J' x9 S$ u            fbd.Dispose()
7 D6 c+ G+ w8 r+ {8 B7 ^            Return result
. M8 V& w3 v( ~1 i7 l6 C# @  m
" P5 o/ [* U* ^/ T  G/ h  m        End Function
( T# {( @) c& _  j$ f
        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
  B- e: x2 w1 \1 C        End Function
" g- B$ h0 x; {( V" h
    End Class[/mw_shl_code]
3 [2 n# {/ A4 O

admin

ufun 的 方法

) t" e8 e- m& M) _, \
[mw_shl_code=c,true]int
        cnt = 0,
' h/ o: V6 R' K) L% a        resp;
' a& _. \3 c: H; ~8 k9 h" w% ]    tag_t
- Z; z9 M; t- ?: N+ [9 L3 p        part;
    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
0 x9 R6 R) D, i5 B3 L9 N        fname[MAX_FSPEC_SIZE+1],
  m9 |# P7 z+ N0 S4 I        part_name[MAX_FSPEC_SIZE+1];
    UF_PART_load_status_t
1 v. o( F0 E! N& q6 o( L0 R* N        status;
9 e2 ?$ `" E4 Z8 G6 ~+ a
    if (UF_CALL(UF_initialize())) return 1;
% M( w) U  m# s
    while (printf("Enter directory path:\n") && gets(dirspec) &&
. s8 Z% j1 J5 A        strlen(dirspec))
    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
        {
            UF_CALL(uc4600(fname));
            UF_CALL(uc4575(dirspec, 2, fname, part_name));
4 G1 y# d/ d8 Z( c% w. w4 g
' S7 }" n# t  n  ?            ECHO( "%d.  %s\n", ++cnt, part_name);

            UF_CALL(UF_PART_open(part_name, &part, &status));
            if (status.n_parts > 0) report_load_status(&status);
9 Z2 B: W+ v2 Y            if (!status.failed)
            {
4 o0 m  m* j  h* f                do_it();
                UF_PART_close_all();
            }
3 v7 e+ F  f7 h" |& p        }
' B6 d2 }3 G8 P; M0 O; ^+ ~7 c9 g
        UF_CALL(uc4548());
1 t& `3 O  z* R; e% f
        ECHO("\nProcessed %d parts.\n", cnt);
$ f4 i4 ]# i( Y    }[/mw_shl_code]
7 U$ V! R3 \& g4 g" o