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

iPhone

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

admin

C#的  没有用NX 函数
8 C+ a$ N- Z5 T! m  j% _

! x" b% O+ A$ A+ k[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

        Public Shared Sub Main()
. s% E0 I2 C- z3 a3 h
0 C2 t3 C+ @) C9 t: q            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()
6 Q& G9 y  A0 z9 g: y( _
, C' N. X8 l& ^            Dim foldername As String = ""
            lw.Open()
# j' l5 r$ j% Z7 N) [            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
                Return
9 N, G" n+ I8 N            End If
$ U. }& q. a2 l* Z. P8 P( j
            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
0 V# s% p7 M( n' X* T8 _            Dim fsi As FileSystemInfo
) o: F3 v. ^; C! A, S  c3 y6 J
, w4 u2 x# c7 U4 ?4 ]0 r& g* T% S  A            lw.Open()
            lw.WriteLine("Parts in directory: " _
: `/ |& @8 S, `1 W, Z              & Path.GetFullPath(dir.ToString()) & vbCrLf)
  C, _. I5 A( f# ]( _2 g9 g
: F9 c! h) `) m" O            For Each fsi In dir.GetFileSystemInfos()
; S* Y$ ~( ]# v                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
+ o, G4 t4 K' A  |) G5 Z0 \; Y                    Dim f As FileInfo = CType(fsi, FileInfo)
& D5 n3 o9 ]5 P: _                    Dim size As Long = f.Length
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
% j6 M: G- k- K# b, P+ m0 ^3 R                End If
            Next fsi
9 i) ^3 o, z; [8 ~* K0 `  l0 |
; l4 g. s# m8 P! z- h% |9 h        End Sub

        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult

            Dim fbd As FolderBrowserDialog
7 z9 u! F2 I  i( h            Dim result As System.Windows.Forms.DialogResult
! h' b& ~2 b; I: N9 R& a/ |* v
6 _( ]- z- t" i: k$ B4 Z            fbd = New System.Windows.Forms.FolderBrowserDialog()
            fbd.Description = "Select directory to check"
; d/ `' r' N2 n7 e/ c4 z1 s0 P6 r            fbd.ShowNewFolderButton = False
            ' start browsing at Desktop folder, uncomment for any other default directory
6 W" P9 n% O/ f! i            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
4 q* Z" z& S0 S" s            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
- E/ Q. z, F6 C8 u6 F# W            ' fbd.SelectedPath = "c:\aaa\bbb"
  B1 X. e6 [5 m) o            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
            fbd.Dispose()
            Return result
$ S8 L- o; E+ o4 ^
        End Function
+ `: y( P) L5 L' f
        Public Function GetUnloadOption(ByVal dummy As String) As Integer
9 T; }0 J1 `4 d* q. r( K8 {& a" G; `            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
        End Function

0 v7 X) H: D5 M' e% X" r+ p    End Class[/mw_shl_code]

admin

ufun 的 方法
0 E& d0 v& |: l% h+ Z

& [/ h; D( F. d% D* {9 e  l[mw_shl_code=c,true]int
9 }9 B! e8 H. P& t1 Q! S6 w0 t        cnt = 0,
        resp;
" X: B6 ~% }% h# X    tag_t
        part;
    char
8 E7 j. ?- ?# D8 Y        dirspec[MAX_FSPEC_SIZE+1] = { "" },
( ^2 k4 M4 J0 ^' l5 A" Q; F4 b        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
2 d) H* ~  n3 A- v    UF_PART_load_status_t
. M( F% b$ E+ y8 R0 E# P4 f        status;
. Q. @9 k7 z6 y2 V
    if (UF_CALL(UF_initialize())) return 1;
2 Y5 w# L7 H' U1 E3 p; ]" E$ I
    while (printf("Enter directory path:\n") && gets(dirspec) &&
6 y% k  ^+ t" B' S5 F! `" ^3 b        strlen(dirspec))
    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
7 l( E  W2 P9 G2 E% h# y3 M        while ((resp = uc4518()) == 0)
        {
            UF_CALL(uc4600(fname));
$ e2 D1 O# Q% K6 S2 G0 S( ~+ D" O            UF_CALL(uc4575(dirspec, 2, fname, part_name));

  \/ z: R# ]  y5 a+ C9 c* @) n6 H+ A; e            ECHO( "%d.  %s\n", ++cnt, part_name);

, C4 Y6 l/ Z" u- f" x4 a6 t$ ^' T' J            UF_CALL(UF_PART_open(part_name, &part, &status));
            if (status.n_parts > 0) report_load_status(&status);
7 D; d0 c4 R5 F/ W# V, m            if (!status.failed)
            {
# K" h* l; o, ~' H                do_it();
                UF_PART_close_all();
            }
        }
6 W( Z( n0 i0 \. V; H$ ]2 a, M( I
: m: ~8 f2 ^( C: i0 G$ h" t        UF_CALL(uc4548());
; W$ K8 g5 C! ~7 N" p+ t
& ~; \7 u, s& R/ o6 Y6 F5 h- w        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]
9 D/ P! S# i1 E# U, u% }