|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題3 o7 |. c) e7 Y3 d( I
程序單詳見下面帖7 s' R7 } C- I2 ?/ a
http://postp.net/viewthread.php?tid=2432&extra=page%3D1
6 G/ E$ Z) b+ J4 G5 S5 U) j5 H補充說明! i$ G! c: v6 r) `
有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.
, P d4 Z: k! c! N0 R9 S( B
~1 C* u4 R1 L8 X: |找到下面的代碼.+ |" C0 |( A5 Z
; E3 `. K" b9 f& S; n6 l
sfileDir = "D:\nc\" ; |# B+ C4 A2 \; w q
' -- Prompt for a report name
( n' ^2 n$ [# G! z( sstrReportName = AskString("請輸入報表文件名") 8 e3 s' L: O( V
If Len(Trim(strReportName)) = 0 Then Exit Sub
1 r% q- ]( q5 x/ n/ S2 l' T9 w* b' -- Check for EXT; |) w9 J& H& r# C1 F/ W
If Len(strReportName) <= 5 Then
( o4 ^( o, G4 o; r# h( j strReportName = strReportName & ".html"7 I" e3 s, g8 ]8 C% U5 D
Else) a, w7 q+ L7 z: [0 J2 a
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
4 l1 A3 h! w" x) G0 e% l! ^End If
$ G+ M% }$ n8 N6 L" l1 K! X; |' P
: X# _3 V. P) }2 a改為) h7 ^6 U- e" q0 n# b1 n% K
( ?6 [- Y0 q: p& ^ |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2024-12-3 10:46:17
非常感謝