ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Проверка существует ли значение в реестре
25 сообщений из 65, страница 2 из 3
  2  все
Проверка существует ли значение в реестре
    #38853380
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Shocker.Pro,
...
Рейтинг: 0 / 0
13.01.2015, 16:55
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853381
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Shocker.Pro,

http://msdn.microsoft.com/ru-ru/library/xz88758e.aspx
...
Рейтинг: 0 / 0
13.01.2015, 16:55
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853384
Дмитрий77
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмитрий77
Участник
vdekameronЭто пиз...ц:-
А ты как хотел?
Не нравится - тогда добро пожаловать в "чиста .Net".
Тем более "чиста код" для "чиста .Net" ты уже уже написал.
Если не брать ньюансы с syswow64 то Net.-овская обертка для реестра на мой взгляд достаточно хороша.

Shocker.Pro,
>Да, а, собственно, какая вам разница, что внутри функции,
Ну, ты ж понимаешь что с таким подходом к API тоже далеко не уедешь.
Это только Ципиховичу наверно дано. Шутка.
...
Рейтинг: 0 / 0
13.01.2015, 16:57
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853385
carrotik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
carrotik
Участник
vdekameron,

...так все-таки, это VB.NET ... да? или VB.DA?
...
Рейтинг: 0 / 0
13.01.2015, 16:57
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853388
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Дмитрий77

Очень вас прошу, измените пожалуйста код с учетом того что я хочу проверить просто есть ли папка "test" в
разделе LOCAL_MACHINE\SOFTWARE. Если нет то msgbox " гудбай " , но это я и сам смогу
...
Рейтинг: 0 / 0
13.01.2015, 16:59
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853389
Дмитрий77
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмитрий77
Участник
vdekameronShocker.Pro,

http://msdn.microsoft.com/ru-ru/library/xz88758e.aspx

Ай-я-яй, Visual Studio 2013 не смутило?
Это при том что крайняя версия VB6 вышла в 1998г.
...
Рейтинг: 0 / 0
13.01.2015, 17:00
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853391
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
carrotik,

Да тут наверное уже весь форум понял что мне нужно на VB6
...
Рейтинг: 0 / 0
13.01.2015, 17:00
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853394
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Shocker.ProПолюбуйтесь откуда я взял этот код

http://msdn.microsoft.com/ru-ru/library/xz88758e.aspx
любуюсь. Там синим по белому написана версия студии
...
Рейтинг: 0 / 0
13.01.2015, 17:01
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853396
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Дмитрий77,


Дмитрий77Ай-я-яй, Visual Studio 2013 не смутило?

Прошу прощения.
Топик прочитал и дальше глазами сразу на объяснение
...
Рейтинг: 0 / 0
13.01.2015, 17:02
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853398
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Shocker.Pro,


Shocker.Pro


Ну лишний раз доказывает что спорить с вами нет смысла)) Все-равно останешься виноват))
Извините, ступил!
...
Рейтинг: 0 / 0
13.01.2015, 17:03
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853399
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
vdekameronОчень вас прошу, измените пожалуйста код с учетом того что я хочу проверить просто есть ли папка "test" в
разделе LOCAL_MACHINE\SOFTWARE. Если нет то msgbox " гудбай " , но это я и сам смогуЭтот код менять не надо. Этот код - просто функции для использования вами. Вы их кладете свой проект, не вникая, что у них внутри и просто пользуетесь ими
...
Рейтинг: 0 / 0
13.01.2015, 17:03
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853401
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
vdekameronНу лишний раз доказывает что спорить с вами нет смысла)) Все-равно останешься виноват))
Извините, ступил!зато в следующий раз уже знаете, куда смотреть
...
Рейтинг: 0 / 0
13.01.2015, 17:04
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853404
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
У меня VB6 проект. Кто-то может скинуть именно для проверки наличия/отсутствия папки "test" в разделе реестра LOCAL_MASHINE\SOFTWARE.
Ибо скажу честно что не разберусь сам куда и что вопхнуть в тот код который Дмитрий не поленился скинуть.
...
Рейтинг: 0 / 0
13.01.2015, 17:06
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853415
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
vdekameronУ меня VB6 проект. Кто-то может скинуть именно для проверки наличия/отсутствия папки "test" в разделе реестра LOCAL_MASHINE\SOFTWARE.
Ибо скажу честно что не разберусь сам куда и что вопхнуть в тот код который Дмитрий не поленился скинуть.Нужно создать в проекте модуль и положить в него текст Дмитрия. Сначала второй (объявления), потом первый (функции)

Всё, вы имеете две функции IsRegistryValueExists и IsRegistryKeyExists, которые возвращают Boolean - можете их использовать в своем проекте как и любые другие функции. Их назначение - ну уж попробуйте перевести с английского с помощью гугла их названия.

Как вызывать функции - ну это уже азы - читайте первые страницы учебника
...
Рейтинг: 0 / 0
13.01.2015, 17:11
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853416
Дмитрий77
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмитрий77
Участник
vdekameronчто вопхнуть в тот код который .
Код: vbnet
1.
2.
3.
If IsRegistryValueExists(HKEY_LOCAL_MACHINE, "SOFTWARE\test", "TestValue") = False Then
  MsgBox("Value does not exist.")
End If
...
Рейтинг: 0 / 0
13.01.2015, 17:11
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853452
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
Вообще вполне можно считать и без привлечения API напрямую:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub GetKey()
    Dim WshShell As Object, rTestF
    Set WshShell = CreateObject("WScript.Shell")
    On Error Resume Next
    rTestF = WshShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\test\test")
    If IsEmpty(rTestF) Then
        MsgBox "Указанный раздел или ключ в реесте отсутствует"
    End If
End Sub



Думаю, такой вариант ТСу вполне подойдет.
...
Рейтинг: 0 / 0
13.01.2015, 17:37
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853463
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Shocker.Pro, Дмитрий77

Уважаемые спецы!
1) Как вызвать функцию уже знаю да и Дмитрий уже написал
2) Создал Модуль - Проект1- добавить модуль-Модуль1
3) В него вписал объявления( второй код, который скинул Дмитрий) сразу за ним первый-функции
4) В окне кода формы проекта написал
Код: vbnet
1.
2.
3.
If IsRegistryValueExists(HKEY_LOCAL_MACHINE, "SOFTWARE\test", "TestValue") = False Then
  MsgBox("Value does not exist.")
End If


5) Делаю F8 чтобы полюбоваться результатом
Но болт. Ошибка- User-defined type not defined и синим подсвечивает строку кода-
Код: vbnet
1.
2.
3.
4.
5.
6.
Public Declare Function RegEnumKeyEx Lib "advapi32.dll" Alias _
 "RegEnumKeyExA" (ByVal hKey As Long, ByVal dwIndex _
 As Long, ByVal lpName As String, lpcName _
 As Long, ByVal lpReserved As Long, ByVal _
 lpClass As String, lpcClass As Long, _
 lpftLastWriteTime As FILETIME) As Long
...
Рейтинг: 0 / 0
13.01.2015, 17:45
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853474
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
Код: vbnet
1.
2.
3.
4.
Public Type FILETIME
    LowPart As Long
    HighPart As Long
End Type


нет видимо в описании
...
Рейтинг: 0 / 0
13.01.2015, 17:50
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853477
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Код: vbnet
1.
2.
3.
4.
Public Type FILETIME
        dwLowDateTime As Long
        dwHighDateTime As Long
End Type
...
Рейтинг: 0 / 0
13.01.2015, 17:51
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853479
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
vdekameron,

Мой вариант не прокатывает?
...
Рейтинг: 0 / 0
13.01.2015, 17:52
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853487
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
The_Prist,

Боже! Я женат и у меня есть сын и я очень даже правильной ориентации. Но я готов вас расцеловать)))
Где же вы были в самом начале )))
Объясните в чем подвох)) Нахрена создавать модули вписывать кучу объявлений, функций, если можно 10 строчками кода выполнить проверку.
Ну по-любому Дмитрий не просто так скинул почти книгу кода)
Где эти 10 строк The_Prist могут вылезти боком, если я их возьму за основу)
...
Рейтинг: 0 / 0
13.01.2015, 17:53
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853492
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
vdekameronОбъясните в чем подвохThe_Prist просто использует дополнительную прокладку к тому, что Дмитрий использует напрямую, поэтому кажется, что кода меньше. Вариант Дмитрия прямее и быстрее, но для вас, в общем-то, это непринципиально.
...
Рейтинг: 0 / 0
13.01.2015, 17:56
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853496
Дмитрий77
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмитрий77
Участник
The_Prist,

А как ваш код прокатит. если у ТС VB6?
Или я чего то не допонял?
...
Рейтинг: 0 / 0
13.01.2015, 18:01
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853498
vdekameron
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vdekameron
Гость
Shocker.Pro,

Добавил
Код: vbnet
1.
2.
3.
4.
Public Type FILETIME
        dwLowDateTime As Long
        dwHighDateTime As Long
End Type


Итог-срабатывает MsgBox ("Value does not exist.")
хотя повторюсь что HKEY_LOCAL_MACHINE, "SOFTWARE\test" со строковым параметром test существует
...
Рейтинг: 0 / 0
13.01.2015, 18:01
| Ответить | Цитировать | Написать  
Проверка существует ли значение в реестре
    #38853499
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
vdekameronГде эти 10 строк The_Prist могут вылезти боком, если я их возьму за основуНе должны. Не встречал пока такого случая. Вам явно проще будет использовать такой код, чем API напрямую.
...
Рейтинг: 0 / 0
13.01.2015, 18:02
| Ответить | Цитировать | Написать  
25 сообщений из 65, страница 2 из 3
  2  все
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Проверка существует ли значение в реестре
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=20&msg=38853396&tid=1402013]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 30ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 65ms
get tp. blocked users:
 1ms
others: 14ms
total:  150ms
созд. / загр.: 150ms
x
x
Закрыть


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