无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站投放广告、加入VIP会员,请联系 微信:wuyouceo
查看: 2091|回复: 1
打印 上一主题 下一主题

[求助] 【已解决】运行 HTA 文件出错,请指教,谢谢!

[复制链接]
跳转到指定楼层
1#
发表于 2019-6-10 21:19:22 | 只看该作者 |只看大图 回帖奖励 |正序浏览 |阅读模式
本帖最后由 chishingchan 于 2019-6-11 08:10 编辑

系统:XP SP3 简体中文专业版
浏览器:IE8

modaldialog.hta
  1. <html>
  2. <head>
  3. <title>模态对话框</title>
  4. <HTA:APPLICATION
  5.      APPLICATIONNAME="ModalDialog">
  6. </head>

  7. <script language="VBScript">
  8. Sub CloseWindow
  9.     window.returnValue = listbox.Value
  10.     window.Close
  11. End Sub
  12. </script>

  13. <body>
  14. <select size="3" name="listbox">
  15.    <option value="1">选项 1</option>
  16.    <option value="2">选项 2</option>
  17.    <option value="3">选项 3</option>
  18.    <option value="4">选项 4</option>
  19. </select>
  20. <p>
  21. <input type="button" id="idBtn" value="确定" onclick="CloseWindow">
  22. </body>
  23. </html>
复制代码




运行后可以显示窗口,但当点击“确定”按钮后就出错,请问如何解决?谢谢!

刚才发现,原来这个 HTA 是被调用的:
  1. <html>
  2. <head>
  3. <title>Modal Example</title>
  4. <HTA:APPLICATION
  5.      APPLICATIONNAME="MainModal">
  6. </head>

  7. <script language="VBScript">
  8. Sub ShowDialog
  9.    intReturn = ShowModalDialog("modaldialog.hta")
  10.    textbox.Value = intReturn
  11. End Sub
  12. </script>

  13. <body>
  14. <button onclick="ShowDialog">
  15.   Show Dialog Box</button> <p>
  16. <input type="text" name="textbox">
  17. </body>
  18. </html>
复制代码
2#
发表于 2019-6-10 21:37:58 | 只看该作者
没玩过,不知道你这个return是要把值返回给谁?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-11-15 23:35

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表