|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题
6 B \# G5 G9 u5 s7 m4 a程序单详见下面帖
3 Q ]2 A, C: a, O s6 v- Jhttp://postp.net/viewthread.php?tid=2432&extra=page%3D1
) {6 R" H R& A, E补充说明. d7 Z9 S0 y0 p0 _, `4 n
有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.
- Z8 ]( }! w' R; O; E* }/ z: X+ T; I; g# V5 _, q8 X
找到下面的代码.
; i- D2 V! r s& j M7 Z' e1 b" x- _5 _+ E0 e1 |' E
sfileDir = "D:\nc\"
/ d T" D6 K/ s2 h2 s; d' -- Prompt for a report name
V8 j, T7 c3 ~+ R0 E$ _strReportName = AskString("请输入报表文件名") " p- x4 z! Z) U; l& _- [1 g# e8 G* t
If Len(Trim(strReportName)) = 0 Then Exit Sub
! P0 j* X( i+ X2 s' -- Check for EXT3 m8 Y6 w- @6 a
If Len(strReportName) <= 5 Then
3 ^8 e3 O+ w. ~* t0 ~ strReportName = strReportName & ".html"& d/ I) m5 |: M. o
Else
6 {' W7 s( g# p7 ~% _ If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
8 r( j. c7 T6 gEnd If
) _: K) J7 X4 d% U9 r+ I8 w7 C& _2 [2 b) }* X) K
改为. x# M9 p2 B b& y7 C3 R! b
* O: d6 m F: [: [( i# R. u |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
