关于Tools.Shell命令问题，解决就结帖！

Question

自己的问题自己答，
直接用Process.Start就可以了。

Answer 1

这是我做的一个调用winrar.exe 的程序，使用shell调用，你可以看看        Dim Rarexe As String 'WINRAR执行文件的位置 
        Dim Source As String ' 压缩前的原始文件 
        Dim Target As String ' 压缩后的目标文件 
        Dim rarpass As String
        Dim FileString As String 'Shell指令中的字符串         Dim Result As Long        Environment.CurrentDirectory = "D:\web projects\wwwroot\manage\extendsystem\cardbak"
        Rarexe = """D:\web projects\winrar\winrar"""
        Source = filename & ".txt"
        Target = "..\cardrar\" & filename & ".rar"        rarpass = "-p" & pass        FileString = Rarexe & " a " & rarpass & " " & Target & " " & Source        Result = Shell(FileString)

Answer 2

既然这个问题没人回复，那就再提一个问题：
我用.bat批处理文件创建Oracle数据库
.bat文件里面的语句：
C:\orant\BIN\svrmgr30.exe "connect internal/oracle" <sys_init.sql > C:\sys_init.log
运行的时候提示系统找不到文件，脚本文件sys_init.sql不指定路径时，应该是当前目录，我把.bat和脚本文件放在同一个目录下面，直接点击运行.bat文件，还是找不到文件。脚本文件sys_init.sql 应该怎样指定路径呢？