vbscript를 실행하여 exe 위치를 얻고 레지스트리 키에 추가

Question

vbs를 만드는 데 도움이 필요합니다. exe는 어디서나 실행할 수 있습니다. 그래서 exe 위치를 얻고 레지스트리 항목에 추가해야합니다.

예 : C : EXE의 위치 \ ABC \ execute.exe 레지스트리 위치 : HKEY_CURRENT_USER \ SOFTWARE \ 마이크로 소프트 \ 윈도우 NT를 \ CurrentVersion \ AppCompatFlags \ 호환성 관리자 \는

는 C로 키를 추가 지속 형 : \ ABC \ execute.exe의 DWORD = 사전

Answer 1

1 개

덕분에 내가 제대로 질문을 이해하고있는 경우는,이 ​​같은 것을 사용할 수 있습니다.

cscript {path-to-your-script\scriptname.vbs} /filepath:"C:\abc\execute.exe" 

당신은 전체 경로와 파일 이름으로 {path-to-your-script\scriptname.vbs}를 교체해야합니다 :

는 단순히 시작 메뉴로 이동하여 입력 검색 상자에 (또는 실행 상자) 것,이 스크립트를 호출하려면 스크립트 예제는 아래에 제공됩니다. .vbs 확장명으로 코드 스 니펫을 저장해야합니다.

이 vbs 스 니펫은 레지스트리 경로가 존재하는 경우 HKEY_CURRENT_USER \ Software \ Microsoft \ Windows NT \ CurrentVersion \ AppCompatFlags \ Compatibility Assistant \ Persisted 키에서 1의 dword 값으로 C : \ abc \ execute.exe를 자동으로 추가합니다. 실행 계정에는이를 수행 할 수있는 충분한 권한이 있습니다.

참고 : wscript.arguments.Named.Item이 지원되지 않으므로이 스크립트 스 니펫은 이전 버전의 Windows에서 작동하지 않습니다.

' cscript <scriptname.vbs> /filepath:"C:\abc\execute.exe" 

    Const HKEY_CURRENT_USER = &H80000001 


    filePath = wscript.arguments.Named.Item("filepath") 
    Value = 1 

    strComputer = "." 
    Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv") 
    strKeyPath = "Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Compatibility Assistant\Persisted" 

    if filePath <> "" then 
     objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, filepath, Value 
    end if 

희망이 있습니다.