Гость
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Считать метку CD / 7 сообщений из 7, страница 1 из 1
09.09.2003, 11:08
    #32259542
Ми
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
Нужно написать скрипт на Perl, который считывает метку дисков CD или DVD. Куда копать?
...
Рейтинг: 0 / 0
09.09.2003, 11:30
    #32259597
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
Может это поможет.

mahoune
...
Рейтинг: 0 / 0
09.09.2003, 12:15
    #32259702
Ми
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
Returns the name of the filesystem of the currently active drive (like 'FAT' or 'NTFS')?
Да вряд ли. Мне не файловую систему, а метку диска нужно.
...
Рейтинг: 0 / 0
09.09.2003, 14:38
    #32260015
MrGreeN
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
CD- 'CDFS'
...
Рейтинг: 0 / 0
09.09.2003, 15:37
    #32260128
Ми
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
Можно пример, если не трудно, please...
...
Рейтинг: 0 / 0
09.09.2003, 15:52
    #32260161
MrGreeN
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
Мы с пёрлом пока что не сильно знакомы (чтобы не сказать что вообще незнакомы), но судя по ссылке mahoune тама есть такое
Win32::SetCwd(NEWDIRECTORY) //устанавливаем активный диск/директорию
Win32::FsType() //а там тип фс - cdfs, и получаем нэйм его...
Ну это я так думаю , т.е. не проверял...
...
Рейтинг: 0 / 0
10.09.2003, 16:00
    #32261389
Ми
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Считать метку CD
Если кому интересно, вот так примерно:

use Win32API::File;

Win32API::File::GetVolumeInformation( "E:\\", my $osVolName, 32, NULL, NULL, NULL, my $osFsType, 32);
print "$osVolName\n";
...
Рейтинг: 0 / 0
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Считать метку CD / 7 сообщений из 7, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]