首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

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

2012-02-07 
紧急请教关于shell函数的问题!!!!!!我执行以下这条命令没问题vShell( C:\micaps\micaps20\micaps20.exeC

紧急请教关于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)

热点排行