|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题- X9 c ~" T. F2 K- P! C
程序单详见下面帖
/ F' I9 P5 ]0 o( n! L4 A! s, dhttp://postp.net/viewthread.php?tid=2432&extra=page%3D1
/ r& x3 W5 S4 G, c) `) W L; r补充说明: O! A0 ?4 _. R, ?7 b4 u0 [
有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.
6 ?1 M+ h4 [7 M% P
- a6 [: f H1 r- c" F5 r找到下面的代码.
% f' y5 ?' o/ R( v) p' W7 ~4 x% l, Q2 o. u! u1 _* J
sfileDir = "D:\nc\"
w/ F: ~7 A2 ~6 a( M! ]' N! E' -- Prompt for a report name! s5 y- h. z4 w
strReportName = AskString("请输入报表文件名")
1 C: T8 Z0 b. I tIf Len(Trim(strReportName)) = 0 Then Exit Sub: H7 m' U" L9 e( T5 ?* f
' -- Check for EXT
6 I6 @. Z: H2 l+ k" ]If Len(strReportName) <= 5 Then
; ~5 M1 ~6 @( B strReportName = strReportName & ".html"2 a2 d$ Y' x( B1 S5 A4 @
Else
( A. g1 @/ g: k6 z) |. V If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
) Q6 J* U7 ?7 REnd If" F) C& s$ K9 |( b7 C F$ [6 P% p
' H) b3 X+ x8 U$ T
改为
3 T3 u9 C1 W' y, ]4 K& P5 R- N3 G/ P' X% H7 I0 b% L5 Y
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
