vbs搜索指定的文件

如何使用 vbs 来搜索电脑里指定的文件？
比如我在D盘有个文件，我想在F盘的程序找到它。
抱歉，没财富值额.

'纯vbs的话要递归遍历所有文件夹，比较麻烦，可以和cmd结合起来用
targetfile="test.jpg"'改成你要找的文件名
Set WshShell = WScript.CreateObject("Wscript.Shell")
Set fso = WScript.CreateObject("Scripting.Filesystemobject")
tempfile=WScript.ScriptName&"_temp.txt"
wshshell.Run "cmd /c dir d:\"&targetfile&"/b /s>"&tempfile,1,True
Set f=fso.GetFile(tempfile)
If f.Size>0 Then'dir找到目标文件时才会向tempfile中写入数据，没找到时只会生成一个空文件
Set ft=fso.OpenTextFile(tempfile,1)
Do Until ft.AtEndOfStream'可能会找到多个文件，故需要读每一行的数据
line=ft.ReadLine'读入一行
MsgBox line'仅供演示
Loop
ft.Close
End If
fso.DeleteFile(tempfile)'删除生成的临时文件

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息