中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-05 02:09
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [已解决]HTA相关的一个问题?(不好表达...) 查看 840 回复 9
楼 主 [已解决]HTA相关的一个问题?(不好表达...) 发表于 2007-06-23 15:30 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线

<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 发表于 2007-06-23 16:19 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
麻烦把代码用代码方式铁出来

<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>
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
jmz573515 +8 2007-06-23 19:53
3 发表于 2007-06-23 16:21 ·  中国 浙江 衢州 中移铁通
银牌会员
★★★
积分 1,928
发帖 931
注册 2007-01-06 11:46
19年会员
UID 75624
性别 男
状态 离线
楼主的意思是往select里添加选项,再使其显示为新添加的选项?
4 发表于 2007-06-23 16:27 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
Originally posted by wudixin96 at 2007-6-23 16:21:
楼主的意思是往select里添加选项,再使其显示为新添加的选项?

在对话框显示选项和加入项目两个问题
5 发表于 2007-06-23 17:56 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线
我已经按[CODE]的方式贴出来 了,我的意思是3楼说的那个意思,可能是表达不够准确....(不知道有没有办法实现?谢谢!)
6 发表于 2007-06-23 18:11 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
有,不过就我目前的学习进度要实现比较麻烦(其他人的我不知道),而且如果不用其他文件存储列表,HTA文件不能记住新增的项目
7 发表于 2007-06-23 19:17 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线
能不能给一人简单的用文件存储之后再读取的方法?谢了!
8 发表于 2007-06-23 19:23 ·  中国 浙江 衢州 中移铁通
银牌会员
★★★
积分 1,928
发帖 931
注册 2007-01-06 11:46
19年会员
UID 75624
性别 男
状态 离线
<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的。可以参考一下。
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
jmz573515 +8 2007-06-23 19:37
9 发表于 2007-06-23 19:36 ·  中国 辽宁 本溪 联通
银牌会员
★★★
积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别 男
状态 离线
高人啊,谢谢!
10 发表于 2007-06-23 20:11 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
借用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>
论坛跳转: