|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題
9 ]8 ?* }. b/ n9 v% C程序單詳見下面帖
! a2 v; e; N# U7 |http://postp.net/viewthread.php?tid=2432&extra=page%3D1, S8 \; t$ \# v" ?# w
補充說明
5 P0 c+ q& L; B; D; ]+ L有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.
4 @) o5 M, ?( U( v3 O
) J0 ^0 F$ E& E& f# P* S找到下面的代碼.$ ?/ T# N6 h' g; k) ?
; m8 r! G8 q- u5 ^$ P7 q( k5 t9 N. z sfileDir = "D:\nc\"
, B! T8 F5 ?+ n( {: Y' -- Prompt for a report name
6 @" z8 ^0 L; t& y- J% istrReportName = AskString("請輸入報表文件名") 5 O& n& D0 R1 f( B( f
If Len(Trim(strReportName)) = 0 Then Exit Sub6 c6 E8 V7 \7 a1 t6 T0 I
' -- Check for EXT
* x9 b& O [0 ?1 ]If Len(strReportName) <= 5 Then8 O3 [7 ^' |2 H1 _
strReportName = strReportName & ".html"9 ?; b, ^0 Y- Q7 n) S
Else4 I) V4 [, x) ^( e! Z
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"9 ]. a! _0 F2 t% Q- Q9 d" W2 i
End If
- s* S" e- E& x# g3 Q) m
$ ?" G: n+ h @0 b改為! B/ X" S# r& W# N* T
" D9 W3 L: Z1 A/ U- v! F |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2011-6-12 10:15:22
