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

iPhone

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

admin

C#的  没有用NX 函数

3 Q2 s! P& ~/ |$ W- b
[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory
3 r# }' \& _$ K2 U% ~% `8 {  _
        Public Shared Sub Main()
6 \0 U5 i) S& O+ r3 Z3 X* a1 O
            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()

2 |3 X, L* s2 h2 ?3 x- Q: n            Dim foldername As String = ""
            lw.Open()
2 B% ], c1 q' ?0 @% b+ ^            If (select_directory(foldername) <> DialogResult.OK) Then
) I( U% V. B% h# O                lw.WriteLine("Input canceled...exit" & vbCrLf)
                Return
* @7 f3 ]2 V" G9 x            End If
" p. v* j* _" S4 N. h2 w% l, L) L
" G7 M( o1 f. |& }0 f            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
, D: A* Q( S. F8 X2 C) [( Y0 `9 k            Dim fsi As FileSystemInfo

& O0 g$ o# l% |) v% F            lw.Open()
            lw.WriteLine("Parts in directory: " _
              & Path.GetFullPath(dir.ToString()) & vbCrLf)
1 }' E% y' m3 B/ A6 `' E% {
            For Each fsi In dir.GetFileSystemInfos()
$ k* b& [& @& }* F% Q                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
                    Dim size As Long = f.Length
  t0 v; Q& `% E6 K$ X$ U                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
                End If
            Next fsi
& y/ a0 Q# M9 x) w; \! `
- ]+ @9 Q; S, z2 a2 V, F% ]# Y9 k        End Sub
6 _, Y3 N1 j) u  P
4 ]* m: o, b+ h3 Y" S& D. S        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult
+ c+ K+ g. L* x* Z. c
9 L- r, [! }4 }' m            Dim fbd As FolderBrowserDialog
1 x5 _2 @+ s, w; H, t4 i7 s' b            Dim result As System.Windows.Forms.DialogResult
/ A$ ^: {. z. l7 m
4 D9 ^. s* f. d" p# f            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
3 z" g& w3 E% |. j+ W6 U0 m/ t            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
            result = fbd.ShowDialog()
            foldername = fbd.SelectedPath
6 b$ t; M7 q3 R4 \0 ~& ]            fbd.Dispose()
            Return result
7 s9 H  @3 N8 s' `4 {, S  P
: D7 G  }, v8 j) }9 p! W$ u        End Function

        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
        End Function

    End Class[/mw_shl_code]

admin

ufun 的 方法
( u2 @. ~0 k! y; ], o/ I

[mw_shl_code=c,true]int
        cnt = 0,
3 S" z1 Y% K2 H* U$ [1 [% \- W. v        resp;
- z9 A* T9 u' H0 K8 |: r+ s, o; H    tag_t
        part;
" z) n: H1 L6 l, v+ u    char
6 h! J1 a% U5 v0 b, M5 S        dirspec[MAX_FSPEC_SIZE+1] = { "" },
; {5 M. S# i1 ?9 f4 n! L' o        fname[MAX_FSPEC_SIZE+1],
, x% C! F0 x( `1 A        part_name[MAX_FSPEC_SIZE+1];
+ {$ s; c  S, E5 I4 p    UF_PART_load_status_t
  d/ c* I. L) T( J" p+ \6 |        status;

    if (UF_CALL(UF_initialize())) return 1;
4 K* ^! T  K+ @8 R1 _6 `
    while (printf("Enter directory path:\n") && gets(dirspec) &&
" n' \8 ?$ y  [6 R) Y( z7 `& j        strlen(dirspec))
. m' ?- b+ B/ i6 X+ A/ Y/ @    {
0 ?0 Q+ a& i& X* q5 `6 u2 @  w        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
% B" v% |; N* M7 K8 ]6 l- s        while ((resp = uc4518()) == 0)
1 a* ]6 U; q6 x6 ~3 M* g        {
            UF_CALL(uc4600(fname));
            UF_CALL(uc4575(dirspec, 2, fname, part_name));
+ n$ |7 c$ Z: \& ^* y" f2 R
; p' T2 j. M4 v, ?            ECHO( "%d.  %s\n", ++cnt, part_name);
. }1 `0 n3 c* H0 a& z7 l, K
            UF_CALL(UF_PART_open(part_name, &part, &status));
' C2 [* `3 R$ u6 G            if (status.n_parts > 0) report_load_status(&status);
            if (!status.failed)
            {
                do_it();
                UF_PART_close_all();
' c9 G. H) S5 H# z            }
) r  N' }6 G$ s        }

        UF_CALL(uc4548());
# j- S: w# \, S% n  A
        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]
/ g9 K' E3 \' _" x7 S