|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
MastercamV9.1加工单(vbs版)--修正不兼容9.0的问题9 Q w! Q' T8 O% y2 G: Z- c
程序单详见下面帖, `- y% U2 w6 v/ U& l0 d, j
http://postp.net/viewthread.php?tid=2432&extra=page%3D1" E8 o3 m, ]# S9 b* C
补充说明
2 I' O4 M! \' q. v: m5 z7 x0 K! W有用户反映用于9.1会是9.0出错,下面是用于9.0的解决方法,环境不足,未能测试.: ]0 O: \& T* A4 {
U6 }* q' _5 u找到下面的代码.& P- |; A8 t \. _
: {# U2 ~ S( |# O. `$ _ sfileDir = "D:\nc\"
9 L5 s; `6 L9 X1 e' a' -- Prompt for a report name
/ L. ^, z6 f! zstrReportName = AskString("请输入报表文件名") , N; Y" ?0 J" [3 Z
If Len(Trim(strReportName)) = 0 Then Exit Sub
) X9 V1 W( C! l$ ]# Q5 z' -- Check for EXT$ P& D8 S- A# D: m9 m
If Len(strReportName) <= 5 Then$ J% l8 e% P8 D2 m* p O- O
strReportName = strReportName & ".html"
* ]: v( H. b4 q, IElse
. e# k+ U6 M' L9 J+ B: @! f+ U- O If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
8 R! R. D r8 [$ _0 p9 b7 nEnd If& e1 u8 [ m! u; m( s
3 ?# W# c' b) i1 I1 _
改为
. B9 ^1 }# Z' `$ R; W8 G# H; }% e& D2 p: K( h$ S+ Z
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2011-6-12 06:52:32
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
发表于 2011-6-12 10:15:22
