中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-09-25 10:09

共 47,813 主题排行 / 349,918 发帖 / 今日 0 篇 / 48,274 会员排行

DOS批处理 & 脚本技术（批处理室） » VBS脚本错误{已结}

可打印版本　697 / 3

第1楼　Eblis	发表于 2007-06-09 19:58
中级用户　发帖 108　积分 251　来自湖南==>广州
VBS脚本错误{已结} <html> <body> <hr color="blue"> <input type="submit" name="btnl" value="click to test the code"> <script language="VBS"> <! - - sub btnl _ onclick dim message message="hello world!" msgbox message, 0, "tester result" end sub - - > </script> </body> </html> 请问这段网页代码错在哪里.不能弹出hello world对话框``我才刚学VBS. [ Last edited by Eblis on 2007-6-9 at 09:36 PM ]

第2楼　zh159	发表于 2007-06-09 20:48
金牌会员　发帖 1,467　积分 3,687
<html> <body> <hr color="blue"> <input type="submit" name="btnl" value="click to test the code" onClick="btnl()"> <script language="VBScript"> sub btnl dim message message="hello world!" msgbox message, 0, "tester result" end sub </script> </body> </html>

第3楼　Eblis	发表于 2007-06-09 21:34
中级用户　发帖 108　积分 251　来自湖南==>广州
<html> <body> <hr color="blue"> <input type="submit" name="button1" value="click to test the code"> <script language="VBS"> <!-- sub button1_onclick() dim message message="hello world!" msgbox message, 0, "tester result" end sub --> </script> </body> </html> 找到原因了....谢谢... [ Last edited by Eblis on 2007-6-9 at 09:36 PM ]

第4楼　zh159	发表于 2007-06-09 22:14
金牌会员　发帖 1,467　积分 3,687
试试这两个 <html> <body> <hr color="blue"> <input type="button" name="button" value="click to test the code 1" onClick="button('aaa!')"> <br> <input type="button" name="button" value="click to test the code 2" onClick="button('bbb!')"> <script language="VBScript"> sub button(str) msgbox str, 0, "tester result" end sub </script> </body> </html> <html> <body> <hr color="blue"> <input type="button" name="button" value="click to test the code 1" onClick="button1('aaa!')"> <br> <input type="button" name="button" value="click to test the code 2" onClick="button2('bbb!')"> <script language="VBScript"> sub button1(str) msgbox str, 0, "tester result 1" end sub sub button2(str) msgbox str, 0, "tester result 2" end sub </script> </body> </html>

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