|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題0 |8 h- _1 D/ i+ F
程序單詳見下面帖
" s5 O* D. C9 B( G# mhttp://postp.net/viewthread.php?tid=2432&extra=page%3D1
/ \. V+ K) O/ A, K, k3 ?補充說明" w7 y* M- p1 s
有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.8 N& ]2 |- p& ~ u- C9 m: l" ^0 u
$ b' g& o% E* f; ^5 _9 R1 q ]8 Y! u7 E
找到下面的代碼.& s9 C, d& ]& L5 N
) g$ f- c$ h4 M9 f5 z$ E# R1 `
sfileDir = "D:\nc\" # m" n& h. F( _9 r
' -- Prompt for a report name
) O5 y8 x6 Q; gstrReportName = AskString("請輸入報表文件名")
" O5 w% _6 H M( l# W/ C& [2 MIf Len(Trim(strReportName)) = 0 Then Exit Sub: N% u2 t7 t* U1 N t5 ^6 z
' -- Check for EXT
: z# U2 |" j) v& f9 N6 g. U3 CIf Len(strReportName) <= 5 Then
- w: b u6 _6 B strReportName = strReportName & ".html"
2 }* T' |. g" p8 W5 x5 cElse: x$ |( h1 b+ W c& j
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
. I& c$ R2 M, J6 {0 @" r* nEnd If
! T: _) h3 [5 W3 O6 ?* g2 e: Y$ z, V
改為
! w3 ]7 C2 v. z6 k
4 p. ^- N; m4 R6 J; Z/ p) ? |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2011-6-12 10:15:22
