|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题. f5 S4 E; W3 C
程序单详见下面帖
) P1 T0 T; h: ohttp://postp.net/viewthread.php?tid=2432&extra=page%3D1! o1 |( N6 m( L/ {
补充说明% L, b2 T+ I/ E! ] @' U+ \, h
有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.. Y! q' O2 r- ]* C$ R! h
1 b' r6 N. _, k7 i7 P) I
找到下面的代码.
9 `" c! [# z7 ^& N% n: e& ?: Q0 e
0 }, k! P" ]1 l" }0 I sfileDir = "D:\nc\"
' z) Z/ |9 G! _6 v+ O. ]3 C" W" o' -- Prompt for a report name
7 j" F" Y% ?: T: fstrReportName = AskString("请输入报表文件名")
$ c F- m; v, x, RIf Len(Trim(strReportName)) = 0 Then Exit Sub5 Z( K0 M: f( A8 {* q6 r
' -- Check for EXT0 W; F" w1 ?$ _9 D
If Len(strReportName) <= 5 Then
7 p' }9 b! u! `' v8 w strReportName = strReportName & ".html"
! v% I4 t+ @6 o3 X2 R7 @Else n/ F" ^3 a8 k0 s' X# {
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html". s) b% Q& B' x% x+ `5 R& e
End If, h; r) _5 w; \* y3 E1 p
! a% t& ~9 B# j2 \5 N% \
改为
0 @/ Y! ?4 q, p( Z1 {6 y. g" @ D% X, x$ P6 I9 E8 t+ }) o
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
