QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 5115|回复: 9
收起左侧

[已解决] vb 里如何为pm添加刀路文件夹

 关闭 [复制链接]
发表于 2010-7-16 13:23:49 | 显示全部楼层 |阅读模式 来自: 中国广东深圳

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

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

x
请问,吉米老大:/ H& \. a  s  b9 }' N

8 R) _2 O) i$ I: Lvb 里如何为pm添加刀路文件夹,我怎么弄就是弄不好,同时请求各位的帮助
发表于 2010-7-17 23:27:07 | 显示全部楼层 来自: 中国浙江杭州
刀路文件夹! A& _. Q! O- H9 l
不是有对应宏命令吗?VB里执行这个创建文件夹的命令不就行了吗?
 楼主| 发表于 2010-7-21 13:48:12 | 显示全部楼层 来自: 中国广东深圳
pm_send "CREATE FOLDER "Toolpath" 111
" H: P1 ]6 i* s' u! Z6 W$ B/ Y
& A/ V, X- |( [错误
 楼主| 发表于 2010-7-21 13:48:48 | 显示全部楼层 来自: 中国广东深圳
pm_send "CREATE FOLDER Toolpath 111' ?0 X1 r5 ^5 ?7 M
这样也不行
发表于 2010-7-22 21:25:22 | 显示全部楼层 来自: 中国江苏苏州
一个 按钮  ,一个TEXTBOX1 p, n5 ]/ T7 j" D. P
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
) l5 y: T2 ?& ^) h1 Z# p( x        pm.Connect()5 k2 R; F$ b2 L& t
        pm.Execute("CREATE FOLDER 'Toolpath' ;")
3 n7 w$ i7 J- j         pm.Execute("RENAME FOLDER 'Toolpath\文件夹1'" & TextBox1.Text)( n9 J- y( J1 X, m$ ]$ s
    End Sub

评分

参与人数 1三维币 +8 收起 理由
hh749 + 8 应助

查看全部评分

 楼主| 发表于 2010-7-22 23:45:52 | 显示全部楼层 来自: 中国广东深圳
问题解决,感谢上面这位朋友,非常感谢
 楼主| 发表于 2010-7-23 00:24:38 | 显示全部楼层 来自: 中国广东深圳
5# skyicer 4 v4 X  J' _  n9 @' k' a

9 a9 q6 w% J) U# V% D3 M% i5 N5 n感谢这位朋友的提示,经过研究我做如下更改,表示对朋友的感谢% \3 f8 ]/ M, a1 A4 w

8 p* c! W5 C+ [3 m4 TPrivate Sub Command40_Click()
0 i* z) x, ~/ J: |1 DDim sa As String" X  ^1 O+ |) b* A2 b  }
Dim nime As String
1 H; z2 [6 d$ ?6 Isa = Text31.Text* I7 V, j0 M* }
Text31.Text = sa + 1
) k+ E$ w3 h& l1 M" snime = Text30.Text + Text31.Text
# Z7 F0 s9 M6 l3 cpm_start 01 B' t; s5 x# U4 h
pm_send "DIALOGS MESSAGE OFF"
; A3 c2 _3 k0 a- ppm_send "DIALOGS ERROR OFF"1 H1 G- B9 v. g: K- m
pm_send "CREATE FOLDER 'Toolpath' " & nime
" k6 o( a- Q: I6 |1 xpm_disconnect
ww.jpg
发表于 2010-10-15 22:21:23 | 显示全部楼层 来自: 中国广东江门
牛bbbbbbbbbbbbbb

评分

参与人数 1三维币 -5 收起 理由
jiang.jh -5 灌水

查看全部评分

发表于 2010-10-31 16:27:26 | 显示全部楼层 来自: 中国浙江杭州
做这个东西需要什么东西啊
发表于 2011-9-21 15:32:13 | 显示全部楼层 来自: 中国广东佛山
7楼把外挂放上来啊 : S( ?0 M: G9 N* P  x
谢谢
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表