标题: [已解决]HTA相关的一个问题？（不好表达...） [打印本页]
作者: jmz573515 时间: 2007-6-23 15:30 标题: [已解决]HTA相关的一个问题？（不好表达...）
<script language="VBScript">
sub yes
msgbox "此处应该怎么写才能使“系别”里显示为“英语”？（不知道可不可以做到？）或者是怎么可以通过按钮控制往xibie里面添加内容？"
end sub
sub tuichu
self.close
end sub
</script>
<body>
系别：<select size="1" name="xibie" onChange="">
<option value="0">电子学</option>
<option value="1">计算机</option>
<option value="2">物理</option>
<option value="3">数学</option>
</select>
<p>
<input type="button" STYLE='WIDTH:85' value="确定" name="queding" onClick="yes">
<body>
[ Last edited by jmz573515 on 2007-6-23 at 07:54 PM ]sub yes
msgbox "此处应该怎么写才能使“系别”里显示为“英语”？（不知道可不可以做到？）或者是怎么可以通过按钮控制往xibie里面添加内容？"
end sub
sub tuichu
self.close
end sub
</script>
<body>
系别：<select size="1" name="xibie" onChange="">
<option value="0">电子学</option>
<option value="1">计算机</option>
<option value="2">物理</option>
<option value="3">数学</option>
</select>
<p>
<input type="button" STYLE='WIDTH:85' value="确定" name="queding" onClick="yes">
<body>
作者: zh159 时间: 2007-6-23 16:19
麻烦把代码用[ code]代码[/code]
方式铁出来<script language="VBScript">
sub yes
msgbox "项目：" & xibie.value
end sub
sub tuichu
self.close
end sub
</script>
<body>
系别：<select size="1" name="xibie" onChange="">
<option value="电子学">电子学</option>
<option value="计算机">计算机</option>
<option value="物理">物理</option>
<option value="数学">数学</option>
</select>
<p>
<input type="button" STYLE='WIDTH:85' value="确定" name="queding" onClick="yes">
<body>
sub yes
msgbox "项目：" & xibie.value
end sub
sub tuichu
self.close
end sub
</script>
<body>
系别：<select size="1" name="xibie" onChange="">
<option value="电子学">电子学</option>
<option value="计算机">计算机</option>
<option value="物理">物理</option>
<option value="数学">数学</option>
</select>
<p>
<input type="button" STYLE='WIDTH:85' value="确定" name="queding" onClick="yes">
<body>
作者: wudixin96 时间: 2007-6-23 16:21
楼主的意思是往select里添加选项，再使其显示为新添加的选项？
作者: zh159 时间: 2007-6-23 16:27
| Quote: | |
|
在对话框显示选项和加入项目两个问题
作者: jmz573515 时间: 2007-6-23 17:56
我已经按[CODE]的方式贴出来 了，我的意思是3楼说的那个意思，可能是表达不够准确....(不知道有没有办法实现？谢谢！）
作者: zh159 时间: 2007-6-23 18:11
有，不过就我目前的学习进度要实现比较麻烦（其他人的我不知道），而且如果不用其他文件存储列表，HTA文件不能记住新增的项目
作者: jmz573515 时间: 2007-6-23 19:17
能不能给一人简单的用文件存储之后再读取的方法？谢了！
作者: wudixin96 时间: 2007-6-23 19:23
<SCRIPT>
function fnAppend(){
var oNewNode = document.createElement("option");
xibie.appendChild(oNewNode);
oNewNode.innerText="英语";
oNewNode.selected=true;
}
</SCRIPT>
<BODY>
<select size="1" name="xibie" onChange="">
<option value="电子学">电子学</option>
<option value="计算机">计算机</option>
<option value="物理">物理</option>
<option value="数学">数学</option>
</select>
<INPUT
TYPE = "button"
VALUE = "Append Child"
onclick = "fnAppend()">
</BODY>
用vbs不怎么会网页的。这是JS的。可以参考一下。function fnAppend(){
var oNewNode = document.createElement("option");
xibie.appendChild(oNewNode);
oNewNode.innerText="英语";
oNewNode.selected=true;
}
</SCRIPT>
<BODY>
<select size="1" name="xibie" onChange="">
<option value="电子学">电子学</option>
<option value="计算机">计算机</option>
<option value="物理">物理</option>
<option value="数学">数学</option>
</select>
<INPUT
TYPE = "button"
VALUE = "Append Child"
onclick = "fnAppend()">
</BODY>
作者: jmz573515 时间: 2007-6-23 19:36
高人啊，谢谢！
作者: zh159 时间: 2007-6-23 20:11
借用8楼的：
<SCRIPT>
function fnAppend(){
var oNewNode = document.createElement("option");
xibie.appendChild(oNewNode);
oNewNode.innerText=New.value;
oNewNode.selected=true;
}
</SCRIPT>
<BODY>
<select size="1" name="xibie" onChange="" STYLE="WIDTH:100">
<option value="电子学">电子学</option>
<option value="计算机">计算机</option>
<option value="物理">物理</option>
<option value="数学">数学</option>
</select><br>
<INPUT TYPE="text" name="New" VALUE="化学" STYLE="WIDTH:100"><INPUT TYPE="button" VALUE="增加项目" onclick="fnAppend()">
</BODY>
function fnAppend(){
var oNewNode = document.createElement("option");
xibie.appendChild(oNewNode);
oNewNode.innerText=New.value;
oNewNode.selected=true;
}
</SCRIPT>
<BODY>
<select size="1" name="xibie" onChange="" STYLE="WIDTH:100">
<option value="电子学">电子学</option>
<option value="计算机">计算机</option>
<option value="物理">物理</option>
<option value="数学">数学</option>
</select><br>
<INPUT TYPE="text" name="New" VALUE="化学" STYLE="WIDTH:100"><INPUT TYPE="button" VALUE="增加项目" onclick="fnAppend()">
</BODY>