|
|
馬上注冊，結(jié)交更多好友，享用更多功能，讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題% ?1 y5 z: [" H& g3 A
程序單詳見下面帖
: L/ y( u' k" K( ^- @$ \3 Ehttp://postp.net/viewthread.php?tid=2432&extra=page%3D1
# w; `4 h4 T% |& J補(bǔ)充說明
$ D( u$ e" n/ ]6 C有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環(huán)境不足,未能測試.( i r! Z* D/ s* D Z1 K& Y' a
* O/ V3 l! h8 S) p' ?
找到下面的代碼.
0 w' ?1 O$ g3 j
7 I, }9 Q. |9 _2 ?7 k+ X1 ] sfileDir = "D:\nc\" ( S4 _ @- q3 A! q. O' c5 h
' -- Prompt for a report name
4 a0 K2 `: G. w& e7 H. q/ o) D9 c* q% xstrReportName = AskString("請輸入報表文件名") * a; z- j$ V, j# L' B( @" h
If Len(Trim(strReportName)) = 0 Then Exit Sub
# Q+ ~& I, t" T# U' -- Check for EXT
' F* l& R- Y' V/ B2 f2 R$ n1 |If Len(strReportName) <= 5 Then. A7 f* K4 R% ^9 J7 l
strReportName = strReportName & ".html"3 l7 t, d! l' Y# _5 S! C7 u( Y+ J
Else
5 v$ S/ E) G$ |" ^' f& R If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
4 B: ?) z; D1 _3 r; s4 t) @End If
y; r" k+ e5 k; m8 {: k' D+ m" o# Z" O3 b3 n
改為. X1 G# p3 a! F0 K: b+ O
. o& |. V* q3 b4 y0 p |
|
/2 
|Archiver|手機(jī)版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網(wǎng)安備32059002001368號 )
IP卡
狗仔卡
發(fā)表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發(fā)表于 2011-6-12 10:15:22
