Динамически добавлять и удалять компоненты HTA

Может ли кто-нибудь помочь мне в динамическом удалении текстовых полей в HTA?Динамически добавлять и удалять компоненты HTA

Этот код добавляет Textboxes динамически:

Sub AddTextBox 
    strHTML = DataArea.InnerHTML strHTML=strHTML&"<tr><td>Source Path</td><td><input type="&Chr(34)& _ "text"&Chr(34)&">"&"</td><td><button type="&Chr(34)&"button"&Chr(34)& _ "onclick="&Chr(34)&"RemoveTextBox"&Chr(34)&">"&"x"&"</button></td></tr>" 
    DataArea.InnerHTML = strHTML 
    tabHTML = tabHTML & strHTML 
End Sub

источник

2013-03-24 Tjs

Вы хотите удалить все 'tr' или' input' только? – Teemu

Я считаю, что это похоже на то, что вы ищете, это будет по крайней мере дать вам рабочий пример можно построить с. Подпрограмма Window_OnLoad загружает исходное содержимое, а затем созданный контент содержит кнопку, которая при нажатии удаляет текстовое поле/кнопку и добавляет новую кнопку с пометкой Add Again?. Эта новая кнопка снова может вызвать подпрограмму Window_OnLoad и перезагрузить исходное содержимое.

<html> 
<head> 
<title>Dynamically Add Controls</title> 
<HTA:APPLICATION 
    APPLICATIONNAME="Dynamically Add Controls" 
    ID="Dynamically_Add_Controls" 
    VERSION="1.0"/> 
</head> 

<script language="VBScript"> 

Sub Window_OnLoad 
    strHTML = "<tr><td>Source Path</td><td><input type="& Chr(34)& "text"&Chr(34)&">"&"</td><td><button type="&Chr(34)&"button"&Chr(34)& "onclick="&Chr(34)&"RemoveTextBox"&Chr(34)&">"&"Remove All?"&"</button></td></tr>" 
    DataArea.InnerHTML = strHTML 
End Sub 

Sub RemoveTextBox() 
    strHTML = "<td><button type="&Chr(34)&"button"&Chr(34)& "onclick="&Chr(34)&"Window_OnLoad"&Chr(34)&">"&"Add Again?"&"</button></td></tr>" 
    DataArea.InnerHTML = strHTML 
End Sub 

</script> 

<body bgcolor="white"> 
    <table border="0" cellspacing="0" cellpadding="0"> 
     <tr> 
      <td valign="top"><Div id="DataArea"></Div></td> 
     </tr> 
    </table> 
</body> 
</html>

источник

2013-05-31 22:44:03

Динамически добавлять и удалять компоненты HTA

ответ

Смежные вопросы