启动CATIA的VBS脚本，直接用

admin

创建一个后缀是VBS的文本文件，

粘贴：

Dim CATIA
On Error Resume Next
) r3 @1 h$ R0 h, O% O9 q  ^Set CATIA = GetObject(,"CATIA.Application")
If Err.Number <> 0 Then
% z, c0 h- o3 Y: w+ o1 x. \( J% wSet CATIA = CreateObject("CATIA.Application")
; U6 l. O7 W, F2 \1 J8 N- ICATIA.Visible = True
  v' d! r' d# m$ l7 L+ [End If
5 o" t0 ~" |! u8 `$ t" R# W- wOn Error GoTo 0

  L5 y  d8 r: K4 ~) A
会自动启动Catia程序
& o: }6 Z, `2 a" Z) }: [& X