script & dos有关问题, 如何输出文件

script & dos问题, 怎么输出文件
我怎么输不出呢?
Function   CompareFile()
Set   objShell   =   CreateObject(   "Shell.Application "   )
objShell.ShellExecute   "fc.exe ",   "D:\20070412_084536169.axml   D:\120070412_084536169.axml ",   "> >   D:\list.txt "
Set   objShell   =   Nothing
End   function

为什么啊

[解决办法]
Process.Start