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

iPhone

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

admin

C#的  没有用NX 函数
. T4 W0 G( y" d6 T$ K

[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

+ f; {+ ~' F! D        Public Shared Sub Main()
" h, {! q- Q; P
            Dim theSession As Session = Session.GetSession()
) B! R$ B5 h) q& C$ ?. W            Dim lw As ListingWindow = theSession.ListingWindow()

' H: b) ]: }# n2 x2 }7 C. @+ n" Z            Dim foldername As String = ""
+ }( m2 r; z3 O& \% ?% o            lw.Open()
            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
6 F) O/ L+ M% G1 c" e5 Y                Return
0 l) a: R6 V# y+ g& r            End If
# }4 t4 f% C# O6 a
% f; B6 B$ x  U            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
            Dim fsi As FileSystemInfo

9 ^3 ?, ?; Y. s0 `6 t            lw.Open()
            lw.WriteLine("Parts in directory: " _
+ ^  r1 Z0 f! z9 W! J+ W7 H              & Path.GetFullPath(dir.ToString()) & vbCrLf)

            For Each fsi In dir.GetFileSystemInfos()
                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
' P* v; m/ J* z! e. [                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
                End If
9 E/ L8 O- A* J* a            Next fsi
* I$ E1 W5 i+ q6 B3 a+ c
        End Sub

; t4 F' L: q8 x- R% Q        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
3 O$ }" L6 ~/ F. C* i
% _5 m' A! D2 ~& P6 z            Dim fbd As FolderBrowserDialog
: K2 x9 K, ?8 S) V            Dim result As System.Windows.Forms.DialogResult
; D# R9 a1 u* P1 E* t! ]& N  L% \
9 y# `  y; \9 V) q2 E+ d$ 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")
$ c2 M' d' u. o2 ?5 s            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
6 F, z& |. u2 \- N! q! i! o7 s            result = fbd.ShowDialog()
- h, K6 U6 v4 z, t            foldername = fbd.SelectedPath
            fbd.Dispose()
% I- T6 _. J6 _7 z            Return result

, z4 a4 _  f1 C) b        End Function

5 v& ~4 v0 d. C& Q5 p3 B        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
' C; P# L1 j9 i- E  _+ Y        End Function

  N1 p: N. c  b5 L; }# O    End Class[/mw_shl_code]

admin

ufun 的 方法
' f" n4 `6 @: d3 B& j9 Y  L3 i

8 d0 q$ ]' \2 A[mw_shl_code=c,true]int
+ w4 \. P1 s2 d! [, c, |, H        cnt = 0,
        resp;
% B0 t) }8 l2 ^' A% ~) w; l9 l! P    tag_t
        part;
! U3 V/ G( ~) `    char
* V0 |2 A. j1 O  l        dirspec[MAX_FSPEC_SIZE+1] = { "" },
        fname[MAX_FSPEC_SIZE+1],
3 G  S8 n4 Y, o4 s: j        part_name[MAX_FSPEC_SIZE+1];
    UF_PART_load_status_t
        status;

  L; Z0 t+ T+ X4 y7 N' a2 t    if (UF_CALL(UF_initialize())) return 1;
5 Q: h' J7 Y/ q$ j8 U- \) Q
    while (printf("Enter directory path:\n") && gets(dirspec) &&
        strlen(dirspec))
    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
        {
            UF_CALL(uc4600(fname));
) j5 @, T# v( R+ n8 f; Q9 c            UF_CALL(uc4575(dirspec, 2, fname, part_name));
" f$ r  q8 j/ v1 d3 I1 [! `
2 g' L  S9 s& K            ECHO( "%d.  %s\n", ++cnt, part_name);
7 n; u1 M3 F4 O
            UF_CALL(UF_PART_open(part_name, &part, &status));
( P5 y" U8 a! H7 `' N' u; J1 Z            if (status.n_parts > 0) report_load_status(&status);
& M8 Y' {% R- L/ x# K            if (!status.failed)
/ p3 V% C+ w5 J% ?1 d9 N$ @            {
0 g" E& @' S" P+ N- n                do_it();
                UF_PART_close_all();
+ A: f' [0 ?5 U. j  a* L            }
! l7 U6 H' g; M4 y8 g$ ?; U+ p' m        }
/ c  k3 l' L# m
! `7 ^( }' r& G) I& d2 H        UF_CALL(uc4548());

        ECHO("\nProcessed %d parts.\n", cnt);
+ C! W( p1 n3 i+ p    }[/mw_shl_code]
9 b* C6 N3 U- f