读书人

紧急请问关于shell函数的有关问题!

发布时间: 2012-02-07 17:45:36 作者: rapoo

紧急请教关于shell函数的问题!!!!!!
我执行以下这条命令没问题v = Shell( "C:\micaps\micaps20\micaps20.exe C:\micaps\micaps20\para1.dat d:\ddd\combine\height700.zht ", vbNormalFocus)
我现在想改成从文件中读取路径,不是在这指定的.
假设du1和du2为从文件中读取的
du1 = "c:\micaps "
du2 = "d:\grapes "

s1 = du1 & "\micaps20\micaps20.exe "
s2 = du1 & "\micaps20\para1.dat "
s3 = du2 & "\combine\height500.zht "
v = Shell( "s1 s2 s3 ", vbNormalFocus)
这样执行shell函数时就会提示 "实时错误53,文件未找到 ",请问该怎么改才能实现这个功能呢?

[解决办法]
du1 = "c:\micaps "
du2= "d:\ddd "

s1 = du1 & "\micaps20\micaps20.exe "
s2 = du1 & "\micaps20\para1.dat "
s3 = du2 & "\combine\height500.zht "
v = Shell(s1 & " " & s2 & " " & s3, vbNormalFocus)

[解决办法]
du1 = "c:\micaps "
du2= "d:\ddd "

s1 = du1 & "\micaps20\micaps20.exe "
s2 = du1 & "\micaps20\para1.dat "
s3 = du2 & "\combine\height500.zht "
v = Shell(s1 & " " & s2 & " " & s3 & " ", vbNormalFocus)

读书人网 >VB

热点推荐