[Foreigner]

sov44, а ты просто введи команды:

Код:

wmic logicaldisk where drivetype=2 get * /value

и

set volumename

Что напишет?

[sov44]

Что напишет? »

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

Access=
Availability=
BlockSize=
Caption=A:
Compressed=
ConfigManagerErrorCode=
ConfigManagerUserConfig=
CreationClassName=Win32_LogicalDisk
Description=Дисковод 3,5 дюйма
DeviceID=A:
DriveType=2
ErrorCleared=
ErrorDescription=
ErrorMethodology=
FileSystem=
FreeSpace=
InstallDate=
LastErrorCode=
MaximumComponentLength=
MediaType=5
Name=A:
NumberOfBlocks=
PNPDeviceID=
PowerManagementCapabilities=
PowerManagementSupported=
ProviderName=
Purpose=
QuotasDisabled=
QuotasIncomplete=
QuotasRebuilding=
Size=
Status=
StatusInfo=
SupportsDiskQuotas=
SupportsFileBasedCompression=
SystemCreationClassName=Win32_ComputerSystem
SystemName=1-7BC79D2011CC4
VolumeDirty=
VolumeName=
VolumeSerialNumber=

переменная среды volumename не определена

что я должен увидеть?

[Foreigner]

Значит drivetype 2 не подойдет, т.к. он еще прихватывает дисковод

Попробуй изменить запрос на:

Код:

set "wmic=2>nul wmic logicaldisk where (drivetype=2 and caption!="A:") get volumename /value"

[sov44]

Подскажите, как вывести список разделов жёстких дисков локального компьютера? Сетевые диски не выводить.

[Petya V4sechkin]

как вывести список разделов жёстких дисков локального компьютера?

Ответ был дан в сообщении 5 (и вы даже отметили его полезным в 2012 году).

[sov44]

Спасибо! Заблудился в трёх соснах А как вывести список разделов жёстких дисков без сетевых, если в системе нет wmic?

[Iska]

Использовать WSH/PoSH. Если хотите остаться в рамках а) одного и б) пакетного файла — можно попробовать использовать командную строку в «mshta.exe»:

Код:

@echo off
setlocal

for /f "tokens=2 delims=:" %%i in ('chcp') do (
    set sPrevCP=%%i
    chcp 1251 >nul
)

for /f "usebackq delims=" %%i in (
    `@"%systemroot%\system32\mshta.exe" "javascript:var enumItems = new Enumerator(new ActiveXObject('WbemScripting.SWbemLocator').ConnectServer('.', 'root\\CIMV2').ExecQuery('SELECT DeviceID FROM Win32_LogicalDisk WHERE DriveType = 3 AND MediaType = 12')); for(; ^!enumItems.atEnd(); enumItems.moveNext()) {try {new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).WriteLine(enumItems.item().DeviceID)} catch (e){}} close();" ^
    1^|more`
) do echo [%%i]

chcp %sPrevCP% >nul

endlocal
exit /b 0

[sov44]

Iska, на xp код не сработал. http://savepic.su/4249951.jpg

[Iska]

Iska, на xp код не сработал. »

Код: Microsoft Windows XP [Версия 5.1.2600] (С) Корпорация Майкрософт, 1985-2001. E:\Песочница\0369>0008.cmd [C:] [D:] [E:] [F:] [H:] [N:] E:\Песочница\0369>

Ощущение такое, что там WMI вообще вырезан. Такой скрипт vbscript:

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

Код:

Option Explicit

Dim objSWbemServicesEx

Set objSWbemServicesEx = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")

WScript.Echo TypeName(objSWbemServicesEx)

WScript.Quit 0

исполняется?

[sov44]

Такой скрипт vbscript..исполняется?

http://savepic.su/4246864.jpg

На другой машине с ХР аналогичная ошибка при запуске батника. Может не по феншую запускаю? Iska, если не затруднит, выложите батник.