ÁöÁ¤ÇÑ ¸í·É¿¡¼­ ¹®¼­, ¹üÀ§³ª ¼±ÅÃÀÇ ÇöÀç °ªÀ» ¹ÝȯÇÑ´Ù.

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

¹Ýȯ°ª vValÀº Áö¿øµÇ¸é ¹®¼­, ¹üÀ§ ȤÀº ÇöÀç ¼±ÅÃÀ¸¸® ¸í·ÉÀÇ °ªÀ» ¹ÝȯÇÑ´Ù.
°¡´ÉÇÑ °ªµéÀº command Identifiers ÁßÀÇ ÇϳªÀÌ´Ù.
ÁöÁ¤µÈ ¸í·ÉÀÌ Áö¿øµÇÁö ¾ÊÀ¸¸é ÀÌ ¸Þ¼­µå´Â ºÎ¿ï°ª 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 strValue As String

  Set objApp = FrontPage.Application
  Set objDoc = objApp.ActiveDocument
  strUser = InputBox("¼öÇàÇÒ ¸í·ÉÀ» ÀÔ·ÂÇ϶ó.")
  strValue = objDoc.queryCommandValue(strUser)
  MsgBox "ÁöÁ¤ÇÑ ¸í·ÉÀÇ °á°ú°ªÀº " & strValue
End Sub
</SCRIPT>