下载文档原格式
第3章VBScript语言【例3.1】本例在表单中添加一个普通按钮，并在HEAD部分编写脚本代码以响应窗体中按钮的单击事件（onClick），如图3.1所示。
------------ 3-01.htm ------------<HTML><HEAD><TITLE>测试按钮事件</TITLE><SCRIPT LANGUAGE = "VBScript"FOR = "Button1" EVENT = "onClick">MsgBox "按钮被单击！"</SCRIPT></HEAD><BODY><FORM NAME = "Form1"><INPUT TYPE = "button" NAME = "Button1" VALUE = "请单击这里"></FORM></BODY></HTML>【例3.2】编写一个HTML网页，在浏览器中打开该网页时调用MsgBox函数来显示一个信息框并返回单击的按钮的值，如图3.2所示。
------------ 3-02.htm ------------<HTML><HEAD><TITLE>MsgBox函数应用示例</TITLE><SCRIPT LANGUAGE = "VBScript">Sub ShowMsgBox()Dim MyVar, prompt, buttons, titleprompt = "欢迎你使用VBScript语言编写脚本代码!"buttons = vbOKCancel+vbInformationtitle = "MsgBox函数应用示例"MyVar = MsgBox( prompt, buttons, title )End Sub第3章VBScript语言61</SCRIPT></HEAD><BODY onLoad = "ShowMsgBox"><FONT FACE = "楷体_GB2312" COLOR = "red">在浏览器中打开本页面时，将调用MsgBox函数显示一个对话框。
网页设计之基于vbscript的日历制作（请在IE中浏览，360浏览器请使用兼容模式）运行效果：Index.html代码如下：<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="/1999/xhtml"><head><style type="text/css">*{ font-family:"微软雅黑";font-size:14px; margin:0px;}td{ text-align:center;}</style><meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><title> 日历</title></head><body bgcolor="#9999FF"><div id="tit" style="text-align:center;font-size:20px;"></div><table border="0" width="420" cellspacing="1" cellpadding="0" bgcolor="#999999" align="center"><tr><td height="36" bgcolor="#cccccc"><strong>周日</strong></td><td height="36" bgcolor="#cccccc"><strong>周一</strong></td><td height="36" bgcolor="#cccccc"><strong>周二</strong></td><td height="36" bgcolor="#cccccc"><strong>周三</strong></td><td height="36" bgcolor="#cccccc"><strong>周四</strong></td><td height="36" bgcolor="#cccccc"><strong>周五</strong></td><td height="36" bgcolor="#cccccc"><strong>周六</strong></td></tr><tr><script language="vbscript">dyear=year(Date()) '获取当前年、月、日dmonth=month(Date())dday=day(Date())document.getElementById("tit").innerHTML=dyear&"年"&dmonth&"月"&dday&"日"If ((dyear Mod 4 = 0) and (dyear Mod 100 <> 0)) Or (dyear Mod 400 = 0) Then '判断是否为闰年，如果是，则2月29天，否则28天er="29"elseer="28"End Ifdy="0|31|"&er&"|31|30|31|30|31|31|30|31|30|31"'将12个月的最大天数保存成一个字符串，cday=split(dy,"|")'用split将其分离成一维数组，保存在cday里,与cday(0)=0,cday(1)=31...相似writeday=1fday=weekday(CDate(dyear&"-"&dmonth&"-1"))'取当月的1号是一星期中的第几天，从而判断该月的1号是从哪里开始for i=1 to 42 '日历中总共有42个单元格If i<fday Then '判断当前单元格是不是这个月的第一天,如果不是就写入空单元格document.write("<td height='32' bgcolor='#ffffff'>"&" "&"</td>")ElseIf writeday<=cint(cday(dmonth)) Then '判断写入的天数是不是超过了这个月总共的天数，如果没有超过，则If dday=writeday Then '判断当前写入的时间是不是当天，如果是则写入一个背景为灰内容为红的单元格来表示当天document.write("<td height='32' bgcolor='#e6e6e6'><font color='#ff0000'>"& writeday&"</font></td>")Elsedocument.write("<td height='32' bgcolor='#ffffff'>"&writeday&"</td>")End ifwriteday= writeday+1Else'如果写入的天数超过了这个月总共的天数，那么就写入空的单元格document.write("<td height='32' bgcolor='#ffffff'>"&" "&"</td>")End ifEnd ifif i mod 7=0 And i<42 Then '如果i除以7的余数为0的话，说明一行输出完成，则写入行标记用来创建新的行,增加了i<42是为了不让当i=42时还输出行标记document.write("</tr><tr>")end ifnext</script></tr></table></body></html>——本文由百度用户“聪明太狼”上传，转载请注明作者来源。
vbscript 脚本编程
Visual Basic Scripting语言（VBS）是一个微软公司研发的桌面和网络应用程序的脚本语言。
它的语法基于Visual Basic，但没有图形界面开发功能。
VBS是处理Windows操作系统中常见任务的有效方法。
它可以创建小型、简单或复杂的脚本，用于执行特定任务，如发出告警或检索文件夹中的文件名称。
使用VBS脚本编程时，需要使用Visual Basic Scripting语言（VBS）编写代码，然后将其保存为*.vbs 文件。
VBS脚本编程也可以在Microsoft Windows命令提示符中使用。
要运行VBS脚本，可以使用Windows资源管理器双击*.vbs文件，或者在命令提示符中输入
“cscript.exe”和VBS文件的名称。
VBS脚本编程的优点包括：快速编程，可以创建小型、简单或复杂的脚本；可以使用Windows资源管理器双击*.vbs文件，或者在命令提示符中输入“cscript.exe”和VBS文件的名称；可以使用WMI技术实现远程管理；可以直接访问COM组件，以便使用ActiveX技术；可以自动化Windows系统任务；可以让Windows工作站和服务器之间进行消息交换；可以通过WSH访问网络资源；可以使用VBScript建立安全的Internet应用程序。
网页设计之VBScriptVBScript简介VBScript 是一种脚本语言，可以用于微软IE 浏览器的客户端脚本和微软IIS (Internet Information Service) 的服务器端脚本。
VBScript 是微软编程语言V isual Basic 家族中的一个成员。
如果你熟悉微软的V isual Basic 或者V isual Basic for Applications，你会很快就熟悉VBScript。
简单的VBScript 入门示例现在我们就写一个简单的VBScript 的例子。
<html><head><title>一个简单的VBScript代码示例</title></head><body><p>你会看到一个消息框，在此行文字显示之后弹出。
</p><script type="text/vbscript">MsgBox("Hello,World!")</script></body></html>在网页中插入VBSscript语句，应使用<script>。
<script> 这个tag 有个属性叫type，type="text/vbscript" 表示插入<script></script>其中的为VBScript语句。
<script type="text/vbscript">......</script>在参考别人的VBScript 代码时，你也许会看到<script>里写的不是type="text/vbscript"，而是language="vbscript"。
第4章VBScript脚本网页随着网页制作技术逐步的发展，许多网站设计人员已经使用脚本语言来开发网页，并实现服务器与客户端、网页与浏览者之间的交互。
而在网页交互过程，应用最早及最广泛的脚本语言，主要有VBScript和JScript两种。
相对于JScript而言，VBScript语法较为简单，代码书写格式要求也较为宽松。
除了实现简单的网页交互外，VBScript还可以用来编写ASP技术的网页，用途非常广泛。
本章将通过几个实例介绍VBScript的语法、语句以及其在网页中的应用。
4.1 配置IIS服务器在创建ASP动态网页，而应用VBScript脚本之前，需要用户先配置IIS服务器。
通过IIS服务器可以解释服务器端的脚本代码。
4.1.1 ASP简介ASP是Active Server Page的缩写，意为“动态服务器页面”。
ASP是微软公司开发的代替CGI脚本程序的一种应用，它可以与数据库和其它程序进行交互，是一种简单、方便的编程工具。
ASP的网页文件的格式是.asp，现在常用于各种动态网站中。
ASP是一种服务器端脚本编写环境，可以用来创建和运行动态网页或Web应用程序。
ASP网页可以包含HTML标记、普通文本、脚本命令以及COM组件等。
1．在网页中编写代码使用Dreamweaver，可以方便地编写、调试各种ASP程序。
Dreamweaver还提供了代码提示功能，可以根据当前网页文档的脚本语言类型自动识别并显示可能出现的语句、属性、方法等。
例如，通过【快速标签编辑器】为网页中的对象添加代码，如图4-1所示。
单击图4-1 快速标签编辑器【快速标签编辑器】只能编写一些简单的代码，如超链接、脚本的事件等。
如需要编辑较为复杂的代码，可执行【修改】|【编辑标签】命令，打开【标签编辑器】，通过列表菜单，选择相应的类型添加代码，如图4-2所示。
选择输入图4-2 标签编辑器除了用以上两种方式为网页添加标签以外，还可以在【代码】视图中，直接编辑代码程序。
