|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题
$ L+ Z4 n$ _5 g* p) G* G程序单详见下面帖8 j: ~- |6 S( p& q
http://postp.net/viewthread.php?tid=2432&extra=page%3D1
% Y! g& z: {+ C补充说明2 h6 q! S) C/ V7 B
有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.2 D4 G. G$ V9 x. |6 F: f- T& ^1 O1 F4 c
. J7 J, B' m1 n) X0 v# }- M
找到下面的代码.8 u0 p- j \4 k. [9 N/ ?& u
1 a+ M' V" b5 U' T7 c# j2 I, R# h
sfileDir = "D:\nc\" , B, B* \9 P& C6 }
' -- Prompt for a report name/ b1 V! R! ^6 s" V5 ^5 J
strReportName = AskString("请输入报表文件名") / D' ~' T( z. Y% S+ [+ x. A2 `
If Len(Trim(strReportName)) = 0 Then Exit Sub
0 p6 ^4 ]. ~+ [' -- Check for EXT4 E/ Y8 q: X; O* E0 s) y
If Len(strReportName) <= 5 Then0 l- u: P6 k" y8 L0 ?: w
strReportName = strReportName & ".html" V$ q; K9 {" ]2 m6 ]- ]0 ?
Else
3 S7 b, F) S [0 h If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"; }/ E; d9 @3 O" H& F( g6 E4 ]: w
End If$ J+ c" Y. z: T8 ]* s
. x% L9 I Z* ]* D5 m
改为
, [* V; _( N W9 x7 S2 P
' o& R, k1 y" l3 X- F# z {( i# } |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
