你可以把这个字符串写到一个bat文件里面
然后调用这个bat文件就可以了另外,你如果要复制文件vb提供了函数
API更是可以

解决方案 »

  1.   

    win98
    Shell "Command /k copy ... ..."win2000
    Shell "Cmd /k copy ... ..."
      

  2.   

    Copy是内部命令,要通过命令行解释器才能执行
      

  3.   

    我就是用COPY做个例子。那换成FORMAT好了,这个不是内部命令了吧。TO nik_Amis(Azrael) :
    还要写到BAT里啊,是不是有点复杂化了。
    能有更好的办法解决么?谢谢!
      

  4.   

    Format?操作系统允许自己把自己格掉吗?
    如果这样的话,Windows也太强劲了吧!Shell 可以用用相对路径的,不信你换个程序试试。如:fdisk。不知道你想干什么,写病毒?用VB写病毒,太大了吧!
      

  5.   

    griefforyou(为你伤心)的办法也很好啊,你怎么不试一下哪?format这类程序可以直接用shell调用的
      

  6.   

    我真是被你们给气坏了。那么再换一个吧。DEFRAG 吧。别告诉我,你们又不知道这个是什么DOS命令了啊!DEFRAG是用来在DOS下整理硬盘用的。是MS的外部命令。参数有/F等等。如何用SHELL来调用这个命令呢?shell (app.path & "\defrag.exe /f")这样可以么?
      

  7.   

    a = "copy " & App.Path & "\aaa.txt " & App.Path & "\bbb.txt"不是正确的绝对的路径,回为在根目录和非根目录的是不一样的,要判断最后一个字母是不是"\"
      

  8.   

    如果是“\”的话怎么样?不是的话又会怎么样呢?
    根目录不能这样来表示么:  c:\而不是根目录的不能这样来表示么:    c:\windows\
    ???真的是弄不懂,这个和“\”有什么关系
      

  9.   

    楼主在2000下?
    我试了一下在我的2000 server下没有copy(或copy.exe或copy.com),因此系统是告诉我copy文件找不到
      

  10.   

    shell (app.path & "\defrag.exe /f")?
    搂主确定app.path目录下有defrag.exe这个文件吗
      

  11.   

    程序所在目录为根目录时,App.Path返回的字符串中有“\”,否则没有。
    如:程序所在目录为c盘根目录时:App.Path返回"c:\",
    而程序所在目录为c:\windows目录时,App.Path返回:"c:\windows",而不是"c:\windowss\"!!还有,你的调用方法不对:
    shell (app.path & "\defrag.exe /f")   括号是多余的,如果不要返回值,就把它过程来用:shell app.path & "\defrag.exe /f"   或
    call shell (app.path & "\defrag.exe /f")   或
    dim i as integer
    i=shell (app.path & "\defrag.exe /f")   
    都行。朋友大概是学C出生的吧。    :)正确方法如下:
    dim pPath as string
    pPath = iif(Right(App.Path,1)="\",App.Path,App.Path +"\")
    shell pPath & "defrag.exe /f" 随手写的,没调试过。如果有错,还请原谅。