If wscript.Arguments.count=0 then
msgbox "拖拽文件到本图标",0,"提示"
End if
for a=0 to wscript.Arguments.count-1
strPath=wscript.Arguments(a)
msgbox strPath
next
拖拽文件显示文件路径
最新推荐文章于 2024-05-29 16:20:36 发布
If wscript.Arguments.count=0 then
msgbox "拖拽文件到本图标",0,"提示"
End if
for a=0 to wscript.Arguments.count-1
strPath=wscript.Arguments(a)
msgbox strPath
next