Что нового

Поиск reg файлов и внесение их в реестр

prokazzza

Новичок
Сообщения
160
Репутация
2
Имеется папка, в ней находятся штук 20 *.reg файлов, можно ли как то занести их все в реестр, пробывал такую функцию:

Код:
Runwait('regedit /S ' & @ScriptDir&'\'*.reg,'',@SW_HIDE)


не выходит. Мож кто подскажет.
 

VladUs

Скриптер
Сообщения
621
Репутация
180
Код:
$sPath ="C:\" ; Папка где находятся файлы
$search = FileFindFirstFile($sPath & "*.reg")  

If $search = -1 Then
    MsgBox(0, "Error", "No files/directories matched the search pattern")
    Exit
EndIf

While 1
    $file = FileFindNextFile($search) 
    If @error Then ExitLoop
    ShellExecute($sPath  & $file,"",@SW_HIDE)
    
WEnd

FileClose($search)


недостаток данного способа, то что будет появляться окно с подтверждением внесения изменений в реестр
 

VladUs

Скриптер
Сообщения
621
Репутация
180
недостаток данного способа, то что будет появляться окно с подтверждением внесения изменений в реестр
Хотя ... Вот рабочий пример
Код:
$sPath ="C:\" ; Папка где находятся файлы
$search = FileFindFirstFile($sPath & "*.reg")  

If $search = -1 Then
    MsgBox(0, "Error", "No files/directories matched the search pattern")
    Exit
EndIf

While 1
    $file = FileFindNextFile($search) 
    If @error Then ExitLoop
    ;ShellExecute($sPath  & $file,"",@SW_SHOW)
	Run(@ComSpec & " /c " & "regedit -s " & $sPath  & $file , "", @SW_HIDE)
WEnd

FileClose($search)


Забыл, что Regedit можно из командной строки запускать с ключем -s
 
Верх