Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата test009:
ПУть такой:
Этот компьютер\ASUS_Z010DD\Внутр. накопитель »
Оставьте только данное окно Проводника и запустите такой скрипт WSH:
Код: Выделить весь код
Option Explicit

Dim objWebBrowser


With WScript.CreateObject("Shell.Application")
	For Each objWebBrowser In .Windows
		If InStr(1, TypeName(objWebBrowser.document), "ShellFolderViewDual", vbTextCompare) > 0 Then
			WScript.Echo "[" & objWebBrowser.document.Folder & "] " & objWebBrowser.document.Folder.self.Path
		End If
	Next
End With

WScript.Quit 0
Что получится?

Отправлено: 19:33, 13-04-2019 | #6