Shell.Application执行命令的五种方法
来源:百度文库 编辑:神马文学网 时间:2024/04/26 12:28:07
可能很多人发现了在海阳顶端2006+版本中Shell.Application执行命令的方法在win2003中不好用了。当初老马写这个版本时,我测试过简繁两个2003版本的,当是是好用的。我猜测很可能与2003打了ms06014补丁有关。kyo在冰点论坛提出了解决方法,我今天下午研究了一下这个组件,发现它有5种方法可以执行命令。以下是vbs版本(asp版不提供了,如何利用asp版本在2003的webshell中运行命令,自己解决吧:-):
Set objShellApp = CreateObject("Shell.Application")
Set objFolder = objShellApp.NameSpace("c:\")
objFolder.Items().item("demo.exe").invokeverb '方法1
objFolder.Items().item("demo.exe").InvokeVerbEx'方法2
objShellApp.Open("C:\demo.exe") '方法3
objShellApp.ShellExecute "demo.exe","","c:\","","1" '方法4,可以加参数和设置参数值
'方法5
Set objFolderItem = objShellApp.NameSpace("C:\").Items().item("demo.exe")
Set objFIVs = objFolderItem.Verbs()
For i=0 To objFIVs.Count - 1
'MsgBox objFIVs.Item(i)
Set objFIV = objFIVs.Item(i)
If objFIV.Name = "打开(&O)" Then '右键菜单中在中文系统是"打开(&O)",英文自己改
objFIV.DoIt
Exit For
End IF
Next
Set objShellApp = CreateObject("Shell.Application")
Set objFolder = objShellApp.NameSpace("c:\")
objFolder.Items().item("demo.exe").invokeverb '方法1
objFolder.Items().item("demo.exe").InvokeVerbEx'方法2
objShellApp.Open("C:\demo.exe") '方法3
objShellApp.ShellExecute "demo.exe","","c:\","","1" '方法4,可以加参数和设置参数值
'方法5
Set objFolderItem = objShellApp.NameSpace("C:\").Items().item("demo.exe")
Set objFIVs = objFolderItem.Verbs()
For i=0 To objFIVs.Count - 1
'MsgBox objFIVs.Item(i)
Set objFIV = objFIVs.Item(i)
If objFIV.Name = "打开(&O)" Then '右键菜单中在中文系统是"打开(&O)",英文自己改
objFIV.DoIt
Exit For
End IF
Next
Shell.Application执行命令的五种方法
shell命令
Linux Shell常用shell命令
“执行上级命令”不是免责的理由
shell中调用另外的脚本文件的两种方法
MSN SHELL去除弹出广告的方法,是指shell的广告
Winter实验室: 强大的Sed命令--背唐诗的Shell小程序
Linux Shell中PS命令中的%CPU的含义介绍-华军资讯
从学习export命令理解到的Shell环境和变量生存期(转)
Linux库文件和Shell可执行程序命令文件搜索路径变量的设置
uClinux操作系统下的shell功能配置方法
uClinux操作系统下的shell功能配置方法1
bash shell if 命令参数说明
DOS 命令帮助文档 command line shell
十分震惊 北大竟拒绝执行温家宝的命令(图)
十分震惊 北大竟拒绝执行温家宝的命令(图)
提高执行力的方法
五种的方法
三十六种死刑执行方法
关于批处理的学习之五[组合命令 管道命令]
关于批处理的学习之五[组合命令 管道命令]
进阶教程:Win7下常用shell命令解析
linux shell 学习笔记(五)
android中adb shell常用命令及查询数据库的方法 - ocean_helen的...