|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题
( K6 L, N1 S9 i- Q, Q4 d程序单详见下面帖6 ^. J) \* m) Q" y) i, v
http://postp.net/viewthread.php?tid=2432&extra=page%3D1
$ x. w% n1 t* g补充说明
j& L- U; e% n. T6 }有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.4 Z5 `: v$ ?' @7 l( G
$ V9 W) `" B3 i2 D# U% m8 F找到下面的代码.; s8 [7 w/ K$ x
) l& @, q3 ~2 j+ C3 y z7 @
sfileDir = "D:\nc\" 5 n8 H4 z0 Y. o0 `
' -- Prompt for a report name9 k& W$ e ^* s* ]
strReportName = AskString("请输入报表文件名") 0 G* _7 N4 l9 G6 X( a; u1 Z, ~
If Len(Trim(strReportName)) = 0 Then Exit Sub$ S# L) M. K4 p+ s; H
' -- Check for EXT9 W6 _8 a2 C: z% P7 g+ g4 G
If Len(strReportName) <= 5 Then
. d0 ]6 v$ B1 @1 _ strReportName = strReportName & ".html"* p! S6 v* [( e. t# n1 h
Else
2 S$ p0 j8 E8 w+ U# V4 V5 P% ^& S If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"/ r" e$ K8 l. r' |0 }
End If
7 O' o" t) Y( t3 o7 S! [. q
, C; K D! D$ C9 l) s" l改为
) | J) E) {: t3 _4 ^* r+ c
7 h2 y! r, O0 |/ ?% H. S+ x/ n |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
