윈 도 우 작업표시줄자동숨김 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 | - | - | - |
3646 | 소프트웨어| Rollback RX Tip [1] | 누군가 | 1030 | 3 | 03-20 |
3645 | 기 타| 보안 부팅 위반 [19] |
|
3014 | 2 | 03-20 |
3644 | 윈 도 우| CapsLock-toggle [7] |
|
704 | 4 | 03-20 |
3643 | 기 타| 유튜브에서 채널, 비디오 차단하기 [4] | 빛나는길 | 1686 | 17 | 03-19 |
3642 | 윈 도 우| 인터넷 ON/OFF [12] |
|
3166 | 12 | 03-18 |
3641 | 소프트웨어| 간단한 USB 로 UEFI 와 MBR 로 부팅 방법 [13] | 맹물 | 4059 | 8 | 03-18 |
3640 | 소프트웨어| USB 로 UEFI 와 MBR 로 부팅 되도록 ISO 파일 설치하기 [42] | 좋은이웃 | 7108 | 57 | 03-17 |
3639 | 윈 도 우| PE에서 Edge 즐겨찾기 유지하기 [26] | 선우 | 1295 | 12 | 03-16 |
3638 | 기 타| [추가2] 파일/폴더들을 새로운 폴더 만들어 이동 VBS [13] | 지후빠 | 1298 | 10 | 03-15 |
3637 | 윈 도 우| WinRE 복구에 대해서.............. [4] | 밤이슬216 | 1424 | 8 | 03-15 |
3636 | 서버 / IT| Wireless PXE 부팅 서버 구축하기 [6] | gooddew | 1404 | 6 | 03-14 |
3635 | 소프트웨어| UEFI 시스템 디스크 복사하기 ( TrueImage ) [10] | gooddew | 2431 | 22 | 03-14 |
3634 | 소프트웨어| Total Commander 9.5x 32비트 및 64비트용 한국어 확장 메... [11] | VenusGirl | 4727 | 25 | 03-13 |
3633 | 윈 도 우| 윈도우8.1키를 찾아보았습니다. [7] | 하늘은높고 | 1505 | 6 | 03-12 |
3632 | 윈 도 우| 메모장으로 텍스트 스크랩 편하게하기 [5] |
|
1650 | 5 | 03-12 |
3631 | 윈 도 우| Windows 10 제품 키를 찾는 방법 [11] | VenusGirl | 11181 | 10 | 03-12 |
3630 | 소프트웨어| 텍스트를 음성으로 읽기 VBScript [25] | 지후빠 | 1664 | 10 | 03-11 |
3629 | 윈 도 우| 카조님의 PrincePE_V36 버전을 USB에 마무리 하는 방법입... [36] | 하늘은높고 | 3887 | 36 | 03-10 |
3628 | 윈 도 우| 카리스마조님 마지막 PrincePE USB만들기 입니다. [27] | 하늘은높고 | 3419 | 33 | 03-10 |
3627 | 윈 도 우| Win10XPE 시스템 속성 컴퓨터 이름 [12] |
|
2482 | 16 | 03-07 |
아낌없는 지식 나눔에 감사드립니다.
오토잇으로는 간단하게 처리가 되는데...
오토잇은 바이러스 오진을 벗어 날 수가 없어...
vbscript는 무뇌안이라 도움을 청했더니
이렇게 복잡하네요.