|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题
6 r* ], z6 w/ T; @程序单详见下面帖
2 | T/ C( E- H# vhttp://postp.net/viewthread.php?tid=2432&extra=page%3D1 R4 S4 y, Z1 ^' w8 B' j
补充说明
( ]7 H# G! [8 R- T# X* l1 y有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.
, E+ ]8 Y$ }: g6 `9 K- r! T8 K7 }0 j9 X- Z! X
找到下面的代码.
+ D$ x5 e0 u' C) V& A% Q- s% a6 c7 h1 e1 l4 D1 W
sfileDir = "D:\nc\" 2 R% a* M/ P+ ]$ @; O8 B+ }1 {
' -- Prompt for a report name
6 A3 l% g$ { i4 I8 istrReportName = AskString("请输入报表文件名") 0 y' g* ^ H0 q& D' n+ }
If Len(Trim(strReportName)) = 0 Then Exit Sub
/ I m3 b! J6 ]# J# o& p0 C$ ]' -- Check for EXT" a' ^' _# L V) f
If Len(strReportName) <= 5 Then
* `7 I. c- B& A6 \ strReportName = strReportName & ".html"$ s' F- k9 _$ |. z( I
Else; l0 z0 E! |( \1 E4 r1 y
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"$ I/ H" K4 N% M3 L
End If
& A* t6 f6 t' F6 S- [% A" r% S1 L9 w7 ?6 ~9 `& H- f
改为
3 _5 z3 Q3 q U* H4 I
$ t6 }: _( B, q |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
