소프트웨어 Everything 잘 아시는 분 질문드립니다.
2019.08.28 21:12
에블띵은 "탐색기 오른쪽 마우스메뉴에 검색 등록"이란 옵션이 있는데요.
설정하면, 폴더를 선택했을시만 메뉴가 뜹니다. 실행하면 해당 경로가 자동으로 에블딩 검색창에 입력되면서 실행되죠.
제가 구현하고 싶은 건, 폴더가 아닌 파일을 선택한 후 탐색이 오른쪽 마우스를 통해 에블띵을 실행하는 건데요.
이를테면
D:\Test\윈포.ZIP 이란 파일이 있고
윈포.ZIP을 선택 후 탐색기 오른마우스를 통해 에블띵으로 검색하면
에블띵 검색란에
<경로없이> 파일명인 <윈포.ZIP>만 검색란에 자동입력되면서 자동검색하게 만드는건데요.
레지스트리 수정을 통해 파일선택후 탐색기 오른마우스에 에블띵을 등록시키는 방법은 알고 있고요.
경로:\everything.exe[명령행인자]
단 저 명령행 인자를 어떻게 줘야하는지 모르겠더군요
이렇게 저렇게 하니.. 되긴 하는데
문제는 파일명만 입력되는 게 아닌 <경로:\파일명> 입력되면서 특정 경로서만 검색이 되는게 문제입니다.
경로없이
선택한 파일명으로만
또는 확장자없는 파일명으로만 검색되게 하고 싶거든요.
댓글 [7]
-
지후빠 2019.09.04 19:21
-
윈도면도 2019.09.05 03:40
답변 고맙습니다.
VBS가 정말 편리하긴 하네요.
잘 되는데요. 설명과 달리 확장자가 포함되네요
그리고 수시로 실행해야하는데 Send to를 거쳐야 하니깐 제 환경엔 맞지 않는 거 같습니다.
그런데...
(지후빠님 답변 내용과는 전혀 상관없이, 또 위에 언급한 문제점과는 별도로)
애초 이 질문글 자체가 잘못된 거 같습니다 ㅠㅠ
예상해서 올릴 때와는 달리 제가 예상했던 결과를 구현하기는 애초 무리였던 거 같습니다.
mp3 파일 경우 풀네임으로 검색되다보니... 동일한 파일이 아니고서야 내 하드내 비슷한 파일은 찾아지질 않네요.
자세하게 설명까지 해주셔서 너무 고맙습니다. VBS는 놔뒀다가 필요시에 응용해서 잘 사용해야겠네요.
-
지후빠 2019.09.05 07:08
수정해서 올리면서 wExt = 1 로 바뀐 것 같습니다 wExt = 0 으로 바꿔 보세요. 출근해서 확인해볼께요 ^^
첨부파일 수정해서 기본 wExt = 0 으로 수정했습니다.
-
윈도면도 2019.09.05 14:03
확장자 없이 잘 됩니다. 근데 보내기로 보내는 건 불편해서 컨텍스트메뉴에 바로 뜨게 레지에 등록해봤는데, 그렇게는 실행이 안되네요.
암튼 여러모로 감사드립니다.
-
지후빠 2019.09.05 18:16
context menu에 등록할때 다음 예처럼 앞에 wscript.exe 추가하세요.
wscript.exe c:\Search_in_Everything.vbs "%1"
context menu에 추가하는 예제 파일(reg) 첨부했습니다. 메모장으로 열어서 경로와 단축키 등을 자신에 맞게 수정하세요~.
-
윈도면도 2019.09.08 10:01
지후빠님 잘 됩니다. 아주 편리하네요.
요즘 조국 때문에 정신 팔려 글 올린 걸 잊어버렸어요. 오늘에서야 댓글 보고 테스트 해봤습니다.
VBS에 대해선 무지의 극치로 간단한 수정도 불가하여 재질문 드릴 수밖에 없는데요.
간단한 거 두가지만 추가로 여쭤볼께요
1. VBS 문서안에 나중에 보더라도 기억나고 참고되게끔 나만의 주석을 달아놓으려하는데요.
문장 맨앞에 어떤 기호를 붙여햐 하나요?
// 주석 쓰기 "//" 이거인가요?
2. 에블띵보면 -noww 스위치가 있습니다. 단어의 일부만 맞아도 결과에 출력하는 기능이죠.
현재의 검색은 거의 '동일파일명 찾기'에 가깝기에 결과의 폭을 넓히기 위해 저 스위치를 사용하려 하는데요.
esPath = """D:\Comn\FileDisk\Manage\Everything_p\everything.exe"""
" 이거 때문에 스위치가 인식을 못하는군요. "를 어떻게 기입해줘야하는지를 모르겠네요.
-
지후빠 2019.09.08 14:29
안녕하세요.
1. Apostrophe ['], 주석문(설명문)을 표현할 때에는 홑따옴표(작은따옴표) 하나를 사용합니다.
2. -s 옵션 상태에선 -noww 있으나 없으나 결과는 같은 것 같습니다만...
스크립트 내용중 objShell.Run esPath & " -s " & """" & fName & """" 에서
" -s " 을 " -noww -s " 으로 수정하면 될 것 같습니다.
번호 | 제목 | 글쓴이 | 조회 | 등록일 |
---|---|---|---|---|
[공지] | 질문과 답변 게시판 이용간 유의사항 | gooddew | - | - |
96813 | 소프트웨어| 100가구 아파트 관리비 회계,정산 프르그램 있으신분 [2] | 청주 | 898 | 05-02 |
96812 | 소프트웨어| 우인님 PE ventoy실행시 화면입니다 [3] | 레드2 | 1237 | 05-02 |
96811 | 윈 도 우| 블루투스 헤드폰 쓰면 스테레오 믹스 사용 못하나요? | 짬타이거 | 257 | 05-02 |
96810 | 소프트웨어| 파이어폭스 사용하시는분 계신가요? [21] | 추추추 | 503 | 05-02 |
96809 | 기 타| 아이폰과 안드 어뎁티브 뭐잘하는 이어폰 추천해주시면 감... | 고양이뜰채 | 79 | 05-02 |
96808 | 하드웨어| 5600x 사용하는데 램 문의 [17] | 한스 | 611 | 05-01 |
96807 | 모 바 일| 카톡에 대해 문의합니다. [7] | 햇님 | 468 | 05-01 |
96806 | 윈 도 우| 엣지도 크롬처럼... [9] | 익덕이 | 757 | 05-01 |
96805 | 하드웨어| 노트북 패널이 크랙에 멍이졌네요. [4] | 솔라 | 379 | 05-01 |
96804 | 서버 / IT| 바이오스 설정하면 부팅속도 높아지나요? [4] | 놋지미 | 717 | 05-01 |
96803 | 윈 도 우| pe 바로가기 아이콘 | 잘부탁드립 | 178 | 05-01 |
96802 | 소프트웨어| sumatrapdf 윈도우11 바탕화면에 미리보기 썸네일 기능은 ... | 살며사랑하 | 104 | 05-01 |
96801 | 윈 도 우| 이런 단축키는 없을까요? [2] | fkjin | 246 | 05-01 |
96800 | 소프트웨어| explorer patcher를 설치하고는, 윈키를 누르면 늦게 뜨네요? [1] | brucex | 135 | 05-01 |
96799 | 소프트웨어| 패키지를 파싱하는데 문제가 발생했습니다... -안드로이드 [4] | 삼바바 | 344 | 05-01 |
96798 | 소프트웨어| 특정 프로그램의 트래픽을 막는 법 [2] | 스파파파파파 | 245 | 05-01 |
96797 | 하드웨어| hp Elitedesk 800 G4 mini 사무용 컴퓨터 커넥터 질문요 [1] | 열린하늘 | 187 | 05-01 |
96796 | 윈 도 우| 윈도우 비슷한 놈 svf 파일 구합니다. | 네트워크빌 | 121 | 05-01 |
96795 | 소프트웨어| 혹시 한글 2005 CD 가지고 계신 분 있나요? [1] | VirtualWin | 399 | 04-30 |
96794 | 기 타| 아이폰용 이어폰은 겔럭시에서폰에서 인식이 안되나요? [3] | 해운50 | 315 | 04-30 |
안녕하세요. 우클릭 메뉴 - 보내기 항목에 VBS를 추가하는 방법은 어떠신가요?
첨부 파일 Search_in_Everything.vbs 을 c:\Users\
사용자\AppData\Roaming\Microsoft\Windows\SendTo\아래에 복사하고 탐색기에서 파일이나 폴더를 우클릭 -> 보내기 -> Search_in_Everything 선택하면 됩니다.
아래는 스크립트 내용인데요.
Dim objShell
Set objShell = WScript.CreateObject("WScript.Shell")
esPath = """d:\PortableApps\Everything\Everything.exe""" <- 각자에 맞는 Everything 전체 경로를 입력
wExt = 0 <- 확장자까지 같이 검색하려면 1로 바꾸세요.
strPath = wscript.Arguments.Item(0)
mrk = InStrRev(strPath, "\")
If mrk > 0 Then
strName = Right(strPath, Len(strPath) - mrk)
prd = InStrRev(strName, ".")
If prd > 0 and wExt = 0 Then
fName = Left(strName, prd - 1)
Else
fName = strName
End If
objShell.Run esPath & " -s " & """" & fName & """"
End If
Set objShell = Nothing