Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Проблема среестром... 
V
    Опции темы
Dredina
  Дата 16.6.2006, 17:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Как мне создать в реесьре ключ типа: REG_DWORD// с переменной 0 
PM MAIL   Вверх
Naghual
Дата 16.6.2006, 17:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
http://vingrad.ru/VB-VB-002867 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Dredina
Дата 16.6.2006, 17:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Д!ък ето для обычных текстовых переменных а мне, мне надо создать с типом DWORD  =/ 
PM MAIL   Вверх
Naghual
Дата 16.6.2006, 18:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
Кто тебе это сказал???
Ты внимательно код изучи. Особенно Public Enum RegTypes. 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Dredina
Дата 16.6.2006, 18:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Цитата

Примечание: Эти функции работают только с текстовыми ключами (те, что в RegEdit'e помечены символом 'ab').


Ето было написано в конце того примера что ты мне дал.....  Теперь нашол... 

Токо я не пойму куда его вписать smile 

 
PM MAIL   Вверх
Naghual
Дата 16.6.2006, 18:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
RegSetValueEx 
4 параметр

Добавлено @ 18:39 
А примечание относилось к написаным там Функциям, но не к функциям АПИ. 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Dredina
Дата 16.6.2006, 18:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Я не понял где прописовать адрес в реестре...  smile 

Можете есле не трудно примерчик? smile  

Это сообщение отредактировал(а) Dredina - 16.6.2006, 19:45
PM MAIL   Вверх
Naghual
Дата 16.6.2006, 19:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
Цитата(Dredina @  16.6.2006,  18:42 Найти цитируемый пост)
Я не понял где прописовать адрес в реестре... 

я не понял вопроса. Ты не знаеш куда в реестре сохранять данные??? 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Dredina
Дата 16.6.2006, 20:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Гг))  Я то знаю, я не знаю где ето прописать может мне адрес в реестре дать покажеш как бо я в API не сильно smile ...

Или ето можна зделать без API? 
PM MAIL   Вверх
Naghual
Дата 16.6.2006, 20:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
Код

Public Sub RegSetValue(Root As Long, SubKey As String, Key As String, ValueType as RegTypes, Value As Variant)
    Dim hKey As Long, sa As SECURITY_ATTRIBUTES, nDisp As Long
    If Not RegCreateKeyEx(Root, SubKey, 0, vbNull, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, sa, hKey, nDisp) Then
        RegSetValueEx hKey, Key, 0, ValueType, Value, Len(value) + 1
        RegCloseKey hKey
    End If
End Sub


Примерно так.  Проверить нет возможности.
Сравни с оригиналом из FAQ и все поймеш.   

Это сообщение отредактировал(а) Naghual - 16.6.2006, 20:14


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Dredina
Дата 16.6.2006, 20:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Вобшем мне надо значение етого ключа поменять на 1, и обратно на 0..
Код

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr


А за етот код шас проверю... 
PM MAIL   Вверх
Naghual
Дата 16.6.2006, 20:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49
Код

RegSetValue(HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", RegDword, 0)

Код

RegSetValue(HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", RegDword, 1)
 


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
Dredina
Дата 16.6.2006, 20:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 15.5.2006
Где: Украина, ЖВ

Репутация: нет
Всего: нет
Огромное спасибо! 
PM MAIL   Вверх
Mephisto
Дата 29.6.2006, 13:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34
Люди, плз, давайте будем вставлять то, к чему пришли. Облом обсасывать одну и ту же тему несколько раз!
Лично меня интересует значение этой .........ой константы RegDword. 
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0500 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.