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

iPhone

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

admin

C#的  没有用NX 函数
8 w1 h4 M2 P% y4 S4 `: [

[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

        Public Shared Sub Main()

8 S. M- B: V+ k5 v5 z, g7 Q5 m            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()
5 N/ h3 A5 p! n" Y! E6 B
            Dim foldername As String = ""
% H8 G% H2 o2 W: N& m# J            lw.Open()
& Q! b- U' V6 m- C- t5 o; s; R            If (select_directory(foldername) <> DialogResult.OK) Then
1 H  G+ C% ~- N1 P/ }3 S# F                lw.WriteLine("Input canceled...exit" & vbCrLf)
/ R1 N' Z) q! k$ c1 Y( L# B                Return
            End If
4 @, L; G: s, a$ A
            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
$ N7 A) k( K  C( C1 W$ W            Dim fsi As FileSystemInfo
2 A  w% z! d( r7 u( E
            lw.Open()
: d$ x# Y9 x9 I  h6 W            lw.WriteLine("Parts in directory: " _
              & Path.GetFullPath(dir.ToString()) & vbCrLf)
+ \- [6 l' y! ~" H# ^
) r# q. q/ i# A" I            For Each fsi In dir.GetFileSystemInfos()
+ u4 n3 r% j7 X% ^0 b                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
7 b: `* Y; o8 n, @                End If
            Next fsi
/ g" j5 ?7 I# q+ f9 g
        End Sub
2 q' U; ^+ \9 W' B4 X5 P4 p2 }% a
5 g" F( y' F+ m7 O: u) ^& k        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult

4 G0 v# E; y% O            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult

# y0 a2 S: `! r' @$ Q            fbd = New System.Windows.Forms.FolderBrowserDialog()
            fbd.Description = "Select directory to check"
& Z# o$ f2 I: \7 O0 v, e            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"
( I6 ]" i; Z5 G! Q7 A3 \            ' fbd.SelectedPath = "c:\aaa\bbb"
            result = fbd.ShowDialog()
( M$ r  n( R! |            foldername = fbd.SelectedPath
            fbd.Dispose()
            Return result
! h3 }( A% W% j2 R
        End Function

$ e3 ]) E5 j8 N        Public Function GetUnloadOption(ByVal dummy As String) As Integer
; m8 D- k/ l, v4 z; m            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
        End Function
% r0 z+ P  N; P$ ]3 Z/ Z* g
4 ]! m% B& M7 h" W5 M5 b5 x5 w    End Class[/mw_shl_code]
7 ~! }$ A8 ?0 ]5 w8 A

admin

ufun 的 方法
) I5 Y5 h+ H; m0 E, g0 ~4 z/ ]
, Q. H2 Y; A9 g; b
# _# S+ o9 u% n0 u[mw_shl_code=c,true]int
        cnt = 0,
* u4 B* ]# J* A! O$ o2 K        resp;
    tag_t
: }4 U* L# E( x5 L        part;
6 h3 ?  I" n0 \) \' C    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
, m8 U0 _+ h5 ]1 q2 Y* [2 S4 L5 E5 W    UF_PART_load_status_t
        status;

( a, i0 b% O( b5 O. I+ E5 j9 U    if (UF_CALL(UF_initialize())) return 1;
2 M) ]$ X1 m. n: y' }
    while (printf("Enter directory path:\n") && gets(dirspec) &&
% \. S* f+ g! p6 Y8 k, f. D+ a# [6 ]2 I        strlen(dirspec))
, \( P3 y5 N/ S1 s# n9 l    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
% ]. p  {2 D# _+ Y( e' ^9 V+ h3 E        while ((resp = uc4518()) == 0)
+ O) |/ R5 U' L        {
, f. E3 l  E$ k% i6 v7 r2 L% G            UF_CALL(uc4600(fname));
9 f7 k4 b+ c- G" T/ `6 Y9 ~" j5 {# f            UF_CALL(uc4575(dirspec, 2, fname, part_name));
% p1 l8 H. c+ V, w  T# K
            ECHO( "%d.  %s\n", ++cnt, part_name);
% W& K+ ^, u% \. K) D$ I  G
( t  S8 @8 w+ z: v2 S            UF_CALL(UF_PART_open(part_name, &part, &status));
8 l1 B* ?/ ]" z# K# x$ s            if (status.n_parts > 0) report_load_status(&status);
. |/ g/ i3 V$ b: k5 k9 \            if (!status.failed)
            {
                do_it();
* B: l% [& U* b# n1 w/ c$ w& ?                UF_PART_close_all();
            }
; S7 X8 k+ a' G* B( G* y2 G7 f        }
, ^6 W* `5 u* A! A  K8 H8 s
! k& Y0 H& l# c0 E        UF_CALL(uc4548());

        ECHO("\nProcessed %d parts.\n", cnt);
- ?6 F8 s& f; N$ `1 E    }[/mw_shl_code]