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

iPhone

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

admin

C#的  没有用NX 函数

; E# r, L% N" R, p6 T7 M) w
[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory
  ^9 O% t' x, P  b6 \
        Public Shared Sub Main()
( f4 V( z* }- U( R5 }
2 ], ^8 s" k0 G6 q) I            Dim theSession As Session = Session.GetSession()
3 w6 }0 q9 S& j0 @            Dim lw As ListingWindow = theSession.ListingWindow()

            Dim foldername As String = ""
9 e0 o* y5 o" C2 c1 l& O) i, \# U            lw.Open()
            If (select_directory(foldername) <> DialogResult.OK) Then
$ J2 C3 x+ P: n) T- ~' P! r                lw.WriteLine("Input canceled...exit" & vbCrLf)
0 \( u' D  {4 w( X6 f: t5 d$ p                Return
* d* N* Z$ C/ \6 h& l            End If
. Y! V3 l( e/ T( y8 Z* _. D& V
7 c# u; q1 o2 ?            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
/ d+ ?5 d3 }7 m4 P9 h$ g            Dim fsi As FileSystemInfo

- M; l  h/ w  ^            lw.Open()
            lw.WriteLine("Parts in directory: " _
3 |( p% f8 d, s2 _1 |  A% A1 Y              & Path.GetFullPath(dir.ToString()) & vbCrLf)
% b3 L9 k! O$ p, i
+ N9 t, F7 O( p- G/ T) Q% m* l            For Each fsi In dir.GetFileSystemInfos()
                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
# Y0 w) }& T3 |$ J                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
4 ]; u: N& s4 U# @2 v5 l                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
( v: H8 O, I" Y( ^/ o+ k% ]                End If
            Next fsi
" L. d0 W, e8 M
. |9 `$ Q2 h9 s: W) x. [" ^        End Sub

        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
. v+ O( b+ O) Q
            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult
% K- a* Y3 }% o7 b4 h5 u3 H" ]' S
4 I" V% J) I+ U1 @% j            fbd = New System.Windows.Forms.FolderBrowserDialog()
3 @9 R& }/ ^* Q( _            fbd.Description = "Select directory to check"
            fbd.ShowNewFolderButton = False
0 B% _3 _6 f& i% F            ' start browsing at Desktop folder, uncomment for any other default directory
( @$ O* t8 {! H! U! Q9 F            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
/ }4 ~% E2 |$ ^6 a2 s0 _            ' fbd.SelectedPath = "c:\aaa\bbb"
            result = fbd.ShowDialog()
/ y) H3 J5 I. H6 k* [2 L" X            foldername = fbd.SelectedPath
3 K# n+ n  z: l. F# b            fbd.Dispose()
7 C1 Y9 n! L9 _: o4 k            Return result

3 O: {7 H8 d8 ]/ H8 a, T- K8 @        End Function
$ n; T& V8 J4 z6 `
: V& X5 t5 C3 Y! {! U2 B# n        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
+ {, C( c, Y  {  v* `6 ~. @        End Function
# I; M" q5 P7 h% @/ F0 [
; j; \% I& s9 M    End Class[/mw_shl_code]
/ C4 ?7 k5 l- {% y- g9 w

admin

ufun 的 方法
* i$ T* h# k- m* r1 z% p% m; Z
: Y8 Q# Y6 o+ X4 i( |
[mw_shl_code=c,true]int
- ?8 X( d; u! w        cnt = 0,
$ P8 C5 Z- {% S        resp;
    tag_t
        part;
! k9 ?$ G2 @0 v7 I    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
; G7 x, I# t4 d7 [+ D( p        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
' x9 X# Y) |5 i: q0 x    UF_PART_load_status_t
        status;
9 F; Q( D2 e5 r' |
( P* x; S: J1 g! d" x3 h3 y    if (UF_CALL(UF_initialize())) return 1;
, |9 `! g$ }) x0 v/ y- \2 s' p
9 ~% @5 Z' {9 X) {% K; ?5 Q    while (printf("Enter directory path:\n") && gets(dirspec) &&
" m2 x: [, h2 T, A, k        strlen(dirspec))
8 j; T" e) V) K" S( y    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
6 p. n& M) I+ w; m% O( O7 K        {
( [8 _% c0 `2 `9 w) Z- Z            UF_CALL(uc4600(fname));
            UF_CALL(uc4575(dirspec, 2, fname, part_name));

; j/ @+ }% c: S2 n; v            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);
& g" ^! m3 P! f" N            if (!status.failed)
" H& t4 F0 q% }9 X/ ^            {
8 n5 M* F; n( K0 y7 f4 G5 W                do_it();
                UF_PART_close_all();
            }
        }
5 t  I$ u. I3 b3 D6 l. a
        UF_CALL(uc4548());
4 O9 r0 G. N  j. r
        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]