拖拽文件显示文件路径的vbs代码
下面两段原理都是一样的,大家可以看下
代码一
Ifwscript.Arguments.count=0then msgbox"拖拽文件到本vbs文件",0,"提示" Endif forjb=0towscript.Arguments.count-1 strPath=wscript.Arguments(jb) msgboxstrPath next
加了判断如果直接运行vbs会提示需要拖拽文件到此vbs文件上
代码二
vbs拖放操作的问题;如下,只要将文件或文件夹拖到这个t.vbs上就可以得到该文件或文件夹的路径
ForEacharInWScript.Arguments filename=ar Next Msgboxfilename
好了这篇文章就介绍到这了,需要的朋友可以参考一下。