中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-05 03:17

共 48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行

DOS批处理 & 脚本技术（批处理室） » [已解决]HTA相关的一个问题？（不好表达...）

可打印版本　841 / 9

第1楼　jmz573515	发表于 2007-06-23 15:30
银牌会员　发帖 464　积分 1,212
[已解决]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 ]

第2楼　zh159	发表于 2007-06-23 16:19
金牌会员　发帖 1,467　积分 3,687
麻烦把代码用代码方式铁出来 <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>

第3楼　wudixin96	发表于 2007-06-23 16:21
银牌会员　发帖 931　积分 1,928
楼主的意思是往select里添加选项，再使其显示为新添加的选项？

第4楼　zh159	发表于 2007-06-23 16:27
金牌会员　发帖 1,467　积分 3,687
Originally posted by wudixin96 at 2007-6-23 16:21: 楼主的意思是往select里添加选项，再使其显示为新添加的选项？在对话框显示选项和加入项目两个问题

第5楼　jmz573515	发表于 2007-06-23 17:56
银牌会员　发帖 464　积分 1,212
我已经按[CODE]的方式贴出来了，我的意思是3楼说的那个意思，可能是表达不够准确....(不知道有没有办法实现？谢谢！）

第6楼　zh159	发表于 2007-06-23 18:11
金牌会员　发帖 1,467　积分 3,687
有，不过就我目前的学习进度要实现比较麻烦（其他人的我不知道），而且如果不用其他文件存储列表，HTA文件不能记住新增的项目

第7楼　jmz573515	发表于 2007-06-23 19:17
银牌会员　发帖 464　积分 1,212
能不能给一人简单的用文件存储之后再读取的方法？谢了！

第8楼　wudixin96	发表于 2007-06-23 19:23
银牌会员　发帖 931　积分 1,928
<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的。可以参考一下。

第9楼　jmz573515	发表于 2007-06-23 19:36
银牌会员　发帖 464　积分 1,212
高人啊，谢谢！

第10楼　zh159	发表于 2007-06-23 20:11
金牌会员　发帖 1,467　积分 3,687
借用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>

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023