PLM之家精品课程培训

PLM之家精品课程培训

联系电话:18301858168   |   QQ咨询:939801026
NX二次开发培训

NX二次开发培训

UFUN/NXOpen C++和实战案例

适合初级入门或想深入了解二次开发的工程师,本培训结合ufun,NXOpen C++,大量的实例及官方内部的开发技术。
公众号二维码

关注公众号

点击扫描二维码免费在线高清教程

课程详情
Catia二次开发培训

Catia二次开发培训

市场需求大,掌握核心技术前景广阔

Catia二次开发的市场需求大,人才稀缺。掌握开发技能潜力巨大,随着经验积累将在汽车、航空等领域有所作为。
B站二维码

在线原创B站视频

点击关注工业软件传道士主页

课程详情
Teamcenter培训

Teamcenter培训

全方位培训,从基础应用到高级开发全覆盖

涵盖用户应用基础培训、管理员基础培训、管理员高级培训及二次开发培训等全方位内容,由多年经验讲师打造。
QQ群二维码

加入同行交流

点击扫描二维码加入QQ群

课程详情
×

PLM之家plmhome公众号

课程涵盖: PLM之家所有原创视频

×

关注B站视频

所有高清视频一览无余,全部在线播放学习

×

加入PLM之家QQ群

同行交流,疑问解答,更多互助

PLM之家PLMHome-国产软件践行者

[已解决] ufun 获取文件夹下所有prt文件名

  [复制链接]

2019-4-17 08:00:53 2330 2

iPhone 发表于 2019-4-16 12:56:29 |阅读模式

iPhone 楼主

2019-4-16 12:56:29

请使用QQ关联注册PLM之家,学习更多关于内容,更多精彩原创视频供你学习!

您需要 登录 才可以下载或查看,没有账号?注册

x
ufun 获取文件夹下所有prt文件名
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复

使用道具 举报

全部回复2

admin 发表于 2019-4-17 07:54:25

admin 沙发

2019-4-17 07:54:25

C#的  没有用NX 函数 ' _# _' W, g- J
9 W) `7 j4 ~! y  Z# n6 A

) O& m6 F1 R* d  G% v# D/ U# j, \[mw_shl_code=csharp,true]  Public Class list_all_parts_in_directory; {3 n' i. I- {) L/ }
" ?- m3 \# s$ i) c. Q
        Public Shared Sub Main()
7 q, m' J# P4 t/ z5 W. f2 n  W* l! V/ F% K2 B! q3 e' U
            Dim theSession As Session = Session.GetSession()+ j0 R' K% P3 V9 E" x
            Dim lw As ListingWindow = theSession.ListingWindow()  F% V) v) {( F8 `: o& H5 Y
1 U; U6 ?; E5 T  X  j
            Dim foldername As String = ""* W- h# K5 A" N4 U2 C& l: d
            lw.Open()2 r0 B8 |+ D+ A- G
            If (select_directory(foldername) <> DialogResult.OK) Then
+ R- x4 x2 Q' P* ?1 E* C3 E                lw.WriteLine("Input canceled...exit" & vbCrLf)' g+ e: K  i6 w* p: {3 `) w
                Return
: v; x" T. u+ ^; T            End If
. z  W0 h: l7 V4 B' b+ r/ {
. L3 \: `" o  L) D7 G+ ]            Dim dir As DirectoryInfo = New DirectoryInfo(foldername)
+ Y$ e% h6 Q) O+ y2 f7 {8 N            Dim fsi As FileSystemInfo
3 A: N$ O8 L( ]* Z" |, r; N; M, b4 L3 P3 G9 R* @. n  }' I
            lw.Open()
0 [$ n7 x# J& }, U# W% x1 A            lw.WriteLine("Parts in directory: " _
' Q2 @7 d9 |' ~6 t: S5 B  i              & Path.GetFullPath(dir.ToString()) & vbCrLf)
' i. s7 L  p" _# I5 c2 }) F  ]7 h
( q$ o8 }8 y" d; S# `            For Each fsi In dir.GetFileSystemInfos(): G# ], g5 [; i* }7 ^0 q) l
                If (TypeOf fsi Is FileInfo And fsi.Extension.Contains("prt")) Then- |& X2 b  t8 @# W% i3 S5 |
                    Dim f As FileInfo = CType(fsi, FileInfo)
) V( `, D4 k  [4 h                    Dim size As Long = f.Length+ x3 a: E" |  P8 x6 ?" ]# q8 o
                    lw.WriteLine(f.Name & " " & size & "Bytes" & vbCrLf)
! J. t- @+ R! q                End If
7 O: G/ ^) i$ {/ \5 ?- p- G. O            Next fsi8 S0 X" w) f/ D+ W
  L( V- q9 n1 Q# a% ]3 c: O( \
        End Sub: ?6 Y: S+ @3 d/ E" S( Q
) d) ]' T2 |7 J& N; z9 o
        Public Shared Function select_directory(ByRef foldername) As System.Windows.Forms.DialogResult& l0 d, r' i4 O0 t! h+ x
0 ~" a" v$ ~' b
            Dim fbd As FolderBrowserDialog
# a8 I4 X4 E& _; ]( ?  \            Dim result As System.Windows.Forms.DialogResult2 H# Z/ H: O0 ?/ ~2 L+ k

" E7 k/ P9 C0 d9 p. |7 l; M$ Q" v            fbd = New System.Windows.Forms.FolderBrowserDialog()
5 E0 J) v/ R$ |/ b7 x4 \$ F! S$ }            fbd.Description = "Select directory to check"
- d& l0 l" G- M; u            fbd.ShowNewFolderButton = False
0 Q( J: b9 K8 r8 E            ' start browsing at Desktop folder, uncomment for any other default directory
+ L% B- D# l* A9 `3 `            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR")
9 Q0 w( r8 O5 d2 {) H) n) b) T5 x            ' fbd.SelectedPath = GetEnvironmentVariable("UGII_BASE_DIR") + "\Moldwizard"
, v* R) Q) k6 A: N. S6 @            ' fbd.SelectedPath = "c:\aaa\bbb"
; Q# x. n4 g* e  o) q            result = fbd.ShowDialog()
% r6 c: `$ @2 [' R6 c% K$ k            foldername = fbd.SelectedPath  {' _$ S' m, \/ T* A7 X: V4 I
            fbd.Dispose()
! Z: w( X4 X6 d' Y            Return result" L/ p+ \5 B8 V$ N* h/ l" h
% X$ X4 a1 [  q8 k! C$ w
        End Function
" C; j( _- X" P& \  L5 L3 D. \- k4 D8 F6 L( R: X4 S4 g
        Public Function GetUnloadOption(ByVal dummy As String) As Integer7 }' L- r6 n8 @1 W
            GetUnloadOption = NXOpen.Session.LibraryUnloadOption.AtTermination+ D: n# o( r, d4 e4 `7 v
        End Function
0 w# w1 G3 R" H6 N. J
2 N0 y0 }) B) K/ p8 Q, D' u/ u    End Class[/mw_shl_code]+ ~$ v* j' l% Y& z9 d
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

admin 发表于 2019-4-17 08:00:53

admin 板凳

2019-4-17 08:00:53

ufun 的 方法 " [# Z0 ?7 m# e, P" e: Q! }

* E' m& r8 C) h; j5 W) g5 E
% F# l6 n; U% x0 e# }5 V[mw_shl_code=c,true]int
- k! G  `3 N' I2 x; D; d        cnt = 0,5 m: G9 L( W& `1 \$ C! k7 r
        resp;
9 C$ [# `  M4 a( E0 W    tag_t
$ Q8 _) Z4 f9 q0 P        part;
+ M8 Q7 m' F, F/ Q+ Z; k+ Z$ F" k3 [    char
( D/ R  ]' f, A2 l' D9 k        dirspec[MAX_FSPEC_SIZE+1] = { "" },
. T2 Z& E6 G( F: x! `        fname[MAX_FSPEC_SIZE+1],
! j) Y7 K1 A' t        part_name[MAX_FSPEC_SIZE+1];
4 F% r. M/ ^+ v) g) c    UF_PART_load_status_t: @  f! j4 _9 `
        status;
+ z+ t. h8 ?1 t) T! w' d6 t+ B: L3 [) |; C- b1 r
    if (UF_CALL(UF_initialize())) return 1;
' A+ q) L) a" a8 W4 G2 @- w4 I
, l" d9 F- F- l2 ]    while (printf("Enter directory path:\n") && gets(dirspec) &&
2 }4 A' n9 j1 l4 t! ?8 O        strlen(dirspec))& O% \. a9 B/ P3 i! s9 Z1 m8 J* n* n
    {
0 i" W. Q6 z; t7 w# Q6 ]4 b        uc4508(dirspec, (1<<13)|(1<<11), 0, "*.prt");; T: ^4 P/ ^) s7 R8 D
        while ((resp = uc4518()) == 0)* d. @& P1 @; e4 i
        {
$ `& K1 v: B1 ~+ f            UF_CALL(uc4600(fname));; I, T1 y( N" f9 V' L( P7 x
            UF_CALL(uc4575(dirspec, 2, fname, part_name));2 z. m' ]  V, r3 r5 z. @

/ ?' n5 o/ b- O7 t+ W            ECHO( "%d.  %s\n", ++cnt, part_name);% J* t2 W% v& D5 s0 f  Z
& k, p, |/ v1 k) I+ r. ~; c, D
            UF_CALL(UF_PART_open(part_name, &part, &status));
' n, ?6 A2 I3 u. V, U: }            if (status.n_parts > 0) report_load_status(&status);
$ @( S3 o$ h! J            if (!status.failed)
) p; @8 C( l8 M# h& s# z            {
2 x# ]- x* P+ d1 T. h0 I                do_it();2 b& C9 b* s/ Z) u
                UF_PART_close_all();
& _+ g% k) A8 b2 q' O            }1 j3 B+ d3 Q& Z; ]# C
        }1 S4 d( @: r( W5 O+ H( `

2 Q7 b' R! a6 b9 i6 |        UF_CALL(uc4548());. K- Y/ R* O; Y) V* p/ p  z8 A

2 R% i9 T6 v5 b! e        ECHO("\nProcessed %d parts.\n", cnt);) @% O* P" ?) |" M4 _. k2 s9 [
    }[/mw_shl_code]# [: k& e7 x( S# z
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 注册

返回列表 本版积分规则

  • 发布新帖

  • 在线客服

  • 微信

  • 客户端

  • 返回顶部

  • x
    温馨提示

    本网站(plmhome.com)为PLM之家工业软件学习官网站

    展示的视频材料全部免费,需要高清和特殊技术支持请联系 QQ: 939801026

    PLM之家NX CAM二次开发专题模块培训报名开始啦

    我知道了