게시판홈 / 낙서장 / 홈피 팁으로 채택해주세요~ flash control새글쓰기 답글쓰기
 이동: 1 | 2
저자 홈피 팁으로 채택해주세요~ flash control
Anonymous (0)
비회원
  게시일: 2004-07-06 11:18||
플래시 컨트롤입니다.
누르면 보이고
또 누르면 안보입니다.
즐겨찾기에 연결에 넣어두면 됩니다.

우선 운영자님이 올리신 자료와 다른 점이
있다면 플래시 사라진 부분이 조금 더
깔끔합니다.
또 새창을 자동으로 새창을 띄우고
이전 창을 꺼서 익스를 새로 켤 필요가 없다는 장점.

Dim WSHShell, a
Set WSHShell=WScript.CreateObject("WScript.Shell")

Const Reg_key="HKLM\SOFTWARE\Classes\CLSID\{D27CDB6E-AE6D-11cf-96B8-444553540000}\MiscStatus\1\"
a=WSHShell.RegRead(Reg_key)
a=132497- a
WSHShell.RegWrite Reg_key, a


WshShell.SendKeys "^n"
WScript.Sleep 1500
WshShell.SendKeys "%{tab}"
WScript.Sleep 1000
WshShell.SendKeys "%{f4}"

이걸 메모장에 저장 후
vbs파일로 저장해서 즐겨찾기-연결 폴더에 넣어줍니다.

레지스트리 키 값이 운영자님 키하고 다릅니다.
플래시 관련 유틸들을 분석해서 찾아냈습니다. 뭐... 차용이라고 좋게 생각하셨으면...

고쳐주실 부분은
이부분인데 제가 win2003이라
다른 윈도우에서 새창띄우고
이전창 닫는 것이 원활하지 않을 수도
있습니다.

WshShell.SendKeys "^n"
이건 컨트롤 n을 누르는 것이고
WScript.Sleep 1500
1.5초 쉬라는 말입니다.
WshShell.SendKeys "%{tab}"
알트 탭을 누르라는 말
WScript.Sleep 1000
WshShell.SendKeys "%{f4}"
알트 f4를 누르라는 말

조금씩 고쳐주시면 됩니다.

괜찮을 것 같으면 운영자님 채택해주세요^^

-나무늘보 민이
Anonymous (0)
비회원
  게시일: 2004-07-06 12:03||
예...
이 것도 확인후 팁으로 등록해두도록 하겠습니다.
Anonymous (0)
비회원
  게시일: 2004-07-06 18:47||
오예! 새로운 팁들. 멋집니다. 그리고 고맙습니다. ^^

저를 포함한 대부분의 사람들이
이미 올려진 팁들을 보고 고대로 적용하거나, 그걸 응용하는 수준일진데

초보자의 입장에선 "멋지다." 라는 말밖에는
안나오는군요. 좋은정보 고맙습니다.
Anonymous (0)
비회원
  게시일: 2004-07-06 18:49||
아 말실수를 한 거 같아서 정정합니다-_-

대부분의 사람들이 저와 비슷한 수준이라는 말이 아니라,

저와 같은 초보분들도 많다는 뜻으로 얘기한 거에요. (-_-; 하핫.

Anonymous (0)
비회원
  게시일: 2004-07-07 12:53||
인용!

플래시 컨트롤입니다.
누르면 보이고
또 누르면 안보입니다.
즐겨찾기에 연결에 넣어두면 됩니다.

님의 글은 인터넷 탐색기에서 플래쉬 토글하기 II에 올려두었습니다.

좋은 정보 감사합니다. 그럼.
Anonymous (0)
비회원
  게시일: 2004-07-07 13:16||
도아님
중요한 오타가 발견되어서 답글을 답니다.

나무늘보인데 나무늘"포'로 되어있네요.

^^ (참고로 전 나무늘보님 아닙니다.)
Anonymous (0)
비회원
  게시일: 2004-07-07 13:22||
인용!

도아님
중요한 오타가 발견되어서 답글을 답니다.

나무늘보인데 나무늘"포'로 되어있네요.

^^ (참고로 전 나무늘보님 아닙니다.)

예. 수정해 두었습니다.
Anonymous (0)
비회원
  게시일: 2004-07-15 06:22||
운영자님이 붙이신 이름으로 검색을 했더니 외국 싸이트에서 좋은 자료를 찾을 수 있었습니다.
훑어보니 제가 올린 것보다 더 나은 것 같습니다.
메시지도 나오고
ie에 버튼도 만들고 아이콘 색깔도 바뀌는
모양이군요...

vbs파일의 마지막에
WshShell.SendKeys "^n"
WScript.Sleep 1500
WshShell.SendKeys "%{tab}"
WScript.Sleep 1000
WshShell.SendKeys "%{f4}"

를 추가해주시면 금상첨화가 될 듯 합니다.


http://www.jamesmcgregor.com/flashtoggle.zip

(아 예비군 싫다...
밴딩하고 모자는 왜 항상 사라지는 걸까...)
Anonymous (0)
비회원
  게시일: 2004-07-15 07:34||
인용!

운영자님이 붙이신 이름으로 검색을 했더니 외국 싸이트에서 좋은 자료를 찾을 수 있었습니다.
훑어보니 제가 올린 것보다 더 나은 것 같습니다.
메시지도 나오고
ie에 버튼도 만들고 아이콘 색깔도 바뀌는
모양이군요...

확인해 봤습니다. 민이님이 올리신 자료와 별 다를 것이 없습니다. 현재 상태값을 구하는 로직은 오히려 민이님의 소스가 더 낫습니다.

한가지 아이콘이 지정된다는 것인데, 아이콘 지정이야 vbs 파일을 바로 가기로 만들고 아이콘을 지정하면 됩니다.

마지막으로 현재 창을 자동으로 띄우는 기능도 없으므로 굳이 변경할 필요는 없다고 봅니다.

물론 설치 파일이 있으므로 초보자에게 유용할 수는 있지만 굳이 팁을 변경할 필요는 없는 것 같습니다.
Anonymous (0)
비회원
  게시일: 2004-09-01 15:27||
팁 멋집니다..
네온사인을 연상캐하는 요즘 대부분의 사이트들에서 CPU사용율 50%를 넘던것이 팁 적용후엔 1-3%로 떨어졌습니다
클릭 한번으로 창도 다시 띄워주고하니.. 사용하지 않을 이유가 없네요-

좋은정보 감사드립니다
이래서 qaos엔 매일 안올수가 없군요
다음글: 옛날 생각. . . . . (0)3943lee0do2005-08-18
이전글: CherryOS... 나오긴 나왔네요... (0)4168xeon2005-03-10

 이동: 1 | 2
새글쓰기 답글쓰기
이동:

세상사는 이야기



RSS 구독 (익명 | 회원 | 강좌 | 포럼)
(C) 1996 ~ 2017 QAOS.com All rights reserved.