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

iPhone

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

admin

C#的  没有用NX 函数
! \4 L, @! R3 s/ K
% c$ f; {9 I& K# h5 D+ g6 P
1 G# h3 T2 C( N# A! X$ C% L0 [[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory
/ g, g2 Q) ?$ f( F8 a- }
) B, g4 ^4 |- K1 [+ i        Public Shared Sub Main()
* K; m4 O5 n  F2 h! @9 }& z
* f- k$ i9 Z! _            Dim theSession As Session = Session.GetSession()
) _  m! Q! V: k& G# j/ U            Dim lw As ListingWindow = theSession.ListingWindow()
6 ]4 s5 b! b' X
# a% [, Z* b4 F( k" t5 t/ M            Dim foldername As String = ""
. s8 E7 h  g8 ^/ {            lw.Open()
/ O4 `5 \5 g* l, r2 N# a            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
9 p9 f9 x6 q0 w& ~. P                Return
            End If
2 N  A4 x. J* y
3 D. L2 p$ ~7 Z  i% u            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
+ H. g+ Q' g. n( F            Dim fsi As FileSystemInfo
! [0 l( s1 C9 r6 m% R" }
            lw.Open()
, w) X2 q0 w  s4 D: h1 U            lw.WriteLine("Parts in directory: " _
              & Path.GetFullPath(dir.ToString()) & vbCrLf)
9 H5 x* n* Y6 Y& o
) Q9 `5 b5 A. y* k            For Each fsi In dir.GetFileSystemInfos()
                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
! F  x/ P- ~' c: u( z+ d4 I                    Dim size As Long = f.Length
- R( t" a8 |) J& t# X+ h+ M0 J                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
1 K1 }: b- ^5 r2 n! S& a0 R                End If
            Next fsi
# j* Q7 X  f/ f. y
        End Sub

        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult

7 n7 B, K! p- D            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult

            fbd = New System.Windows.Forms.FolderBrowserDialog()
& e1 f  B" f% h. I0 ^2 K6 x            fbd.Description = "Select directory to check"
/ f& w: K6 z# ~            fbd.ShowNewFolderButton = False
( M  p* q  d+ x1 M            ' start browsing at Desktop folder, uncomment for any other default directory
9 H2 a# h. @9 ^* U% d: I9 G            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
* x  D: c$ ^# K! X6 T: z3 z  A2 W            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
! N" O) }/ D2 B' ^- R            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
1 [- G+ g, ]; X8 ^) r0 v            fbd.Dispose()
            Return result

/ _2 m0 l4 [8 b        End Function
$ p% u2 B6 D1 s& i( \# G
( S" A# ]9 p9 i        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
        End Function
3 h. P  l0 h* P2 S1 ?! }
; `2 I5 v& U2 k- z1 q0 v7 G3 `6 P    End Class[/mw_shl_code]

admin

ufun 的 方法


4 _4 h# z) D4 ?[mw_shl_code=c,true]int
        cnt = 0,
2 o6 Q2 ~  c! Y/ o: M; T; V        resp;
) T7 o1 o1 M! q# d$ ^/ i3 L/ S$ X    tag_t
        part;
    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
2 z7 e- F/ A- E4 [9 ~        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
- \0 j2 O0 P. n1 d6 I" H    UF_PART_load_status_t
        status;
% D. L9 Z" N: D( \
+ N  l$ }) h. b8 ]+ G, ~! d  y  D    if (UF_CALL(UF_initialize())) return 1;
' K7 }8 J) U- H8 m$ G# m" l& M0 c
# n  v8 j- g1 k* T9 C/ n- X& Q6 Q    while (printf("Enter directory path:\n") && gets(dirspec) &&
        strlen(dirspec))
: L( X1 E3 ]# r. G# t6 B; I3 }3 r    {
, W# V7 x, q- Y2 F        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
$ y9 |0 [9 t6 w5 ?        {
$ c9 j+ t9 p( T$ d9 j            UF_CALL(uc4600(fname));
% M; h6 o: [9 r/ `, _* }; q0 l4 N1 y            UF_CALL(uc4575(dirspec, 2, fname, part_name));

0 i2 r5 t# C+ L3 s            ECHO( "%d.  %s\n", ++cnt, part_name);

) m6 P( k$ I9 h  e2 s) P, v            UF_CALL(UF_PART_open(part_name, &part, &status));
            if (status.n_parts > 0) report_load_status(&status);
4 Q1 U+ b( d/ X, S& U            if (!status.failed)
            {
3 S8 _3 ]8 U: g9 t: L8 s                do_it();
1 }8 i% H* x& ], L( \; U/ N- y                UF_PART_close_all();
            }
        }

- h& h  J1 V% q/ x; q% h        UF_CALL(uc4548());
) n2 p* E3 {1 i7 y3 o6 ]4 r
        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]