Возвращает серийный номер, записанный на
. Удаление второго и третьего элементов (имени сервера и тома) из
полного пути доступа, полученного в сети Novell:
IF NNETWORK()
cPath := TRUENAME(cOldPath)
cToken1 := TOKEN(cPath, ":\", 1)
cToken2 := TOKEN(cPath, ":\", 2)
cToken3 := TOKEN(cPath, ":\", 3)
cPath := cToken1 + AFTERATNUM(cToken2 + cToken3, cPath)
ENDIF
See Also: TOKEN()
AFTERATNUM()
VOLSERIAL()
Возвращает серийный номер, записанный на диск при форматировании.
------------------------------------------------------------------------------
Синтаксис
VOLSERIAL([<cDrive>]) --> nVolSerial
Параметры
<cDrive> - необязательный символьный параметр, задающий имя диска в
виде буквы с необязательным символом ":". По умолчанию используется
текущий диск.
Возвращаемое значение
nVolSerial - целое положительное 32-битовое число, соответствующее
серийному номеру тома гибкого или жесткого диска, или 0 при вызове
функции под управлением более ранней версии, чем DOS 4.0. Если диск
недоступен, возвращается (-1).
Описание
Функция возвращает серийный номер тома, записываемый на гибкие и
жесткие диски при форматировании их под управлением DOS версии 4.0 и
выше. Номер представляет собой 32-битовое число, генерируемое DOS
без учета текущих даты, времени и внутреннего счетчика.
Примечания
. Возможна несовместимость.
. Функция возвращает значение из блока дисковых параметров.
Для версий DOS ниже 4.0 возвращается значение 0.
Примеры
. Запрос номера тома:
? VOLSERIAL() // 0, если форматировалось не под DOS.4
See Also: OSVER()
VOLUME()
Записывает метку тома на гибкий или жесткий диск.
------------------------------------------------------------------------------