윈 도 우 작업표시줄자동숨김 on/off
2020.02.27 20:46
https://windowsforum.kr/qna/12910136
윗 글에 대한 답변 입니다.
고수님들이 답변 해야 할 것을 부족한 사람이 하려니 힘드네요(?)
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects3]
@=""
"Settings"=hex:30,00,00,00,fe,ff,ff,ff,03,10,00,00,03,00,00,00,3e,00,00,00,28,\
00,00,00,00,00,00,00,10,04,00,00,80,07,00,00,38,04,00,00,60,00,00,00,01,00,\
00,00
02 <-->03
const HKEY_CURRENT_USER = &H80000001
Set WSHShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
curDir = objFSO.GetParentFolderName(WScript.ScriptFullName)
strREfile = curDir & "\RestartExplorer.exe"
strComputer = "."
Set regObj=GetObject( _
"winmgmts:{impersonationLevel=impersonate}!\\" & _
strComputer & "\root\default:StdRegProv")
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects3"
'-------- array elements starts from 0 ~
regObj.GetBinaryValue HKEY_CURRENT_USER, strKeyPath, "Settings", bArray
'-------- Changing value
'bArray(8) = 7
'regObj.SetBinaryValue HKEY_CURRENT_USER, strKeyPath, "Settings", bArray
if bArray(8) = 2 then
WSHShell.Run("regedit.exe /s 작업표시줄자동숨김on.reg"), 0, True
wscript.echo "작업표시줄자동숨김해요. ^^"
else
WSHShell.Run("regedit.exe /s 작업표시줄자동숨김off.reg"), 0, True
wscript.echo "작업표시줄자동숨김 안해요. ^^"
End If
WSHShell.Run Chr(34) & strREfile & Chr(34), 1
Set WSHShell = Nothing
댓글 [10]
-
夜花 2020.02.27 21:15 -
레마클로 2020.02.27 21:23 '-------- Changing value
'bArray(8) = 3
'regObj.SetBinaryValue HKEY_CURRENT_USER, strKeyPath, "Settings", bArray
하세요.
식당들 죽을 맛입니다.
-
夜花 2020.02.27 21:28 한개의 파일로 묶을 수는 없는지요?
7sfx 사용 단일 파일로 처리해야 하나...
-
레마클로 2020.02.27 22:08 const HKEY_CURRENT_USER = &H80000001
Set WSHShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
curDir = objFSO.GetParentFolderName(WScript.ScriptFullName)
strREfile = curDir & "\RestartExplorer.exe"
strComputer = "."
Set regObj=GetObject( _
"winmgmts:{impersonationLevel=impersonate}!\\" & _
strComputer & "\root\default:StdRegProv")
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects3"
regObj.GetBinaryValue HKEY_CURRENT_USER, strKeyPath, "Settings", bArray
if bArray(8) = 2 then
bArray(8) = 3
regObj.SetBinaryValue HKEY_CURRENT_USER, strKeyPath, "Settings", bArray
wscript.echo "작업표시줄자동숨김해요. ^^"
else
bArray(8) = 2
regObj.SetBinaryValue HKEY_CURRENT_USER, strKeyPath, "Settings", bArray
wscript.echo "작업표시줄자동숨김 안해요. ^^"
End If
WSHShell.Run Chr(34) & strREfile & Chr(34), 1
Set WSHShell = Nothing
단일파일 작업은 직접하세요^^
-
지후빠 2020.02.27 23:34
레마클로님 잠깐 사이에 추가로 올리셨네요? 공부겸 정리해서 왔는데.. ^^;
야화님이 원하시는 단일화가 이런 것인가요? 검색해서 Vbscript Only로 정리해보았습니다.
좀 더 정리했습니다. TaskbarHideToggle.vbs
-
夜花 2020.02.27 23:39 WoW~!
잘 동작하네요.
감사합니다.
ps:
실행하면 열려있던 탐색기 창이 사라지네요.
explorer 새로 고침하면서 정리가 되는 것 같습니다.
그냥 두고 테스크바만 없어졌다 나타나고하면 좋을텐데...
어렵겠죠?
-
레마클로 2020.02.28 00:00 Restart Explorer v1.4 이게 필요합니다.
-
지후빠 2020.02.28 09:20
Restart Explorer v1.4 을 사용하는 이유가 있었군요. ^^
창 개수와 창 위치를 저장하는 공부 좀 해야 될 것 같습니다. ㅎ_ㅎ
-
레마클로 2020.02.28 17:27 구글 검색 해보니
실행중인 프로세스를 리스트화 했다가
재실행 해주는 스크립트가 있었던 것도 같습니다.
-
레마클로 2020.02.28 00:02 깔끔합니다^^.
번호 | 제목 | 글쓴이 | 조회 | 추천 | 등록일 |
---|---|---|---|---|---|
[공지] | 강좌 작성간 참고해주세요 | gooddew | - | - | - |
4301 | 윈 도 우| 우클릭 [새로 만들기] 날짜로 폴더/파일 만들기 [24] | 지후빠 | 1442 | 23 | 05-26 |
4300 | 윈 도 우| 포맷없이 , diskpart 작업 없이 기존 디스크에 EFI 파티션 ... [13] | heykevin | 3408 | 23 | 12-30 |
4299 | 소프트웨어| 드라이브 문자 할당/제거 배치파일 [17] | 지후빠 | 1964 | 23 | 09-12 |
4298 | 소프트웨어| 폴드를 Y드라이브로 인식 시키기 [12] | 그루터기 | 2046 | 23 | 03-11 |
4297 | 윈 도 우| 무대뽀 UEFI 부팅 USB만들기 [18] | PC_Clinic | 4282 | 23 | 12-05 |
4296 | 윈 도 우| 배치파일로 UEFI 부팅 오류 복구하기 [12] | gooddew | 2873 | 23 | 08-06 |
4295 | 윈 도 우| 탐색기 내장명령어 우클릭에 추가하기 [12] | 지후빠 | 2000 | 23 | 02-27 |
4294 | 윈 도 우| 설치된 기본프린터 확인 및 테스트페이지 인쇄 vbscript [25] |
|
2553 | 23 | 01-14 |
4293 | 소프트웨어| Primo Ramdisk 사용하기 [14] | 하늘보기 | 17733 | 23 | 05-27 |
4292 | 윈 도 우| PE에 드라이버 통합하기 (WIM 파일 압축 및 해제하기) [18] | Wanderer | 34050 | 23 | 02-02 |
4291 | 윈 도 우| win7.wim+win8.wim이미지 통합부터 usb멀티 부팅 까지~(여... [35] | 까칠올챙이 | 39980 | 23 | 02-21 |
4290 | 소프트웨어| PE 환경에서 AOMEI Backupper 구동을 위한 파일, 레지스트... [11] | 무월 | 1300 | 22 | 12-27 |
4289 | 소프트웨어| Microsoft Edge IE모드 구성하기 [10] | 무월 | 1838 | 22 | 08-26 |
4288 | 윈 도 우| Internet Explorer 11 강제 실행 [15] | 무월 | 2623 | 22 | 06-10 |
4287 | 윈 도 우| _Launch.exe 를 PE 에 적용해보기 [14] | 지후빠 | 2015 | 22 | 04-15 |
4286 | 기 타| CMD BAT 를 UTF8 모드로 사용 [13] | 입니다 | 1661 | 22 | 01-16 |
4285 | 윈 도 우| [실사 ] 부트 메뉴에 PE 등록 하기 | Recovery 생성 백업&a... [14] | 무월 | 2454 | 22 | 12-10 |
4284 | 윈 도 우| Windows 10에서 Windows 11 업데이트(업그레이드)를 차단하... [5] | heykevin | 2611 | 22 | 12-09 |
4283 | 윈 도 우| 윈도우 부팅 오류 해결 [16] | 메인보드 | 2206 | 22 | 03-11 |
4282 | 윈 도 우| 윈도우 업데이트 활성화/비활성화 (요청) [14] | 슈머슈마 | 2577 | 22 | 12-28 |
아낌없는 지식 나눔에 감사드립니다.
오토잇으로는 간단하게 처리가 되는데...
오토잇은 바이러스 오진을 벗어 날 수가 없어...
vbscript는 무뇌안이라 도움을 청했더니
이렇게 복잡하네요.