[Iska]

Kazun, только чертовски медленно будет искать.

streamrider, зачем его искать, если всегда известно, где он находится?

читать дальше »

Код:

Option Explicit

Const SystemFolder = 1

Dim strPath


With WScript.CreateObject("Scripting.FileSystemObject")
	strPath = .BuildPath(.GetSpecialFolder(1).Path, "drivers\etc\hosts")
	
	If .FileExists(strPath) Then
		WScript.Echo "Found: " & strPath
	End If
End With

WScript.Quit 0