dos命令运行是这样的:
先将fbinst.exe放在D盘目录下:然后运行cmd,输入d:回车
d:\>fbinst --hdlist "(hd%N) %I %SG [%P]" --USB >hdl.ini
这样就可以在d盘目录生成一个hdl.ini
现在我想在VF的表单中点击一个按钮就可以实现这个功能。代码如下:
Declare Integer ShellExecute In "Shell32.dll" Integer HWnd,String lpVerb,String lpFile,String
lpParameters,String lpDirectory,Long nShowCmd
=Shellexecute(0,"Open","d:\fbinst.exe","fbinst --hdlist '(hd%N) %I %SG [%P]' --USB
>hdl.ini","",1)
或者:ox=Createobject("wscript.shell")
ox.Run("d:\fbinst.exe hdlist '(hd%N) %I %SG [%P]' --USB >hdl.ini",0,1)
Release ox
Messagebox('操作完成!',64,'信息提示')
并没有生成这个文件hdl.ini啊。请问这个点击运行的代码有什么问题呢?
------解决方案--------------------------------------------------------
建议:
d:\>fbinst --hdlist "(hd%N) %I %SG [%P]" --USB >hdl.ini
变更为
d:\>fbinst --hdlist "(hd%N) %I %SG [%P]" --USB >d:\hdl.ini
------解决方案--------------------------------------------------------
run /n3 d:\fbinst.exe --hdlist>hdlist.txt
------解决方案--------------------------------------------------------
你的代码没太大的问题,参考2楼给的建议,注意相对路径与绝对路径的区别,理解程序运行时的当前路径等概念,其实你要的功能可以直接用Run或!运行Dos命令就可以了,不用调Api那么麻烦。
------解决方案--------------------------------------------------------
run