강좌 / 팁

윈 도 우 저장공간 확인 및 정리

2020.01.15 18:21

레마클로 조회:3148 추천:17

 

DriveSpacio.exe 와 WizTree를 사용하여 불필요한 큰 파일 등을 삭제할 때 사용하세요.

업자들은 "시간싸움"이잖아요.

 

스크립트 시작

'--------------

If WScript.Arguments.length =0 Then

  Set objShell = CreateObject("Shell.Application")

  objShell.ShellExecute "wscript.exe", Chr(34) & _

  WScript.ScriptFullName & Chr(34) & " uac", "", "runas", 1

Else

'--------------

 

Const strComputer = "."

Dim objWMIService, colProcessList

Set WshShell = WScript.CreateObject("WScript.Shell")

Set objFSO=CreateObject("Scripting.FileSystemObject")

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

curDir = objFSO.GetParentFolderName(WScript.ScriptFullName)

OSArchCheck = WshShell.RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\PROCESSOR_ARCHITECTURE")

 

Driv = curDir & "\DriveSpacio.exe"

WizT86 = curDir & "\WizTree.exe"

WizT64 = curDir & "\WizTree64.exe"

 

 

WshShell.Run Chr(34) & Driv & Chr(34), 0, True

 

x=msgbox("★ wiztree로 자세하게 확인 해 볼까요?", 4096 + 4, "wiztree")

 

If x = VbYes Then

 

If OSArchCheck = "x86" Then

WshShell.Run chr(34) & WizT86 & Chr(34), 0, True

Else

WshShell.Run chr(34) & WizT64 & Chr(34), 0, True

End If

 

Else

End If

 

End If

 

스크립트 끝

 

 

 

번호 제목 글쓴이 조회 추천 등록일
[공지] 강좌 작성간 참고해주세요 gooddew - - -
4343 소프트웨어| Symantec Endpoint Protection 자동 업데이트 설정하기 [4] kisslady 1017 6 07-22
4342 모 바 일| 아이폰 컴퓨터(윈도우10) 연결 문제 (아이튠즈 아이폰 인식... [2] Day 1018 0 10-06
4341 소프트웨어| pureBasic 자동완성을 위한 프로젝트 만들기 [6] 입니다 1020 14 03-28
4340 윈 도 우| Windows 11 Home에서 그룹 정책 편집기를 사용하도록 설정... [1] VₑₙᵤₛG 1022 2 11-30
4339 소프트웨어| Rollback RX Tip [1] 누군가 1027 3 03-20
4338 기 타| 윈도우10 imageres.dll 아이콘 번호 [2] 코요88 1030 6 08-15
4337 윈 도 우| VHD 부트에서 부팅된 VHD 파일경로 추출과 활용 스크립트 [2] Neutrino 1032 7 05-31
4336 서버 / IT| Ubuntu, Linux Mint, Debian, Fedora 및 openSUSE에서 Virt... [1] VenusGirl 1036 4 04-25
4335 소프트웨어| Microsoft Edge의 작업 영역 기능에 대해 살펴보기 VₑₙᵤₛG 1037 2 04-13
4334 소프트웨어| 크로미움 엣지에서 "torrent Client을(를) 여시겠습니... 제설작업 1038 3 07-15
4333 기 타| 윈도우즈 멀티부팅 CMD에서 이름바꾸기 (영상) [7] 코요88 1038 3 08-12
4332 윈 도 우| OneDrive 설치 방지, Microsft Edge 바로가기 생성 방지 [3] 무월 1040 11 06-23
4331 소프트웨어| MPRESS 압축풀기-3 [5] sunshine 1041 6 09-29
4330 소프트웨어| (ver 0.2) 크롬/엣지에서 URL 드래그 드롭으로 제목 얻기 [11] 메리아 1044 12 02-08
4329 모 바 일| *스마트폰 카메라로 촬영한 사진과 동영상을 SD카드에 저... murimgasa 1048 1 08-13
4328 윈 도 우| [수정] RegOwnership 이용 : 레지소유권 얻기 <--> ... [9] 레마클로 1052 9 04-18
4327 소프트웨어| [포토샵] Auto Blend Layers를 이용한 얼굴 합성 [5] 무월 1053 14 04-03
4326 윈 도 우| 측면 버튼에 등록된 돋보기 기능... 기본값으로 복원 [2] 사가르마타 1058 0 02-10
4325 소프트웨어| Total Commander에서 선택목록 저장하기 [10] 줄리아니 1066 4 08-04
4324 윈 도 우| PE 수정 스크립트 호환 ADD폴더 생성하기 [3] 히이이잌 1067 15 09-29
XE1.11.6 Layout1.4.8