ÁöÁ¤µÈ ¸í·ÉÀÌ ºÒ¸íÈ®ÇÑ »óÅÂÀΰ¡¸¦ ³ªÅ¸³»´Â ºÎ¿ï°ªÀ» ¹ÝȯÇÑ´Ù.

Àμö/ÆĶó¸ÞÅÍ
expression (Ç¥Çö½Ä : expression)
ÇʼöÀûÀÎ ¿ä¼ÒÀ̸ç, Àû¿ë ¸ñ·Ï¿¡ ÀÖ´Â Çϳª ÀÌ»ó °³Ã¼¸¦ ¹ÝȯÇϴ ǥÇö½ÄÀÌ´Ù.
sCmdID : (¸í·É¾î ÀνÄÀÚ)
ÇʼöÀûÀÎ ¿ä¼ÒÀ̸ç, command Identifiers¸¦ ÁöÁ¤ÇÏ´Â ¹®ÀÚ¿­ÀÌ»ç.
¹Ýȯ°ª

¸í·É¾î »ç¿ëÀÌ °¡´ÉÇÑ°¡¸¦ ºÎ¿ï°ªÀ¸·Î ¹ÝȯÇÑ´Ù.

true ±× ¸í·É¾î°¡ ºÒ¸íÈ®ÇÑ »óÅ¿¡ ÀÖ´Ù.
false ±× ¸í·É¾î°¡ ºÒ¸íÈ®ÇÑ »óÅ¿¡ ÀÖÁö ¾Ê´Ù.
Àû¿ë
°³Ã¼scriptIE
ÂüÁ¶
execCommand queryCommandEnabled queryCommandIndeterm queryCommandState queryCommandSupported queryCommandText queryCommandValue

ÁÖ¾îÁø ¸í·É¿¡ µû¸¥ °ü·Ã °ªÀ» µð½ºÇ÷¹ÀÌÇÑ´Ù.

<BUTTON onClick="QueryCommand()">¸í·É¿¡ µû¸¥ °ü·Ã °ª ¾ò±â</BUTTON>

<SCRIPT language=VBScript>
Sub QueryCommand()  '¸í·ÉÀÌ ºÒ¸íÈ®ÇÑ »óŸ¦ ¹ÝȯÇߴ°¡¸¦ Ãâ·ÂÇÑ´Ù.
  Dim objApp As FrontPage.Application
  Dim objDoc As DispFPHTMLDocument
  Dim strUser As String
  Dim strYN

  Set objApp = FrontPage.Application
  Set objDoc = objApp.ActiveDocument
  strUser = InputBox("¼öÇàÇÒ ¸í·ÉÀ» ÀÔ·ÂÇ϶ó.")
    If objDoc.queryCommandIndeterm(cmdID:=strUser) = True Then
      strYN="ÀÌ´Ù."
    Else
      strYN="°¡ ¾Æ´Ï´Ù."
    End If
    MsgBox "ÀÌ ¸í·É(" & strUser & ")ÀÌ  ºÒ¸íÈ®ÇÑ »óÅÂ" & strYN
End Sub
</SCRIPT>