사용자 컴퓨터에 설치된(?) 프로그램 리스트 가져오는 스크립트 입니다
방법은 레지스트리(Unistall)에 있는 내용 읽어 오는 방식입니다.
단점
-잡다한거가 너무 많이 나온다는 점.
-정상적으로 설치 / 삭제가 되지 않은 프로그램들은 리스트에 나타날 수 도 있다는점이 되겠습니다.
허접한 스크립트라도 이쁘게 봐주세요~~!! 헤헤
-------------------------------------------<스크립트 시작>-------------------------------------------------------
string ls_subkeylist[], ls_display_name, ls_display_version, ls_publisher
integer li_rtn
Long ll_regi_count, ll_idx, ll_row
//Uninstall의 subkey list를 배열에 담는다.
li_rtn = RegistryKeys("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall",ls_subkeylist)
//loop 체크
ll_regi_count = UpperBound(ls_subkeylist)
//loop 돌면서 변수에 프로그램명, 버전, 제작사 정보를 담는다.
For ll_idx = 1 To ll_regi_count
//변수초기화
ls_display_name = ''
ls_publisher = ''
ls_display_version = ''
//레지스트리에서 소프트웨어 정보를 읽어온다.
RegistryGet("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"+ls_subkeylist[ll_idx],"DisplayName",RegString!,ls_display_name)
RegistryGet("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"+ls_subkeylist[ll_idx],"DisplayVersion",RegString!,ls_display_version)
RegistryGet("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"+ls_subkeylist[ll_idx],"Publisher",RegString!,ls_publisher)
Next
-------------------------------------------<스크립트 끝>-------------------------------------------------------
[출처] 사용자 컴퓨터에 설치된(?) 프로그램 리스트 가져오는 스크립트 입니다. (파워빌더 커뮤니티(PBExpertClub)) |작성자 곰돌 이국형
단점
-잡다한거가 너무 많이 나온다는 점.
-정상적으로 설치 / 삭제가 되지 않은 프로그램들은 리스트에 나타날 수 도 있다는점이 되겠습니다.
허접한 스크립트라도 이쁘게 봐주세요~~!! 헤헤
-------------------------------------------<스크립트 시작>-------------------------------------------------------
string ls_subkeylist[], ls_display_name, ls_display_version, ls_publisher
integer li_rtn
Long ll_regi_count, ll_idx, ll_row
//Uninstall의 subkey list를 배열에 담는다.
li_rtn = RegistryKeys("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall",ls_subkeylist)
//loop 체크
ll_regi_count = UpperBound(ls_subkeylist)
//loop 돌면서 변수에 프로그램명, 버전, 제작사 정보를 담는다.
For ll_idx = 1 To ll_regi_count
//변수초기화
ls_display_name = ''
ls_publisher = ''
ls_display_version = ''
//레지스트리에서 소프트웨어 정보를 읽어온다.
RegistryGet("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"+ls_subkeylist[ll_idx],"DisplayName",RegString!,ls_display_name)
RegistryGet("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"+ls_subkeylist[ll_idx],"DisplayVersion",RegString!,ls_display_version)
RegistryGet("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"+ls_subkeylist[ll_idx],"Publisher",RegString!,ls_publisher)
Next
-------------------------------------------<스크립트 끝>-------------------------------------------------------
[출처] 사용자 컴퓨터에 설치된(?) 프로그램 리스트 가져오는 스크립트 입니다. (파워빌더 커뮤니티(PBExpertClub)) |작성자 곰돌 이국형