中国DOS联盟

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

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

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

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

jmz573515
银牌会员

积分 1212
发帖 464
注册 2006-12-13
状态离线

『楼主』: [已解决]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 ]

2007-6-23 15:30

zh159
金牌会员

积分 3687
发帖 1467
注册 2005-8-8
状态离线

『第 2 楼』:

麻烦把代码用[ 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>

此帖被 +8 点积分

点击查看详情

2007-6-23 16:19

wudixin96
银牌会员

积分 1928
发帖 931
注册 2007-1-6
状态离线

『第 3 楼』:

楼主的意思是往select里添加选项，再使其显示为新添加的选项？

2007-6-23 16:21

zh159
金牌会员

积分 3687
发帖 1467
注册 2005-8-8
状态离线

『第 4 楼』:

Quote:

Originally posted by wudixin96 at 2007-6-23 16:21:
楼主的意思是往select里添加选项，再使其显示为新添加的选项？

在对话框显示选项和加入项目两个问题

2007-6-23 16:27

jmz573515
银牌会员

积分 1212
发帖 464
注册 2006-12-13
状态离线

『第 5 楼』:

我已经按[CODE]的方式贴出来了，我的意思是3楼说的那个意思，可能是表达不够准确....(不知道有没有办法实现？谢谢！）

2007-6-23 17:56

zh159
金牌会员

积分 3687
发帖 1467
注册 2005-8-8
状态离线

『第 6 楼』:

有，不过就我目前的学习进度要实现比较麻烦（其他人的我不知道），而且如果不用其他文件存储列表，HTA文件不能记住新增的项目

2007-6-23 18:11

jmz573515
银牌会员

积分 1212
发帖 464
注册 2006-12-13
状态离线

『第 7 楼』:

能不能给一人简单的用文件存储之后再读取的方法？谢了！

2007-6-23 19:17

wudixin96
银牌会员

积分 1928
发帖 931
注册 2007-1-6
状态离线

『第 8 楼』:

<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的。可以参考一下。

此帖被 +8 点积分

点击查看详情

2007-6-23 19:23

jmz573515
银牌会员

积分 1212
发帖 464
注册 2006-12-13
状态离线

『第 9 楼』:

高人啊，谢谢！

2007-6-23 19:36

zh159
金牌会员

积分 3687
发帖 1467
注册 2005-8-8
状态离线

『第 10 楼』:

借用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>

2007-6-23 20:11

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: