|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题$ Z* E9 Q, P9 g4 d& Q
程序单详见下面帖
. R( d- D9 D- c Vhttp://postp.net/viewthread.php?tid=2432&extra=page%3D1
/ V/ _3 z; N# G/ w+ _补充说明, F! P, D' M" n( I" O% E1 R) }
有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.
" H. w# d; Q7 p: d i
( I; i& t; a) i8 h1 s7 v1 v找到下面的代码.
) i: u: d; i) j- G2 q' H' p2 x6 y
sfileDir = "D:\nc\" " q9 `; z f. t
' -- Prompt for a report name4 f& t3 [0 V$ H% G
strReportName = AskString("请输入报表文件名")
3 G; M9 X1 V% ^( [If Len(Trim(strReportName)) = 0 Then Exit Sub$ k" e% `5 d* C, o) j
' -- Check for EXT
3 M) [8 C0 W2 c6 R! {+ \% kIf Len(strReportName) <= 5 Then
4 w) e) c8 F6 v+ m1 D: \8 z# Q strReportName = strReportName & ".html"
9 ^2 t' w+ \ z( E+ E pElse
9 s5 G. A) y' ~ If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"( m9 a8 D) n3 o/ f6 `# i
End If8 l7 }5 D! s1 M. W
: w/ I- T) k E: W
改为& j% ?; M2 t* L( z+ o
5 C- ?) k' v; J4 N! n6 ~( T |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
