把你的代码写进script标签中。
很重要的一点你要注意。这种代码，调用了ActiveXObject的，只能在IE中运行，并且在默认的安全性设置中会提示页面中有脚本要运行（只要你用了ActiveXObject就会提示）
例子1：调用函数方式<HTML>
<HEAD>
<SCRIPT LANGUAGE="VBScript">
Function test()
msgbox "你还真点我？"
End Function
</SCRIPT>
</HEAD>
<BODY>
<input type="button" value="点击我" onclick="vbscript:test()">
</BODY>
</HTML>
=====================================================
例子2：事件触发方式
<html>
<head>
<meta http-equiv="Content-Type" content="text/htmlcharset=gb2312">
<title>VBSCRIPT与html</title>
</head>
<script language="vbscript">
option explicit
dim a,b,c
sub btmshow_onclick
a=abc.text1.value
b=abc.text2.value
if a>b then
c = a
else
c=b
end if
abc.text3.value=c
end sub
</script>
<body>
<form name="abc">
<p>请输入第一个数字：<input type="text" width="60" name="text1"></p>
<p>请输入第二个数字：<input type="text" width="60" name="text2"></p>
<p>两个数字最大值为：<input type="text" width="60" name="text3"></p>
<p><input type="button" name="btmshow" value="输入"></button>
<input type="reset" name="reshow" value="重设"></p>
</form>
</body>
</html>
====================================================
例子3：在窗体中嵌入脚本代码以响应窗体中按钮的单击事件
<HTML>
<HEAD>
<TITLE>测试按钮事件</TITLE>
</HEAD>
<BODY>
<FORM NAME="Form1">
<INPUT TYPE="Button" NAME="Button1" VALUE="单击">
<SCRIPT FOR="Button1" EVENT="onClick" LANGUAGE="VBScript">
MsgBox "按钮被单击！"
</SCRIPT>
</FORM>
</BODY>
</HTML>
一是将VBScript单独写在一个文件里,然后引用方式,如:<Script language="VBScript" Src="文件名.Js"></Script>
二是可直接定代码如:
<SCRIPT LANGUAGE="VBScript">
<!--
VBScript 代码
-->
</SCRIPT>
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）