|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題5 E6 ]6 @# K9 H5 \5 Y5 x- R# m+ @
程序單詳見下面帖9 P, v* u0 }$ \
http://postp.net/viewthread.php?tid=2432&extra=page%3D1# q$ C. ~+ g, O
補充說明
% [8 C0 c3 E8 ^2 c8 G有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.
3 z7 u$ r: N8 i% S& I4 \1 b' R. F$ Y; W4 E# r
找到下面的代碼.
. D1 x% w7 D* [2 t+ K) `9 W4 f
: d4 I, [( o) q; m0 l sfileDir = "D:\nc\" M; m/ D* w1 s- X" U
' -- Prompt for a report name
3 Z9 }/ R0 O8 `% N* I7 q5 a' FstrReportName = AskString("請輸入報表文件名")
2 }. _) _) ]( `9 PIf Len(Trim(strReportName)) = 0 Then Exit Sub
: w" Z& D' A* G8 l' -- Check for EXT/ d8 q* ~: u( B* p5 U: j, ~
If Len(strReportName) <= 5 Then% J1 X$ j: E0 H$ S v
strReportName = strReportName & ".html" i% n- R; V. v0 d5 F6 k t
Else* Y8 D7 Y; }. g- ~2 A) k$ ]. D+ ?
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
" E7 L: ~+ ?1 L- G% a2 J, |. V2 @End If/ b- q6 }4 x. H7 i' J$ D
& E1 w% r) V9 A: N( e3 W& l
改為% o! y1 ?, e' C# _- }4 @; A
3 Y. l. ], S! W1 T
|
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2011-6-12 10:15:22
