拖拽文件显示文件路径的vbs代码

所属分类: 脚本专栏 / vbs 阅读数: 439
收藏 0 赞 0 分享

下面两段原理都是一样的,大家可以看下

代码一

If wscript.Arguments.count=0 then 
		msgbox "拖拽文件到本vbs文件",0,"提示"
End if  
for jb=0 to wscript.Arguments.count-1
	strPath=wscript.Arguments(jb)
	msgbox strPath	
next

加了判断如果直接运行vbs会提示需要拖拽文件到此vbs文件上

代码二

vbs拖放操作的问题; 如下,只要将文件或文件夹拖到这个t.vbs上就可以得到该文件或文件夹的路径

For Each ar In WScript.Arguments
filename=ar
Next
Msgbox filename

好了这篇文章就介绍到这了,需要的朋友可以参考一下。

更多精彩内容其他人还在看

VBS教程:函数-Chr 函数

VBS教程:函数-Chr 函数
收藏 0 赞 0 分享

VBS教程:函数-CDbl 函数

VBS教程:函数-CDbl 函数
收藏 0 赞 0 分享

VBS教程:函数-CDate 函数

VBS教程:函数-CDate 函数
收藏 0 赞 0 分享

VBS教程:函数-CCur 函数

VBS教程:函数-CCur 函数
收藏 0 赞 0 分享

VBS教程:函数-CByte 函数

VBS教程:函数-CByte 函数
收藏 0 赞 0 分享

VBS教程:函数-CBool 函数

VBS教程:函数-CBool 函数
收藏 0 赞 0 分享

VBS教程:函数-Atn 函数

VBS教程:函数-Atn 函数
收藏 0 赞 0 分享

VBS教程:函数-Asc 函数

VBS教程:函数-Asc 函数
收藏 0 赞 0 分享

VBS教程:函数-Array 函数

VBS教程:函数-Array 函数
收藏 0 赞 0 分享

VBS教程:函数-Abs 函数

VBS教程:函数-Abs 函数
收藏 0 赞 0 分享
查看更多