|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題+ ~9 k+ J. n, X8 i
程序單詳見下面帖
4 t/ x: a# k" X/ ~; }$ Vhttp://postp.net/viewthread.php?tid=2432&extra=page%3D1" V, c" g; M( A6 D/ o3 h- R- z
補充說明
! n- z( C% I, U7 q有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環境不足,未能測試.5 i% z `2 f4 A4 @% F( j
4 l; `' o! u4 O/ U1 O
找到下面的代碼.1 i$ ^" {) J6 Q. t! J3 i
# Q2 p) i5 A. s1 ^# @# h. j {
sfileDir = "D:\nc\" 1 v' `7 Z2 ^! O5 ] E" V+ P
' -- Prompt for a report name0 O3 d5 {! c$ s
strReportName = AskString("請輸入報表文件名")
4 n/ }0 X2 Q7 i4 a( k0 E: K/ GIf Len(Trim(strReportName)) = 0 Then Exit Sub
; S# K7 v% g8 ]9 I/ z2 e3 E' |' -- Check for EXT8 W! _$ X# M0 B+ X* J
If Len(strReportName) <= 5 Then5 Z4 [4 p, d( d( G
strReportName = strReportName & ".html": @% K0 b6 ?" @6 P: }7 o* S
Else0 m' s* k! V* [: m) M
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
a' g: ], v8 S- A p8 zEnd If& M6 X1 t1 R( S3 O1 l. }
% q# m7 ~. R) o. @" }2 a# o
改為# ?8 q' z5 k) E" {5 H, S- b4 v
* z% @4 c0 R+ n$ a: u' x, b |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發表于 2024-12-3 10:46:17
非常感謝