[VBScript] Send Key 사용하는 방법 (엔터키)
- 기타
- 2015. 12. 8.
VBScript Send Key 사용하는 방법
VBScript는 인터넷 익스플로러에서만 작동하므로 요즘에는 사용을 하지 않는다. 그러나 윈도우에서 제공하는 다양한 함수를 사용할 수가 있어서 IE에서만 동작하는 웹페이지라면 사용을 할 수 있다.
다음은 "Send Keys" 버튼을 누르면 Input박스에 "Hello World!" 키 값을 넣고 엔터키를 입력 후 메시지 박수를 호출는 예제이다.
<html> <head> <title></title> <script type="text/vbscript"> Sub btnSendKey_OnClick() Dim WshShell txtHello.focus Set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "Hello World!" WshShell.SendKeys "{ENTER}" End Sub Sub txtHello_OnKeyUp() If window.event.keycode = 13 Then MsgBox txtHello.value End If End Sub </script> </head> <body bgcolor="#c0c0c0"> <button id="btnSendKey">Send Keys</button><br /><br /> <input id="txtHello" width="300px" /> </body> </html>