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

iPhone

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

admin

C#的  没有用NX 函数
! W6 m. ?' b! j; O8 ^* k

9 X" L8 l& M- [( l8 ~[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

        Public Shared Sub Main()

            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()

            Dim foldername As String = ""
            lw.Open()
2 N+ w( @. Z. a2 v            If (select_directory(foldername) <> DialogResult.OK) Then
" `/ |1 I: z& S+ i$ ?                lw.WriteLine("Input canceled...exit" & vbCrLf)
8 R; T9 ?' H" ^* o9 r4 V7 r2 c                Return
            End If

            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
# l$ P/ H1 i/ b( H  ^            Dim fsi As FileSystemInfo

3 j6 m' |) W$ p% b  |+ B            lw.Open()
+ ?. [6 S1 z9 g            lw.WriteLine("Parts in directory: " _
) B8 p1 }- Q$ t, {. @  k) h+ g              & Path.GetFullPath(dir.ToString()) & vbCrLf)
) j0 t; J! d- B; f- b( |0 W  ^  \
            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
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
9 \$ w* `/ @& O) n                End If
            Next fsi
; s2 O5 ^  @! v- P1 K
        End Sub
- t/ f( J: B2 Z3 f' {- T
! m; f% r  D6 f5 e        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
8 M4 ?, @1 B; M$ }! V: `4 G
, @( ]" k8 \- M            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult
+ m& ~7 w3 x% v/ `6 T, {
- ?7 b, K) x& O8 w) j$ Z: v& D            fbd = New System.Windows.Forms.FolderBrowserDialog()
            fbd.Description = "Select directory to check"
            fbd.ShowNewFolderButton = False
! a5 G( M4 B8 `/ o            ' start browsing at Desktop folder, uncomment for any other default directory
            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
            fbd.Dispose()
! Z' ~# A$ N. Q" @; H            Return result

. I6 Y) C8 e& \/ ]. u4 b        End Function

        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
6 h+ X1 w  f* j' f        End Function

4 i4 [* f8 O& \% H9 Y* j    End Class[/mw_shl_code]

admin

ufun 的 方法
- u) h8 P, N! _$ m2 [

[mw_shl_code=c,true]int
        cnt = 0,
$ l' @7 o2 `. l: f; r: ]        resp;
    tag_t
  j+ A* V4 J# C% v2 E        part;
5 t, n* W( d5 z9 G    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
8 f9 m  R8 i. f# E! h! v# B        fname[MAX_FSPEC_SIZE+1],
+ c$ U$ v7 f4 W3 A        part_name[MAX_FSPEC_SIZE+1];
    UF_PART_load_status_t
' @& W' ^; f  v* L2 S( @3 M        status;
% I( i4 `; y, t3 H* d* I3 Y
- N6 z8 t+ l7 Y5 K6 z( U' U    if (UF_CALL(UF_initialize())) return 1;

" R: y- b5 ]9 i% r9 u    while (printf("Enter directory path:\n") && gets(dirspec) &&
        strlen(dirspec))
    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
0 H+ C! g/ A: }- Z        {
            UF_CALL(uc4600(fname));
8 ]* u4 h3 r- a) F) S! T7 D            UF_CALL(uc4575(dirspec, 2, fname, part_name));

  _/ V" M; M: I6 S9 P3 T6 B            ECHO( "%d.  %s\n", ++cnt, part_name);
& O8 F, v( l7 x* b8 w, d6 t) h( X2 @
; V" u* \# }; u: j! y) a/ _- |            UF_CALL(UF_PART_open(part_name, &part, &status));
! O( Z) O, a: {( k' J, U            if (status.n_parts > 0) report_load_status(&status);
: K( A9 f* v/ h0 P6 L' f# R            if (!status.failed)
' u$ @) g/ {7 V+ _. `            {
' T/ B+ g6 x( {/ n  i; f                do_it();
                UF_PART_close_all();
            }
/ l0 q  G; j) w" ]        }

        UF_CALL(uc4548());
. K% {- Q0 ]$ }' w
. r/ c& H% r3 N  j2 b% \        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]