핑테스트 하는것


Edit 부분에 키입력이 안되게끔 가능한가요? ^^;;

; ******************* 추가적인 내용이 필요한 부분
; * IP /
; 1. 키보드 후킹 기능을 이용하여 Edit 입력란에 키보드 입력을 막는다.
; 2. 적절한 컬러를 넣는다.
; 3. 시작시 IP할당과 오류만 수집, 정상만 수집, 모두 수집의 옵션 설정을 추가한다.
; ******************* 이정도 기능적인 부분이 추가된다면 괜찮겠죠?

Gui, Add, Edit, x6 y40 w600 h360, 에디트
Gui, Add, Text, x6 y10 cBlue IP, IP : %A_IPAddress1%
Gui, Show, x398 y110 h380 w610, 핑테스트

loop
 {
 sleep, 2000
 runwait, %comspec% /c "%systemroot%\system32\ping 164.124.101.2 -n 1 > C:\Ping.txt",, hide
 ;FileRead, ping, C:\ping.txt
 ;msgbox, %ping%
 FileReadLine, ping, C:\ping.txt, 7
 ;filedelete, C:\ping.txt
 Ifinstring, Ping, Request
  {
  clipboard=%A_Mon%월 %A_MDay%일 %A_Hour%시 %A_Min%분 %A_Sec%초 점검을 필시 받아봐야 합니다.
  controlsend, , {ctrldown}{v}{ctrlup}{enter}, 핑테스트 ahk_class AutoHotkeyGUI
  return
  }
 else
  {
  stringgetpos, pos1, ping, time
  stringtrimleft, TTL, ping, %pos1%
  stringgetpos, pos2, TTL, TTL
  StringLeft, Time, TTL, %pos2%
  Stringtrimleft, TTL, TTL, %pos2%
  Stringtrimright, time, time, 1

  timenum:=RegExReplace(time,"[^0-9]")
  if timenum=1
   {
   clipboard=%A_Mon%월 %A_MDay%일 %A_Hour%시 %A_Min%분 %A_Sec%초 자신의 컴퓨터 입니다.
   controlsend, , {ctrldown}{v}{ctrlup}{enter}, 핑테스트 ahk_class AutoHotkeyGUI
   }

  else if timenum>=50
   {
   clipboard=%A_Mon%월 %A_MDay%일 %A_Hour%시 %A_Min%분 %A_Sec%초 점검을 받아봐야 합니다.`n
   controlsend, , {ctrldown}{v}{ctrlup}{enter}, 핑테스트 ahk_class AutoHotkeyGUI
   }

  else
   {
   clipboard=   %A_Mon%월 %A_MDay%일 %A_Hour%시 %A_Min%분 %A_Sec%초 [ %ping% ]
   controlsend, , {ctrldown}{v}{ctrlup}{enter}, 핑테스트 ahk_class AutoHotkeyGUI
   }
  }

 }

IP:
return

^R::
reload
return

GuiClose:
ExitApp

^X::
ExitApp

'Study > AutoHotKey' 카테고리의 다른 글

한영 전환키 check  (0) 2011.10.18
Script> 좌표/색 도우미  (2) 2011.10.17
AHK 자주사용하는 명령어  (0) 2011.10.17
내장변수  (0) 2011.10.10
키보드 스캔코드  (0) 2011.10.10
Gui는 어렵다?  (0) 2011.10.09
정규 표현식 설명(예제포함)  (0) 2011.10.09
정규 표현식  (0) 2011.10.09
시계  (0) 2011.10.09
AutoHotKey  (0) 2011.10.09