[Ответить в тред] Ответить в тред

09/10/16 - Открыта доска /int/ - International, давайте расскажем о ней!
30/09/16 - BREAKING NEWS ШОК АБУ ПРОДАЛСЯ МЭЙЛУ (на самом деле нет)
25/09/16 - Персональное обращение Абу - СБОР ПОЖЕРТВОВАНИЙ НА ДВАЧ



Новые доски: /2d/ - Аниме/Беседка • /wwe/ - WorldWide Wrestling Universe • /ch/ - Чатики и конфочки • /int/ - International • /ruvn/ - Российские визуальные новеллы • /math/ - Математика • Создай свою

[Назад][Обновить тред][Вниз][Каталог] [ Автообновление ] 20 | 8 | 5
Назад Вниз Каталог Обновить

VB api функции waffe 12/10/16 Срд 20:37:17  855492  
14762938370930.jpg (62Кб, 496x505)
Эй хэй, ребят, нид хелпа с апи функциями.
Пердолюсь уже пару дней, все никак не могу сделать.
Нужно с помощью GetVolumeInformation определить метку диска C:\
Функцию задекларировал, но вот как вытащить метку - хз. Хелпаните кто может.
Я сам не прогер нихуя. Просто пытаюсь чем-то себя занять.
Моя телега если че - @jefflebowski
waffe 12/10/16 Срд 20:47:03  855500
14762944240560.jpg (8Кб, 200x150)
Буду бампать пока не сделаю.
Аноним 12/10/16 Срд 20:54:33  855505
Ага, щас, бампать он собрался, твое место на зоне, лысый.
waffe 12/10/16 Срд 21:04:40  855507
14762954807330.jpg (63Кб, 767x743)
Бамп
Аноним 12/10/16 Срд 21:19:27  855510
14762963678890.jpg (192Кб, 1536x768)
Возьми другой язык, например хаскелл.
>Your father's Haskell. This is the weapon of a Working Mathematician. Not as clumsy or random as Scala. An elegant weapon... for a more civilized age.
Аноним 12/10/16 Срд 22:48:45  855589
>>855492 (OP)
Никогда не писал на WinAPI, тем более на бейсике. Вот, попробовал запилить нужную тебе хрень. Это FreeBasic. Под Wine'ом у меня это компилируется, но ничего не печатает. Возможно, это из-за Wine, либо я где-то накосячил.
http://pastebin.com/ztK57p6G
Аноним 12/10/16 Срд 23:05:05  855604
>>855589
Братишка, я бы тебе отлил канистру нефти за то что ты пытался) но у меня это ваще нихера не работает(. А так спасибо тебе:)
Буду дальше пытаться сделать
Аноним 12/10/16 Срд 23:06:21  855606
>>855510
Не, нужно на бэйсике попытаться
Аноним 12/10/16 Срд 23:10:21  855610
>>855604
Ну, ясное дело, что конкретно этот код у тебя не запустится, т.к. он для другого бейсика. Ты просто пойми сам принцип, что функции GetVolumeInformation надо передать ссылку на буфер, в который будет записана метка диска.
А вообще, лучше покажи свой код.
Аноним 12/10/16 Срд 23:27:26  855628
14763040467650.jpg (196Кб, 1366x768)
>>855610
я кароч нашел похожую тему, только оно выбивало серийник диска, а я хочу переделать чтобы оно показывало метку раздела. вот сижу читаю разное чтиво по апи функциям, но мало что вдупляю тк особо этим не занимался. так что с этого недокода особо не смейся)
Аноним 12/10/16 Срд 23:48:53  855642
>>855628
Тебе нужны только первые три аргумента. Остальное можно смело занулять. Попробуй переписать функцию так. Вызов тоже отредактируй, как в 8 строке.
http://pastebin.com/nSicmq6g
Аноним 12/10/16 Срд 23:50:36  855644
>>855642
В 4 строке
>GetVulumeInformation
GetVolumeInformation, конечно же.
Аноним 12/10/16 Срд 23:55:37  855646
>>855642
сделал как ты сказал. в мессажбоксе пусто.
Аноним 12/10/16 Срд 23:58:16  855650
>>855646
Тут нужен спец по VB. Или хотябы анон, у которого он установлен. Попробуй в закрепленный тред написать, так больше шансов, что увидят.
waffe 12/10/16 Срд 23:59:05  855652
может просто оно не выводит русские буквы? как я понял должно выбить это - "Локальный диск". Или я что-то путаю?
Аноним 13/10/16 Чтв 00:03:35  855657
>>855652
Мне кажется, ошибка может быть либо при возрате значения из функции (5 строка), либо при передаче значения в функцию. Попробуй в 4 строке заменить rootPathName на Nothing. Если не поможет, то ставь брейкпоинт на строке "GetVolumeNameBuffer = volName" и запускай под отладчиком, чтобы увидеть, какое значение хранится в volName.
Аноним 13/10/16 Чтв 00:13:34  855664
14763068145760.jpg (318Кб, 1366x768)
>>855657
с заменой rootPathName на Nothing тоже самое.
Аноним 13/10/16 Чтв 00:18:06  855668
>>855664
Ага, у тебя после вызова GetVolumeInformation в стоке volName одни нули почему-то. Во второй строке, где ты объявляешь внешнюю функцию, проверь, чтобы перед вторым параметром стояло byRef.
Аноним 13/10/16 Чтв 00:26:55  855672
>>855492 (OP)
Вот тебе определение и примеры использования
http://pinvoke.net/default.aspx/kernel32/GetVolumeInformation.html

</thread>
waffe 13/10/16 Чтв 01:06:06  855688
14763099663500.jpg (285Кб, 1366x768)
охуительный прогресс, уже выдает буквы "я(я)"
waffe 13/10/16 Чтв 02:38:52  855722
14763155330090.jpg (3160Кб, 3264x2448)
Охуеть сделал. Мб кому интересно, код пикрелейтедвпадлу скрин было делать

[Назад][Обновить тред][Вверх][Каталог] [Реквест разбана] [Подписаться на тред] [ ] 20 | 8 | 5
Назад Вверх Каталог Обновить

Топ тредов
Избранное