全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2781
推到 Plurk!
推到 Facebook!

在DoS只要xCopy

尚未結案
20052020
初階會員


發表:121
回覆:79
積分:40
註冊:2005-01-18

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-11-02 09:42:48 IP:61.59.xxx.xxx 未訂閱
請問各位大大以下圖來說 在DoS只要xCopy C:\AA /s  D:\AA /S 就可以全部都copy了 那如果改用Delphi的方式該如何寫 ~謝謝
------
Xax
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-11-02 21:16:27 IP:211.22.xxx.xxx 未訂閱
WinExec(PChar('cmd.com /c xcopy /Y/S C:\AA D:\AA'),SW_SHOW); ----------------------- Practice makes perfect.
20052020
初階會員


發表:121
回覆:79
積分:40
註冊:2005-01-18

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-11-02 21:30:49 IP:220.142.xxx.xxx 未訂閱
不可以是不是還要什麼條件阿
------
Xax
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-11-02 22:05:05 IP:211.22.xxx.xxx 未訂閱
這樣呢? WinExec(PChar('cmd.com /c xcopy /Y/S C:\AA\*.* D:\AA\*.*'),SW_SHOW); ----------------------- Practice makes perfect.
20052020
初階會員


發表:121
回覆:79
積分:40
註冊:2005-01-18

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-11-03 23:43:42 IP:220.142.xxx.xxx 未訂閱
還是不可以~跟應用系統有關係嗎~ 我的是win98的
------
Xax
deity
尊榮會員


發表:90
回覆:876
積分:678
註冊:2003-05-09

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-11-04 09:13:46 IP:218.15.xxx.xxx 未訂閱
插个花:  试试如下:   winExec(pchar('xcopy d:\aa e:\aa /a/c/h/s'),SW_NORMAL);     ============================ 为什么经过多年以后,得失的过程如此冷漠 ============================
20052020
初階會員


發表:121
回覆:79
積分:40
註冊:2005-01-18

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-11-07 11:37:20 IP:61.59.xxx.xxx 未訂閱
請問這一段的dos模式,可以隱藏自動填入yes嗎? winExec(pchar('xcopy d:\aa e:\aa /a/c/h/s'),SW_NORMAL);
------
Xax
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#8 引用回覆 回覆 發表時間:2005-11-07 20:43:32 IP:211.22.xxx.xxx 未訂閱
引言: 請問這一段的dos模式,可以隱藏自動填入yes嗎? winExec(pchar('xcopy d:\aa e:\aa /a/c/h/s'),SW_NORMAL);
1.不知道WIN98的Xcopy有沒有 /Y 的參數,有的話,加入後就不會詢問你。 2.如果沒有,建立一個檔案(例如 yes.dat )在同樣目錄中,檔案中只輸入一行 y 或 yes,然後: winExec(pchar('xcopy d:\aa e:\aa /a/c/h/s < yes.dat'),SW_NORMAL); ----------------------- Practice makes perfect.
deity
尊榮會員


發表:90
回覆:876
積分:678
註冊:2003-05-09

發送簡訊給我
#9 引用回覆 回覆 發表時間:2005-11-08 09:05:34 IP:218.15.xxx.xxx 未訂閱
再插一次花:     自动填入yes,如同Stallion前辈所说,加参数Y,不过在这里好像没用上吧,复制文件夹时,如果目标文件夹(e:\aa)没建立的话,它就是提示出是复制目录还是文件,但如果目标文件夹已经建立的话,就不会有提示了。所以可以分开两步进行,先建目标文件夹,然后再复制文件。参考:  
begin 
  begin
    if not DirectoryExists('e:\aa') then
      if not CreateDir('e:\aa') then
        raise Exception.Create('Cannot create e:\aa');
  end;
  winExec(pchar('xcopy d:\aa e:\aa /a/c/h/s'),SW_NORMAL); //sw_hide为隐藏DOS窗口,
而xcopy下加参数可在DOS模式下,下Xcopy /? 可罗列出所有的参数及其意义
end;
这样就不会有提示了。供参考
    <>
============================
 为什么经过多年以后,得失的过程如此冷漠
============================

        
20052020
初階會員


發表:121
回覆:79
積分:40
註冊:2005-01-18

發送簡訊給我
#10 引用回覆 回覆 發表時間:2005-11-08 09:15:23 IP:61.59.xxx.xxx 未訂閱
感謝
------
Xax
系統時間:2024-05-07 4:35:40
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!