|
|
馬上注冊，結(jié)交更多好友，享用更多功能，讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題7 ~* O9 J7 o" y# r4 E
程序單詳見下面帖: b1 k3 @5 y6 M& N, [
http://postp.net/viewthread.php?tid=2432&extra=page%3D1' j h( I% p5 T f( i0 `
補充說明5 j) y& f7 X# r! c. B6 Y
有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環(huán)境不足,未能測試.
! ~& }8 }# R' B
6 t! t# j3 q6 ^/ r t J( n# G找到下面的代碼.3 m" G ^' v% l% b: l, u4 T* K
( [1 h0 ~; O9 Z7 y) n' ]
sfileDir = "D:\nc\" # |! K$ T$ l+ U! m9 j) c
' -- Prompt for a report name, a( p/ K& m( A# M) S7 ~! Z8 B
strReportName = AskString("請輸入報表文件名") 5 ^& G! {0 z! g
If Len(Trim(strReportName)) = 0 Then Exit Sub/ v, z- R& N! }8 `8 q# ~
' -- Check for EXT# |' Z0 W/ u. z2 i
If Len(strReportName) <= 5 Then# |$ X$ d! R2 c0 Y' w! a# q8 G
strReportName = strReportName & ".html"4 ^1 f: N2 n6 N0 i/ M7 q$ G; }
Else, s% @' t1 l$ [1 C# I
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
$ d8 G6 Z! Y& d! Y* x+ EEnd If
) l9 I* s$ W' i2 w
- k0 f. B3 C: \" p2 \& [改為
% R( q$ Q/ V* N# V* w# n1 @' ?
+ d0 w a+ m/ N |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網(wǎng)安備32059002001368號 )
IP卡
狗仔卡
發(fā)表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發(fā)表于 2011-6-12 10:15:22
