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

iPhone

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

admin

C#的  没有用NX 函数
# u0 ^8 f% n: ^

[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

+ Z4 R" k, K. b  X" k: j        Public Shared Sub Main()

& o3 F+ {8 G* X# k8 _) E* q' u            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()
& w! o9 i& b# H5 Y8 T" @5 I+ k
            Dim foldername As String = ""
, @- J+ f- z* E: I            lw.Open()
8 p/ Z# V' K4 h1 D8 C2 _            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
                Return
            End If

9 X& ~' o" g. j9 Q$ _& L# [            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
            Dim fsi As FileSystemInfo
  o  C1 `; W1 ]) G  X
            lw.Open()
  L1 N# F* J) v. \" ]% X            lw.WriteLine("Parts in directory: " _
5 h* C  O- q8 Y* e" _7 j1 ]  F              & Path.GetFullPath(dir.ToString()) & vbCrLf)

            For Each fsi In dir.GetFileSystemInfos()
8 g  h1 s% c$ }) b. y                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
* j5 P# y9 R! ~                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
                End If
( U. ]" o0 F! S, N$ ]/ n            Next fsi
4 Y* n& J2 Q0 J8 j0 T
3 B. g- S; \# D# g2 W        End Sub
, M" i+ d0 P, I' r0 Y; T
        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
5 `5 ^% l; l3 G
* x) }; H2 \6 B/ e            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult
6 O9 l7 d+ A1 Z0 x0 X5 |
            fbd = New System.Windows.Forms.FolderBrowserDialog()
+ E" H5 g2 v# R) \' n0 `# w            fbd.Description = "Select directory to check"
; t3 _# X2 k: Z% l$ {1 F% p            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"
# A3 D( [2 h* W4 M            ' fbd.SelectedPath = "c:\aaa\bbb"
; V8 I7 v) x8 G7 c# |0 r, ~            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
  }1 Q( r, J/ }            fbd.Dispose()
  g" N2 c7 T0 l; t* t            Return result

        End Function
/ {! ^/ {3 a% A4 m
        Public Function GetUnloadOption(ByVal dummy As String) As Integer
, F9 W' S) g1 X            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
, H' Y  J  w  {# H+ g, V& L        End Function

    End Class[/mw_shl_code]

admin

ufun 的 方法

5 ^( v' t6 M. h0 e+ D4 H
1 y; |  Q2 y$ P1 n2 L[mw_shl_code=c,true]int
% U1 t$ G8 {) G7 O        cnt = 0,
3 E# ?4 p  ?2 ?* f8 s3 S        resp;
    tag_t
* L8 x* ^0 x- K4 Q. k" C2 C        part;
, `, `1 X% i3 {3 a& g! _    char
0 N; `; e) F5 D8 N- u0 T% J4 ^        dirspec[MAX_FSPEC_SIZE+1] = { "" },
        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
# y" t2 }! t' g: [- o    UF_PART_load_status_t
        status;
2 ?6 }$ s. _4 z& U: h/ }: H
* V; a7 K' |" x. I    if (UF_CALL(UF_initialize())) return 1;

5 |7 ]. v- d, K9 a    while (printf("Enter directory path:\n") && gets(dirspec) &&
        strlen(dirspec))
  q5 `3 a% H6 E9 [9 E, s) V- \    {
6 G- w) y- u2 C) b6 R        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
; f0 G# H+ L- G  H        while ((resp = uc4518()) == 0)
4 q0 A* W% e) u% \, y9 r- o5 ], S        {
            UF_CALL(uc4600(fname));
            UF_CALL(uc4575(dirspec, 2, fname, part_name));

# W) D4 r' Q# `5 x            ECHO( "%d.  %s\n", ++cnt, part_name);
$ l& l( G  ^/ N$ u) N) o* J
            UF_CALL(UF_PART_open(part_name, &part, &status));
            if (status.n_parts > 0) report_load_status(&status);
5 g2 y. M/ [* x6 M, F2 W$ i            if (!status.failed)
            {
                do_it();
2 d: ], N5 t1 }5 ~" K+ l                UF_PART_close_all();
, U* d% ~+ J; g9 ?            }
        }

        UF_CALL(uc4548());
! w  @$ n' y+ d8 A
7 o0 z* y; D# I$ w  S3 p        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]