|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區(qū)
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
MastercamV9.1加工單(vbs版)--修正不兼容9.0的問題
' N; L* |* K- f3 P0 u程序單詳見下面帖; S7 _1 V1 ]2 r2 o, r: t0 ^
http://postp.net/viewthread.php?tid=2432&extra=page%3D11 g2 z1 l: ~3 o/ e
補充說明 e7 r8 I9 c) L5 y& s
有用戶反映用于9.1會是9.0出錯,下面是用于9.0的解決方法,環(huán)境不足,未能測試.
) Z3 x" ~5 m/ a ~# S! z8 N/ ^. _3 D# l( A9 {3 ?6 b' R8 @
找到下面的代碼.
7 U$ j9 S1 o2 ?3 L& q7 M2 w1 S
, x4 m8 M, g7 f+ l, H8 R sfileDir = "D:\nc\"
' L# u' H% @# G2 E" M' -- Prompt for a report name7 m4 ]% }4 @8 Z+ _# @. I0 Q2 G
strReportName = AskString("請輸入報表文件名") , l# v! w- \& L& Y
If Len(Trim(strReportName)) = 0 Then Exit Sub5 r) }; K) O* d( `# M* x3 S) N7 ^, B
' -- Check for EXT( ]. Q1 U1 s! Y3 j0 i, i
If Len(strReportName) <= 5 Then. W1 E' ?) ^0 n9 \' c3 }
strReportName = strReportName & ".html"
8 S% N4 |& W! D) `4 u" UElse' Y' n3 b/ d" o \
If Right(LCase(strReportName), 5) <> ".html" Then strReportName = strReportName & ".html"
$ x& K9 q. d% P4 LEnd If
+ G* L' G; X3 s7 G6 o( H! Q& X" ~! _! N" @5 V& k6 d. |1 A" D
改為* T# U. O9 i0 C5 {7 n4 v H
6 k! q# S- ^' [/ x M! @% ~$ B& U/ }
|
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發(fā)表于 2011-6-12 06:52:32
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
發(fā)表于 2011-6-12 10:15:22
