作者albb0920 (albb)
看板EZsoft
標題Re: [請益] 關於隨身碟啟動軟體的問題
時間Wed Dec 19 18:32:57 2007
※ 引述《cleic (非自然)》之銘言：
: ※ 引述《cleic (非自然)》之銘言：
: : 想請教PCMan大,xcopy有辦法寫成VBScript嗎
: : 比如:
: : @ECHO
: : xcopy "TargetDIR\data" \data2 /S /C /I /Q
: : exit
: : --
: : ◆ From: 140.113.89.119
: 推 albb0920:試試用 Shell() 函數 12/19 11:17
: 我查詢之後找到以下語法
: 不知道是不是a大所說的Shell() 函數
: Set ws = CreateObject("WScript.Shell")
: ws.Exec("xcopy.exe TargetDIR\data data2 /S /C /I /Q")
: 這會與
: @ECHO
: xcopy "TargetDIR\data" \data2 /S /C /I /Q
: exit
: 有相同結果
: 但仍會跑出DOS視窗
: 有其他語法能如PCMan大之前的語法
: Set sh = CreateObject("WScript.Shell")
: sh.Run ".\程式\PCMAN\pcman.exe"
: sh.Run ".\程式\MSN\msn.exe"
: 將
: @echo off
: start xxx\FirefoxPortable.exe
: start xxx\ThunderbirdPortable.exe
: start xxx\PCMan.exe
: 的DOS視窗完全背景執行嗎
: 還是有其他的方法呢
: 對VBScript不熟>"<
對VB熟會方便很多XD
剛剛查了一下，你應該用 WScript.Shell 的 Run
Run(Command as string,[WindowStyle],[WaitOnReturn])
所以應該用 sh.Run "xcopy xcopy "TargetDIR\data" \data2 /S /C /I /Q",0
0 vbHide 隱藏所開啟的應用程式視窗。
1 vbNormalFocus 正常開啟應用程式。
2 vbMinimizedFocus 應用程式視窗開啟後縮到最小。
3 vbMaximizedFocus 應用程式視窗開啟後放到最大。
4 vbNormalNoFocus 正常開啟應用程式，但原先的工作視窗仍保持駐點 ( Focus )。
6 vbMinimizedNoFocus 應用程式視窗開啟後縮到最小，但原先的工作視窗仍保持駐點
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.64.26.28