|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題
! x* O' c: L3 v, \0 [& J程序單詳見下面帖
4 O6 X% ^5 U$ f8 ]http://postp.net/viewthread.php?tid=2432&extra=page%3D1
! Q4 Q) k/ Z! l7 p. x1 j% q& K補充說明; M/ E0 d0 ~+ i8 u+ c, g- G
有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.
7 g0 v) @! p) ^, G/ x( r" y8 {: w4 O1 B' t) {
找到下面的代碼.4 u$ B2 }# T% d1 o& e/ D
' p* d9 X/ `6 y0 O+ \/ R5 I4 N1 q
sfileDir = "D:\nc\"
& R; t. Z1 J7 i+ {: A: E' -- Prompt for a report name
0 I# ]7 T8 F$ h+ J- _5 e( H: ystrReportName = AskString("請輸入報表文件名")
4 g4 [0 @+ w: T* ~If Len(Trim(strReportName)) = 0 Then Exit Sub7 V$ G9 I" x( x. P, S1 T6 U
' -- Check for EXT5 u# G4 o& z# t" O, d4 i
If Len(strReportName) <= 5 Then
, \9 {+ Z% C: r* T- H( U strReportName = strReportName & ".html" z5 H9 i- ?, w# p
Else& g [" u" x) G) e$ W1 w9 X
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
$ X- x+ ]& E EEnd If: U6 a+ k4 e5 S! }. |- l- a% A
8 P" Z4 s* C4 ]7 G9 X改為
& c1 ]" A+ f- d; Z% Z. Y0 p2 q: t
|
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2011-6-12 10:15:22
