|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題
+ L0 T3 t/ H" t8 |/ i程序單詳見下面帖5 x3 t7 P! f7 Y+ J! B
http://postp.net/viewthread.php?tid=2432&extra=page%3D1
A+ E3 U) B2 \9 t2 x補充說明
6 \: A! G5 b, P, v `/ g5 b有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.
. ^: E2 j h& Z7 h- y
% ~. J4 M( B/ t找到下面的代碼./ r8 v1 a" R' q; f
. t. q9 X) M. M5 t sfileDir = "D:\nc\"
2 K" v, s+ E( E; b' -- Prompt for a report name5 ~' l: |) s( O1 N
strReportName = AskString("請輸入報表文件名")
4 o) n% m' f7 m9 y, m7 iIf Len(Trim(strReportName)) = 0 Then Exit Sub( O) @1 N1 @- `) O: O2 \
' -- Check for EXT, W4 g+ K6 A* n9 d8 C
If Len(strReportName) <= 5 Then
: B$ }9 `# K( T5 V0 L( w strReportName = strReportName & ".html"
2 l9 y1 m/ \" YElse
. g: [. T( L6 x0 A3 `% h2 b1 e7 S* X If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"6 U/ g: w! L0 |: U+ D' c, Y
End If
; W( z: u8 A# {$ R* c+ W! F
/ E0 Q- B7 h( T% D, `改為
2 C' f# r, [7 a5 a7 o5 G, f3 B9 k- J) l4 K1 Z; J9 u
|
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2011-6-12 10:15:22
