2015-01-28 2 views
0

HTA 파일에 단추가 있습니다. 특정 문자열을 검색 한 다음 결과를 출력합니다. (Thanks for @Ansgar Wiechers) 메시지 상자를 표시하는 대신이 HTA 창 옆에 결과를 출력하고 싶습니다. 결과는 공백을 채 웁니다. "_____ 모드에 있습니다"팝업 메시지 상자 대신 HTA 창에서 결과를 출력하는 방법은 무엇입니까?

어떻게하면됩니까?

<html> 
<head> 
<title></title> 
<HTA:APPLICATION 
    APPLICATIONNAME="" 
    ID="" 
    VERSION="1.0"/> 
</head> 

<script language="VBScript"> 

Sub RUNCURRENTMODE 
     Set xml = CreateObject("Msxml2.DOMDocument.6.0") 
xml.async = False 
xml.load "C:\aaa\settings.xml" 

If xml.ParseError Then 
    MsgBox xml.ParseError.Reason 
    self.Close() 'or perhaps "Exit Sub" 
End If 

For Each n In xml.SelectNodes("//CSVName") 
    Select Case n.Attributes.GetNamedItem("Value").Text 
    Case "standard.csv"  : MsgBox "This is standard." 
    Case "non-standard.csv" : MsgBox "This is non-standard." 
    Case Else    : MsgBox "Unexpected value." 
    End Select 
Next 
End Sub 

</script> 

<body bgcolor="buttonface"> 
<center> 
<p><font face="verdana" color="red">YOU ARE CURRENTLY IN STANDARD CSV MODE</font></p> 
<input id=runbutton class="button" type="button" value="CURRENT MODE" name="db_button" onClick="RUCURRENTMODE" style="width: 170px"><p> 
</center> 


</body> 
</html> 
+0

HTTP 또는 스팬은, 이후 당신은 텍스트의 일부를 업데이트 할 : //stackoverflow.com/questions/38273847/boot-mode-legacy-uefi-from-hta-in-winpe – CompMaster

답변

2

는 일반적으로 당신은 예를 들어, HTA의 <body> 섹션으로 ID로 단락을 요소를 넣어 것입니다.

<body> 
<p>You are in <span id="FOO"></span> mode</p> 
</body> 

와 함수에서 해당 ID를 가진 요소의 값을 변경 : 내가 여기에 비슷한 질문이

Select Case n.Attributes.GetNamedItem("Value").Text 
    Case "standard.csv"  : FOO.innerText = "standard." 
    Case "non-standard.csv" : FOO.innerText = "non-standard." 
    Case Else    : MsgBox "Unexpected value." 
End Select 
+0

Perfect !!! 정말 고마워. –

관련 문제