|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題# |1 O$ i+ b. D" X& q
程序單詳見下面帖 P' K4 M4 a( a o* Q) l
http://postp.net/viewthread.php?tid=2432&extra=page%3D1
3 _3 t3 |4 q- U) s( y5 y$ S! `% z補充說明
. P q# p) Z4 ^9 o1 s1 W6 }/ c5 [3 z% U有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.% U. Z5 E- m$ J3 _! v
' J: {% s; j( U9 R7 r/ f找到下面的代碼.
: |1 v {5 `- _! k0 e) s, h9 Y5 H1 ~' a, W
sfileDir = "D:\nc\" 0 p# a+ P$ s' j- d4 ?
' -- Prompt for a report name
4 C( e* Q4 I; @! @strReportName = AskString("請輸入報表文件名")
* T6 G# J3 s# j! a2 x8 {If Len(Trim(strReportName)) = 0 Then Exit Sub
4 k, \+ A# C- j7 A' -- Check for EXT o7 t6 I) m9 Z2 m: @% W
If Len(strReportName) <= 5 Then
: K2 F- x/ \+ \# }* r7 b strReportName = strReportName & ".html"
, H/ F! N1 _/ Y _( K8 n. kElse7 B+ p* I, G: O8 o
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
6 N! f9 v) u; ^; JEnd If
( o+ N; f1 }& J' p2 d/ U* T! l
; p. o( A( h* U3 l& \改為
, N+ H6 H: f7 K0 H! P' i( G+ Z% c, Y o0 r9 [7 k9 J
|
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2011-6-12 10:15:22
