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

iPhone

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

admin

C#的  没有用NX 函数

% ^6 }- i6 [3 {( S! v- ?
0 \' c% ?8 J$ [6 Y[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory

( O0 m. H* z7 a        Public Shared Sub Main()
1 y1 |$ y, [6 d5 k$ z! i4 b
            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()
- D- b1 o! l6 s! j" \! S
            Dim foldername As String = ""
5 l2 L6 X# o$ m9 [$ A2 y            lw.Open()
% t$ w0 h9 {. n5 R            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
3 x& h8 l- `! a+ Q6 e$ p1 m: q1 p! {2 I                Return
  f- n% F0 H, k' x            End If
; x! v6 t( d2 E0 X6 k/ m
            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
; m- ?! V. Q  T9 R            Dim fsi As FileSystemInfo

3 G0 g  j. N( z+ W            lw.Open()
            lw.WriteLine("Parts in directory: " _
              & 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)
6 P/ @4 a+ T7 ^6 k3 T  q                    Dim size As Long = f.Length
' |( Z* e! ^7 e3 W                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
; _" t3 o. M3 x                End If
7 L0 i; `7 m5 W/ u) s- [            Next fsi
" {, ]$ e- I; t, M( h
# G8 O& C  O6 H8 F$ t: Z+ W3 e1 v        End Sub
7 m( A0 m( z3 n0 r: p) S' X8 i% X- l
4 @1 W3 S0 s5 b6 Q3 ~" f        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
8 T6 T/ ?: E% {* N& \; }
            Dim fbd As FolderBrowserDialog
1 c( D6 P/ S% \% w3 K2 j6 K            Dim result As System.Windows.Forms.DialogResult

            fbd = New System.Windows.Forms.FolderBrowserDialog()
2 U! x4 n) }0 G# E1 P, [            fbd.Description = "Select directory to check"
            fbd.ShowNewFolderButton = False
            ' start browsing at Desktop folder, uncomment for any other default directory
, `) L3 b3 Q# j  s* t& p$ ]            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
9 J, ?- |  T! G6 N' J( @- x            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
% F1 h( T( g* l2 u! X- R! y, x2 G9 a3 f            ' fbd.SelectedPath = "c:\aaa\bbb"
            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
            fbd.Dispose()
            Return result
, F) e% M1 ]$ N  D
5 w9 j$ X. L' B+ j: C. ~/ ~7 E9 f        End Function

        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
        End Function
# w4 V0 M3 r+ Y/ @" b  C" J# q
    End Class[/mw_shl_code]

admin

ufun 的 方法

+ F6 v5 |  U) P* t4 s  R6 u
# U5 I5 h' c' i  c% @5 g9 H[mw_shl_code=c,true]int
7 a0 M0 l/ p2 b6 |) D3 X& x        cnt = 0,
        resp;
    tag_t
, c! t' Q& Q! {3 a        part;
$ f4 @) \/ L; S9 K+ N    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
' M/ n9 s! _- S. \6 I! K        fname[MAX_FSPEC_SIZE+1],
: Z, d" ~2 x9 s        part_name[MAX_FSPEC_SIZE+1];
    UF_PART_load_status_t
        status;
" K+ z& N$ x4 @# t- C# R
    if (UF_CALL(UF_initialize())) return 1;
% G) B$ ^, d) |9 F
# _  R8 W; M, ~/ X  a    while (printf("Enter directory path:\n") && gets(dirspec) &&
4 a- T8 F- \& Q8 N3 ^        strlen(dirspec))
* Z' n( M" o" I# q4 m/ z    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
$ h$ w5 H4 k9 W  X2 ?' g$ T# N! _        while ((resp = uc4518()) == 0)
        {
            UF_CALL(uc4600(fname));
            UF_CALL(uc4575(dirspec, 2, fname, part_name));
5 v) N0 }9 m: N$ y- f9 @' E' w
4 ^5 o% |9 _' ^# l8 t- c            ECHO( "%d.  %s\n", ++cnt, part_name);
' v* i, O/ i6 Y6 L, [. f
            UF_CALL(UF_PART_open(part_name, &part, &status));
( o% k; m( W2 I  e; Y0 ]            if (status.n_parts > 0) report_load_status(&status);
            if (!status.failed)
            {
/ E, f9 B/ g) t* g) [) C  L4 g) o                do_it();
- M& D' ~7 B) d$ i                UF_PART_close_all();
            }
        }
: g0 K( r) m( E* [
        UF_CALL(uc4548());

& F1 w2 X6 k3 Y  y  J! g        ECHO("\nProcessed %d parts.\n", cnt);
  G/ w2 g+ n% P3 z; {& U9 N    }[/mw_shl_code]