馬上注冊(cè)，結(jié)交更多好友，享用更多功能，讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看，沒有賬號(hào)？立即注冊(cè)
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題; j7 |3 e% \+ I" K. F9 H; d
程序單詳見下面帖
8 Y* n& s2 r$ Z% P6 P5 }http://postp.net/viewthread.php?tid=2432&extra=page%3D1
+ M* D; p- `" F補(bǔ)充說明9 q1 p) A O! w) E; Z
有用戶反映用于9.1會(huì)是9.0出錯(cuò),下面是用于9.0的解決方法,環(huán)境不足,未能測(cè)試./ x9 A* n. a; X" r2 k. l" b
' u+ f/ m( n0 K+ A4 L' a
找到下面的代碼.
+ @- G6 @' v# X. T( L2 J$ u4 }
) l* m; {6 U4 i) G$ D( d9 e sfileDir = "D:\nc\"
$ V4 m; ]* r" _0 P# E; U' -- Prompt for a report name; y# R9 B5 P7 ]+ W# T7 m
strReportName = AskString("請(qǐng)輸入報(bào)表文件名") " K, _/ H7 _; g) g0 H
If Len(Trim(strReportName)) = 0 Then Exit Sub
* R& v* m+ e" R" @' -- Check for EXT' n4 L+ P5 J* _! Y- B
If Len(strReportName) <= 5 Then! f" Y: B8 R: G
strReportName = strReportName & ".html", p+ i! \4 k1 |6 T9 c, ~' b/ r
Else: r# N+ F% Q) m2 j5 j% g
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
8 T/ w' d. X3 x: u$ YEnd If
$ ], B; x4 f0 [
, t# f4 p$ w6 d# F" n改為
& k% i; c8 z% z* J5 x5 o Y$ L* J; b
' L( h: S8 C9 {; t( u$ k游客，如果您要查看本帖隱藏內(nèi)容請(qǐng) 回復(fù) | 
/2 
|Archiver|手機(jī)版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號(hào)-1|
蘇公網(wǎng)安備32059002001368號(hào) )
IP卡
狗仔卡
發(fā)表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發(fā)表于 2024-12-3 10:46:17
非常感謝