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

iPhone

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

admin

C#的  没有用NX 函数


% Q5 O* `  i  @+ E[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory
8 g, f1 @, B) O; b; J: ]
        Public Shared Sub Main()
' G1 I3 p. p3 g( u
! v/ A* P! P4 a+ V, s  i            Dim theSession As Session = Session.GetSession()
            Dim lw As ListingWindow = theSession.ListingWindow()

            Dim foldername As String = ""
+ x( p! ^2 u+ }! {) q            lw.Open()
# z8 G; [; z" M% F/ v7 ]            If (select_directory(foldername) <> DialogResult.OK) Then
                lw.WriteLine("Input canceled...exit" & vbCrLf)
+ {! u- t7 h1 e8 V0 H  ~  k                Return
0 g+ S! k6 V' J% ~4 m) h            End If

            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
9 y) Q5 r8 L5 u9 W7 w  n            Dim fsi As FileSystemInfo

            lw.Open()
0 K* l. R: `: `8 m% M            lw.WriteLine("Parts in directory: " _
/ q+ m  ]3 T% e: c# O              & Path.GetFullPath(dir.ToString()) & vbCrLf)

            For Each fsi In dir.GetFileSystemInfos()
: s" O7 e0 C: w( Z1 x( w+ ^                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then
                    Dim f As FileInfo = CType(fsi, FileInfo)
  I4 x, {4 [$ `7 u+ U                    Dim size As Long = f.Length
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
                End If
            Next fsi

        End Sub
; y9 Y4 ?% o1 o" T" p4 H
; _* U" i/ W1 J' T# B1 v1 o. H6 o4 U        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult

            Dim fbd As FolderBrowserDialog
9 j% X9 [! R1 }6 i! n  o            Dim result As System.Windows.Forms.DialogResult
& {3 @9 h1 L" Y3 P3 I0 z
            fbd = New System.Windows.Forms.FolderBrowserDialog()
            fbd.Description = "Select directory to check"
' y* Y6 s- y: y            fbd.ShowNewFolderButton = False
            ' start browsing at Desktop folder, uncomment for any other default directory
6 z6 n' ]4 L: p3 l, ~6 t- Z) L            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
8 w& J- s6 O! X4 q2 [            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
            ' fbd.SelectedPath = "c:\aaa\bbb"
1 u* n, T% L  p1 _- e+ Y* X* ^* z            result = fbd.ShowDialog()
; W; J2 g' W) P* o* ?6 J            foldername = fbd.SelectedPath
) P+ w  S; ]7 G% ^) |  r7 y9 u            fbd.Dispose()
            Return result
. l/ ~" U4 T+ F7 Z: _8 s
        End Function
  a; L; V, T4 q0 z2 n9 |+ o5 Q, ]* z
        Public Function GetUnloadOption(ByVal dummy As String) As Integer
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination
- ~( Z& S$ O: q1 ~* h  I; @        End Function

    End Class[/mw_shl_code]
) E0 g; w# @' {: z) f/ `4 @; Q

admin

ufun 的 方法


[mw_shl_code=c,true]int
        cnt = 0,
        resp;
    tag_t
1 F7 X8 a# M0 x3 Y9 r2 }  A        part;
! F) g/ T6 l% z( N    char
        dirspec[MAX_FSPEC_SIZE+1] = { "" },
        fname[MAX_FSPEC_SIZE+1],
        part_name[MAX_FSPEC_SIZE+1];
    UF_PART_load_status_t
        status;

    if (UF_CALL(UF_initialize())) return 1;

2 l8 R2 b! f: V- P    while (printf("Enter directory path:\n") && gets(dirspec) &&
2 y2 h7 u. w. Y8 c' ]  ]" J        strlen(dirspec))
    {
        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");
9 P. l5 I" ?% u- a3 i        while ((resp = uc4518()) == 0)
8 i# d3 J- G* n        {
            UF_CALL(uc4600(fname));
/ O6 ]* t5 D& a+ s. S8 P+ M" }1 N/ s            UF_CALL(uc4575(dirspec, 2, fname, part_name));

            ECHO( "%d.  %s\n", ++cnt, part_name);
. U6 W1 |9 r; ~; n
! s% B% \( \1 P- c  v            UF_CALL(UF_PART_open(part_name, &part, &status));
+ [4 C) ^, B0 ]0 V0 i            if (status.n_parts > 0) report_load_status(&status);
            if (!status.failed)
            {
; c& w1 ^: Q  l8 m* l4 H                do_it();
5 \  X+ y4 Y( }! Z0 R  s" c5 {% @                UF_PART_close_all();
! o  p! c+ C2 P& E. \2 a! u4 I            }
; k: U3 d& B$ h' ~1 J) t        }
3 @' X! d6 y. W/ V5 I2 K. p) m
% v/ I& w: C% H2 y  R% I; V8 A: q        UF_CALL(uc4548());

7 k9 C8 V* I3 G" v: N" _3 W        ECHO("\nProcessed %d parts.\n", cnt);
    }[/mw_shl_code]