个人中心
文章发布
退出
作者热门文章
- ubuntu12.04环境下使用kvm ioctl接口实现最简单的虚拟机
- Ubuntu 通过无线网络安装Ubuntu Server启动系统后连接无线网络的方法
- 在Ubuntu上搭建网桥的方法
- ubuntu 虚拟机上网方式及相关配置详解
24
4
CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.
这篇CFSDN的博客文章运行同一目录下的可执行程序的VBS代码由作者收集整理，如果你对这篇文章有兴趣，记得点赞哟.
复制代码 代码如下
Set objShell = CreateObject("WScript.shell") strCurrentDir = objShell.CurrentDirectory set fso = createobject("scripting.filesystemobject") set f=fso.getfolder(strCurrentDir) For Each i In f.files If LCase(right(i,4)) = ".exe" Then objShell.Run i,,true Next 。
获取脚本所在目录还可以
复制代码 代码如下
set fso = createobject("scripting.filesystemobject") fso.GetParentFolderName(WScript.ScriptFullName) 。
一时想不到更好的办法判断文件是不是.exe了…… 就这样了.
复制代码 代码如下
Option Explicit Dim oFS : Set oFS = CreateObject( "Scripting.FileSystemObject" ) Dim oWS : Set oWS = CreateObject( "WScript.Shell" ) WScript.Echo "Script:" WScript.Echo "ScriptFullName:", WScript.ScriptFullName WScript.Echo "ScriptFullPath:", oFS.GetParentFolderName( WScript.ScriptFullName ) WScript.Echo "Current:" WScript.Echo "FS:", oFS.GetAbsolutePathName( ".\" ) WScript.Echo "WS:", oWS.CurrentDirectory -------- output ------------- C:\wis\_vbs\0506\dev\forum cscript curdir.vbs Script: ScriptFullName: C:\wis\_vbs\0506\dev\forum\curdir.vbs ScriptFullPath: C:\wis\_vbs\0506\dev\forum Current: FS: C:\wis\_vbs\0506\dev\forum WS: C:\wis\_vbs\0506\dev\forum C:\wis\_vbs\0506\dev\forum cd .. C:\wis\_vbs\0506\dev cscript forum\curdir.vbs Script: ScriptFullName: C:\wis\_vbs\0506\dev\forum\curdir.vbs ScriptFullPath: C:\wis\_vbs\0506\dev\forum Current: FS: C:\wis\_vbs\0506\dev WS: C:\wis\_vbs\0506\dev 。
参考资料：http://www.visualbasicscript.com/m43018.aspx 。
最后此篇关于运行同一目录下的可执行程序的VBS代码的文章就讲到这里了,如果你想了解更多关于运行同一目录下的可执行程序的VBS代码的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。
24
4
0
我正在为我的程序编写安装脚本，它应该在 Linux/Unix 操作系统上运行。以下文件的默认目录是什么: 可执行文件(程序)。程序应通过从命令行键入其名称来执行。 共享库。 第三方共享库(程序未开源，
我有一堆用户、组和应用程序注册，我的 MVC 应用程序使用 AAD 数据进行身份验证和授权。是否可以将 Azure Active Directory 从一个租户(目录)迁移到另一个租户(目录)？如果可
查看 cljsbuild 文档 https://github.com/emezeske/lein-cljsbuild :cljsbuild { :builds [{ ; The
忽略已经版本控制的文件 如果你不小心添加了一些应该被忽略的文件，你如何将它们从版本控制中去除而不会丢失它们？或许你有自己的IDE配置文件，不是项目的一部分，但将会花费很多时间使之按照自己的方式工作。
我想使用\tableofcontents 命令，但没有目录从新页面开始或在末尾创建新页面，并且所有内容都是单倍行距。我怎样才能做到这一点？我假设使用 tocloft，但有哪些选择？ 谢谢 最佳答案 试
我有一些 javascript 菜单代码，可以在单独的目录中正常工作。但是，当我尝试从同一目录中调用相同的 .js 文件时，它不会看到这些文件。 以下内容来自另一个目录: script type="t
我有这样的路径: /my/path/to/important_folder 在同一级别上，我还有其他文件和文件夹想要在达到与 important_folder 相同的级别时列出。 我的文件夹可能更深，
1、获取文件路径实现 1.1 获取当前文件路径 ? 1
我正在使用最新版本的 NTEmacs。 我写了一个名为“.dir-locals.el”的文件，如下所示。 ((nil . ((tab-width . 8) (fill-column .
关闭。这个问题不满足Stack Overflow guidelines .它目前不接受答案。 想改善这个问题吗？更新问题，使其成为 on-topic对于堆栈溢出。 7年前关闭。 Improve thi
在我的 .vimrc 中有这些行 :set foldmethod=marker :set foldmarker=SECTION:,ENDSECTION: 用于自定义代码折叠。在我的文件中，相关语言的注
在 fish 中: for x in * echo $x end *这里包括所有目录和文件，如何只列出文件(或目录)？ 最佳答案 fish 没有很多花哨的通配语法。但是，目录可以像这样迭代: f
这是我的目录结构: ├── src │ ├── helpers │ │ ├── __init__.py │ │ ├── foo.py │ │ └── bar.py │
我想递归重命名文件夹/目录名称并找到 this solution所以。但是这个命令没有效果 find . -type f -exec rename 's/old/new/' '{}' \; 这是一个正
我想在相册中创建一个文件夹，并希望将图像保存在创建的相册中。 这可能吗？有什么办法可以做到这一点吗？ 我已经搜索过，大多数人都说这是不可能的。 感谢您的帮助。 最佳答案 您也许可以使用AssetsLi
如何在python中使用用户定义的名称创建临时文件/目录。我知道 tempfile .但是我看不到任何以文件名作为参数的函数。 注意:我需要这个来对包含临时文件的临时目录上的 glob(文件名模式匹配
我在项目中使用JaCoCo Gradle插件。 作为问题的一个示例，我的大部分代码都在com.me.mysoftware包下。 我正在使用代码生成器来生成build/generated/java/..
我正在尝试使用 Gradle 开始运行 jar 文件 我的任务如下所示: task startServer(type: Exec) { workingDir file("${buildDir}/a
如何在 Ant 中定义一个目录集，其中包括两个目录:项目的基目录和子目录“test”？ 看起来您无法使用“/”、“.”或“”专门包含目录集的根目录。例如，这包括“./test”，但不包括“.”:
我正在使用 CTAGs 包，它使用 Sublime Text 2 生成两个文件 .tags 和 .tags_sorted_by_file。 那么当我进行项目搜索(CMD + SHIFT + F)时，如
我是一名优秀的程序员,十分优秀！