Set fso = CreateObject("Scripting.FileSystemObject")
Set dc = fso.Drives
'WScript.Echo dc.Count
For Each d in dc
' WScript.Echo d.DriveLetter, d.DriveType
If d.DriveType = 4 then Exit For
Next
WScript.Echo d.DriveLetter & ":"
Set dc = Nothing
Set fso = Nothing
и два:
for /f %I in ('cscript //nologo findCD.vbs') do cd /d %I
-
- Дмитрий Максимов (
dmitry_maximov) wrote,
Дмитрий Максимов
dmitry_maximov
Маразмы
-
Судя по тому что:
1. Переулок Гривцова забит полицаями, эвакуируют машины 2. Навигаторы в центре города считают, что они в Пулково ... в город привезли Ботоксного.
-
Победу праздновать не бросим...
-
С Днем Рождения, Владимир Ильич!
…
- Post a new comment
- 0 comments
- Post a new comment
- 0 comments
