用映射键，实现CREO4新建同名工程图功能

zkq1975 · 发表于 2018-9-18 13:03

用了一下感觉很好用

LUCASS · 发表于 2018-9-30 11:22

实测很好用，找不到文件的可以自行建一个

2940047698 · 发表于 2018-10-6 19:13

本帖最后由 2940047698 于 2018-10-7 00:47 编辑

成功，谢谢分享

要有光 · 发表于 2018-10-11 20:40

改造了一下，设置同名工程图，只需要把tpath=的地址改变，不需要新建文件，自动创建。采用more命令，vbs代码一目了然。

set tpath=D:\ptc\para_ptc\t
more +5 %0 >%tpath%\b1.txt
move %tpath%\b1.txt %tpath%\b1.vbs
start %tpath%\b1.vbs
exit
Dim Wsh
set Wsh = WScript.CreateObject("Wscript.Shell")
WScript.sleep 50
Wsh.Sendkeys "%ffr"
Wsh.SendKeys "^c{ESC}"
Wsh.SendKeys "^n{TAB}{TAB}{TAB}{DOWN}{TAB}{TAB}{TAB}{DOWN}{TAB}{TAB}{TAB}{DOWN}^v{ENTER}{TAB}{DOWN}"

复制代码

打开同名工程图

复制代码

xuhuishine · 发表于 2018-11-2 14:20

本帖最后由 xuhuishine 于 2018-11-2 14:25 编辑

能不能指定成带模版的？谢谢

divi88 · 发表于 2019-2-18 15:53

感谢分享，映射键设置好了，可以使用了

还想问问，我现在录制了一个新建工程图的映射键，这个映射键可以衔接到一个图标吗？把图标放入功能区或者邮件功能使用更方便一些。

石头飘 · 发表于 2019-8-2 16:33

大神好厉害，不过我用proe5.0试了下，操作不了，弹出来却是新建零件对话框，怎么回事？

石头飘 · 发表于 2019-8-5 22:39

divi88 发表于 2019-2-18 15:53
感谢分享，映射键设置好了，可以使用了

还想问问，我现在录制了一个新建工程图的映射键，这个映射键可以 ...

兄弟你是怎么操作的，我试了不行，都是弹出新建零件对话框

i_am_luotuo1 · 发表于 2019-11-19 11:01

按楼主给的代码试了一下，完全好用！非常感谢！
友情提示：vbs文件创建的目录d:\temp\，最好改成自己本机配置文件的目录，否则文件创建不了！

bingshan23 · 发表于 2019-12-4 12:12

非常感谢

		自动登录	找回密码
密码			立即注册

[原创] 用映射键，实现CREO4新建同名工程图功能