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

iPhone

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

admin

C#的  没有用NX 函数
, n; i+ k: K& ]$ `; W2 y

[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory
. ~9 L5 [' _/ b. ]/ o8 k# G* ?
        Public Shared Sub Main()

) P0 \& {  K+ N, ~* `; g) W) l            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()

            Dim foldername As String = ""
            lw.Open()
0 O4 A, J: C' S0 }/ x+ H            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
                Return
            End If

            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
, o  S* F  n' _# O8 b" j$ g- c            Dim fsi As FileSystemInfo

            lw.Open()
1 f. r" e- d* o7 R            lw.WriteLine("Parts in directory: " _
  w3 O) ^: |4 k+ k              & Path.GetFullPath(dir.ToString()) & vbCrLf)

            For Each fsi In dir.GetFileSystemInfos()
6 r3 e2 Y! C9 s+ `; }( Z" D/ W                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
. J: w: e6 S& K( L  M# M$ K                    Dim f As FileInfo = CType(fsi, FileInfo)
, }7 K2 b' i3 y. @' C! I1 p. T                    Dim size As Long = f.Length
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
                End If
; q$ R; k: U; g/ k& Y0 d  x- B            Next fsi

) c" p- |& r, ^8 k5 l        End Sub

        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
1 A9 ?9 d' j6 N' L0 i
            Dim fbd As FolderBrowserDialog
            Dim result As System.Windows.Forms.DialogResult
/ h0 y' D1 w+ Z1 A+ M
# O7 E8 G) U0 v' u+ s1 B. ~            fbd = New System.Windows.Forms.FolderBrowserDialog()
$ S8 t/ ]" t2 W$ R/ ]# {* T$ R% H4 `            fbd.Description = "Select directory to check"
            fbd.ShowNewFolderButton = False
            ' start browsing at Desktop folder, uncomment for any other default directory
( e' m  Z' n0 T# t  A( v' m            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
6 W+ w4 j9 y& D. e            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
7 Z: ~! z; q' Q! y# f            result = fbd.ShowDialog()
+ G* p' j! I) z. q4 H! }, @            foldername = fbd.SelectedPath
4 \: O* w( B: v( z/ Q: @            fbd.Dispose()
, \: E, F/ q. ]7 }0 P: a. Z            Return result
; e( V! R% j% |8 y/ ~; s
* j/ i5 q5 V: r8 e+ r8 a        End Function
2 M: L  ?: C  q! l2 w- s: A2 D
9 {3 @4 v' w: f# n( q        Public Function GetUnloadOption(ByVal dummy As String) As Integer
5 w; v% R: o3 Y/ \6 D  |6 G# S1 b            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
        End Function
, D$ {+ M8 u0 @, {; T' y
  R; W. {! K. g: [) ~    End Class[/mw_shl_code]

admin

ufun 的 方法


[mw_shl_code=c,true]int
3 t( ^7 z# H0 l, G- v        cnt = 0,
        resp;
  J6 q6 H& s, `6 I0 I2 N    tag_t
1 [1 b. g/ i& z6 I5 @* Q        part;
    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
    UF_PART_load_status_t
        status;
* Q. [1 _( E7 m7 i# e' _% M' {
: C1 w8 n8 G: s( Z    if (UF_CALL(UF_initialize())) return 1;
4 R5 u$ d/ J. z
    while (printf("Enter directory path:\n") && gets(dirspec) &&
% y8 n8 |/ `3 m1 u: l/ k/ W8 p; q        strlen(dirspec))
' W7 G  \) ^$ F& n* Q# m    {
" ]1 @, g/ V+ y        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
        while ((resp = uc4518()) == 0)
        {
; A/ n4 n/ R( q$ Z/ H            UF_CALL(uc4600(fname));
' P( {- @. n. y" v  I* \4 J1 L% V            UF_CALL(uc4575(dirspec, 2, fname, part_name));

            ECHO( "%d.  %s\n", ++cnt, part_name);

& _4 ^9 l; L) P6 I& }            UF_CALL(UF_PART_open(part_name, &part, &status));
9 j6 m  }' [1 a: K  `            if (status.n_parts > 0) report_load_status(&status);
            if (!status.failed)
            {
                do_it();
( k) A3 [1 P$ N9 N+ `6 m                UF_PART_close_all();
            }
        }

        UF_CALL(uc4548());
0 P! ?- ?7 ]3 _& }$ B
        ECHO("\nProcessed %d parts.\n", cnt);
, g3 w6 @3 Y: [* ^9 R    }[/mw_shl_code]
/ J! H* t" s1 c' z: x) m