分享
分销 收藏 举报 申诉 / 29
播放页_导航下方通栏广告

类型VBS文档对象模型.doc

  • 上传人:仙人****88
  • 文档编号:11890705
  • 上传时间:2025-08-18
  • 格式:DOC
  • 页数:29
  • 大小:185.50KB
  • 下载积分:10 金币
  • 播放页_非在线预览资源立即下载上方广告
    配套讲稿:

    如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

    特殊限制:

    部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

    关 键  词:
    VBS 文档 对象 模型
    资源描述:
    文档对象模型(DOM) 文档对象模型(DOM)属于VBScript客户端扩展部分,在文档对象模型中提供了大量的对象,这些对象应用于浏览器上,这些对象在我们编写脚本时发挥着重要的作用。 当用户在浏览器中打开一个页面时,浏览器就会自动创建文档对象模型中的一些对象,这些对象存放了HTML页面的属性和其他的相关信息,因为这些对象在浏览器上运行,所以我们有时也称之为浏览器对象。浏览器对象的层次图如图3-10所示,这个文档对象模型是Navigator的文档对象模型。 图3-10 文档对象模型(DOM) 在这个层次图中,每个对象都是它的父对象的属性。例如,Window对象是Document对象的父对象,所以在引用Document对象时使用Window.Document。在这里,Document对象也就是Window对象的属性。 对于每一个页面,浏览器都会自动创建Window对象、Document对象、Location对象、Navigator对象、History对象。而基于这个层次结构,还可以创建其他对象。例如,如果在页面中有一个表单对象(名称为MyForm),那么在引用MyForm对象时,就可以使用Window.Document.MyForm。在这里可以看出,Document对象是Window对象的属性,而如果页面中存在form对象,那么,form对象也是Document对象的属性。 在VBScript中如果要引用某个对象的属性,必须通过整个对象属性的完整路径来进行引用,也就是说,必须指明这个对象的属性的所有父对象。 例如,假如在页面上表单对象的名称为MyForm,而在表单中有—个文本框,名称为MyTextBox,而我们希望能够获取这个文本框中的字符串,那么必须从最高一级对象──Window对象开始引用。引用方式如下所示:Window.Document.MyForm.MyTextBox.value。 3.6.2 Windows对象 Window对象在VBScript浏览器对象的层次图中位于最高一层,具有唯一性,只要浏览器窗口打开,即使在浏览器中没有加载任何页面,VBScript中同样也会建立Window对象。所以,它也就具有许多和其他浏览器对象不同的属性和方法。 1.Window对象的属性 Window对象中存放的是浏览器整个窗口的属性,包括各种工具条的设置、浏览器的外观设置以及Document对象、History对象、Location对象等内容,对Window对象的属性逐个进行详细介绍是很难的,下面我们对Window对象的属性分类进行简要的介绍。 (1)Closed、Opener属性 Closed属性可以判断一个窗口是否已经被关闭;通过Opener属性可以通过一个窗口来操纵它的父窗口。当一个窗口打开另外一个窗口后,它们之间的关系并不是如同Frame结构一样紧密,它们只是通过Opener属性,子窗口可以和父窗口发生联系,而通过Open()方法的返回值,父窗口可以和子窗口发生联系,这样两个相关的窗口之间就可以实现互操作。 例如,以下例题先建立一个弹出窗口,通过Opener属性可以获取父窗口的属性信息,下述语句可以显示父窗口的名称: <script language="VBScript"> <!-- DIM popup popup= Window.Open("tan.htm","popupnav", _ "width=225,height=235,resizable=1,scrollbars=auto") Window.name ="测试Opener属性" --> </script> 例3-41 Opener属性使用示例 以下是弹出窗口的代码(应命名为tan.htm): <HTML><HEAD> <script language="vbScript"> sub Closeit() setTimeout "self.Close()",10000 End sub </script></HEAD> <BODY onload="Closeit()"> 这是一个测试文件, 用于测试文件的自动打开与关闭。<p> <a href="VBScript:alert(Window.Opener.name)">父窗口的名称</a> </BODY></HTML> (2)defaultStatus、status属性 defaultStartus属性的值是在浏览器窗口下面的状态栏中缺省显示的信息,status属性的值是状态栏中当前显示的信息。 例如,将浏览器状态栏的当前显示的信息通过对话框反馈给用户: <a href="3-44.htm" OnMouseOver="Window.status='Window对象的status属性的用法'" >测试Window对象的status属性的用法</a> (3)Document、History、Location属性 Document属性、History属性、Location属性就是浏览器对象中的Document对象、History对象、Location对象,下面分别对这些对象进行介绍。 2.Window对象的方法 Window对象有很多方法,下面我们介绍最常用的几种方法。 (1)Open(页面地址,窗口名称,窗口风格)和Close()方法 Open()方法能够打开一个窗口,并且,在打开窗口的时候,还能够指定窗口的风格,Open()方法返回的是窗口的引用,它有3个参数:页面地址、窗口名称和窗口风格,窗口风格中可以指定浏览器是否具有toolbar(工具栏)、Location(地址栏)、directories(目录按钮)、status(状态栏)、menubar(菜单条)、scrollbars(滚动条),它们可以设置为yes或no,窗口风格也可以指定浏览器窗口的width(宽)和height(高)。 Close()方法可以自动关闭一个窗口,例如刚才我们打开的myWindow对象,可以通过Close()方法关闭: myWindow.Close() 例如,我们打开一个窗口,页面是hello.htm,窗口高400,宽400,有工具栏、地址栏、目录按钮,而没有状态栏、菜单条和滚动条,则代码如下所示: <HTML><HEAD> <SCRIPT LANGUAGE=VBScript> <!-- function OpenWindow() Window.Open "hello.htm",null,"height=400,width=400," & _ "toolbar=yes,location=yes,directories=yes,status=no," & _ "menubar=no,scrollbars=no" End function function closeWindow() Window.Close End function --> </SCRIPT></HEAD><BODY> <a href="VBScript:OpenWindow()">打开一个新窗口</a><p> <a href="VBScript:CloseWindow()">关闭窗口</a> </BODY></HTML> 例3-42 Window对象Opent和Close方法的使用示例 (2)alert(字符串) 这种方法将在以后广泛使用。 alert()方法的功能是弹出一个警告框,在警告框内显示字符串文本,通常,在给用户某些警告信息的时候使用,例如,在IE浏览器内运行alert("你好!")后警告框如图3-11所示。 图3-11警告框 3.Window对象的事件 Window对象的事件有9种,较常用的有OnLoad、OnUnLoad、OnFocus、OnScroll。 在装载一个HTML页时会运行Window对象的OnLoad事件。要使用该事件,既可创建一个命名为Window_OnLoad的过程,也可向<BODY>标记中添加OnLoad属性(例3-30)。 Sub Window_OnLoad StrName=Window.Prompt("请输入姓名") Window.Alert "Hello " & strName End Sub 3.6.3 Document对象 Document对象代表的是当前的整个页面,所以在Document对象中存储着当前页面的一些信息,包括页面的前景色和背景色,也包括了页面中的表单、锚标、图象等对象,运用Document对象,我们还能够向页面中动态添加文本以及各种标签。 1.Document对象的属性 Document对象的属性非常丰富,下面我们分类进行简单介绍。 (1)alinkColor、vlinkColor、bgColor、fgColor和linkColor属性 这些属性是页面的颜色设置。bgColor是页面的背景颜色,fgColor是页面的前景颜色(也就是文本的颜色),linkColor是超链接的颜色,alinkColor是鼠标单击中的超链接的颜色,vlinkColor是已经访问过的超链接的颜色,这些属性和<BODY>标签中定义的各种属性相对应。 在这里设置颜色时,颜色应该以&hrrggbb形式表达,其中,&h代表颜色是以16进制表达的,而rr代表着红色的深浅程度,gg代表着绿色的深浅程度,bb代表着蓝色的深浅程度。其他各种颜色都是通过这三种颜色组合而成,颜色深浅程度以16进制整数表示,范围从00到ff,如果要设置颜色为绿色,则颜色应该表达成&h00ff00。 例如,运用bgColor属性,我们可以在页面中定义一个按钮,鼠标单击按钮后将页面的背景颜色设置成为黑色,代码如例3-43所示。 <HTML><HEAD><TITLE>Doeument</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- function ChangeColor() DIM bgc bgc=rnd*&hffffff Randomize Document.bgColor = bgc End function --> </SCRIPT></HEAD><BODY> <FORM> <INPUT TYPE="button" VALUE ="改变背景颜色" OnClick="ChangeColor"> </FORM></BODY></HTML> 例3-43 通过bgColor设置页面的背景色 (2)Title属性 Title属性中存储的是页面的标题,也就是在<TITLE>标签中所定义的标题。我们可以通过如下所示的代码设置页面的标题为Welcome: Document.Title="欢迎光临" (3)anchors、applets、forms、images、frames属性 这些属性中存放着对象的数组,页面中所有的超链接存储在links数组中,锚点则存储在anchors()数组中,表单存储在forms()数组中,图象存储在image()数组中,所有的frame存储在frames()数组中,并可用length属性来判断它们的长度。如果在页面中只定义了一个表单,那我们可以通过Document.forms(0)来引用这个表单对象,以下举一个例子来说明其用法: <HTML><HEAD></HEAD><BOdy> <Form Name="mytable"> 请输入数据:<Input Type="text" Name="text1" Value=""> </Form> <A name="Link1" href="test1.htm">链接到第一个文本</a><br> <A name="Link2" href="test2.htm">链接到第二个文本</a><br> <A name="Link2" href="test3.htm">链接到第三个文本</a><br> <A href="#Link1">第一锚点</a> <A href="#Link2">第二锚点</a> <A Href="#Link3">第三锚点</a> <BR> <Script Language="VBScript"> Document.Write "文档有" & Document.links.length & _ "个链接"& "<br>" Document.Write "文档有" & Document.anchors.length & _ "个锚点"&"<br>" Document.Write "文档有" & Document.forms.length & "个窗体" </script></body></HTML> 例3-44 Document属性的用法 2.Document对象的方法 (1)Write()方法 在前面的内容中,我们已经使用过Write()方法,Write()方法的功能就是向页面内写入文本或者标签,其实,这些功能似乎都可以直接在HTML页面中完成,而不需要Script,但是,运用Script,可以完成一定的运算工作然后显示结果,这一点是HTML做不到的。 (2)Open()和Close()方法 Open()方法的功能就是打开一个新文档,而Close()方法的功能就是关闭当前文档。 3.6.4 History对象 在用户在网上浏览时,浏览器中维护着一个用户最近访问过的URL地址数组,通过 History对象,我们可以获得最近访问过的URL地址。而且,运用History对象的back()、 forward()方法,我们能够获得和浏览器工具栏中的“后退”、“前进”按钮相同的效果。借助于History对象,我们可以获取浏览器访问过地址的信息。 1.History对象的属性 Navigator浏览器和IE浏览器对于History对象的属性不完全兼容,它们有一个相同的属性──length 属性,在length属性中记录当前浏览器访问历史记录的数量,例如,我们可以通过下面的VBScript代码将浏览器访问的历史记录数量显示到HTML页面上: Window.Document.Write("You have visited " & History.length & "sites") 2.History对象的方法 History对象的back()方法可以载入历史记录中前一个历史记录的URL地址,forward() 方法可以载入历史记录中下一个历史记录的URL地址,go()方法可以载入历史记录中任何 一个历史记录的URL地址。 例如,在下面的页面中,我们运用两个按钮,可以实现浏览器中的“后退”、“前进”按钮的功能,VBScript代码如例3-45所示。 <HTML><HEAD><TITLE>History</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- function goback() History.back() End function function goforward() History.forward() End function --> </SCRIPT></HEAD><BODY> <FORM> <INPUT TYPE="button" VALUE="BACK" OnClick="goback()"> <INPUT TYPE="button" VALUE="FORWARD" OnClick="goforward()"> </FORM></BODY></HTML> 例3-45 运用History对象实现浏览器中“后退”、“前进”按钮的功能 go()方法有一个参数,代表载入历史记录列表中相对位置的历史记录,例如go(-1)则代表载入前一条历史记录,它和back()方法的功能是一致的,go(1)代表载入后一条历史记录,它和forward()方法的功能是一致的。 3.6.5 Navigator对象 Navigator对象中存储着关于浏览器版本和浏览器运行平台的一些信息,由于各种浏览 器之间还存在着不完全兼容性,而且,用户所使用的浏览器版本也有差异,所以,在建立网站的时候,有时候有必要建立多个不同版本的网页,以适应不同浏览器的需要,在这里就需要运用Navigator对象进行判断。 通过Navigator对象的属性,我们可以获得浏览器和运行平台的信息,下面我们对Navigator对象的属性进行简单介绍。 (1)appName属性。通过Navigator对象的appName属性可以获得浏览器的名称,例如,当在IE浏览器中运行脚本Navigator.appName,获得浏览器名称为Microsoft Internet Explorer。 例如,我们可以通过Navigator对象判断浏览器的名称,将浏览器分为三类:Netscape、Internet Explorer和Other,则VBScript代码如例3-46所示。 <HTML><HEAD><TITLE>Navigator</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- If (Navigator.appName="Netscape") then Window.Document.Write("Netscape") elseIf (Navigator.appName="Microsoft Internet Explorer") then Window.Document.Write("Internet Explorer") else Window.Document.Write("Others") End If Document.Write "<br>" Document.Write Navigator.appVersion Document.Write "<br>" Document.Write Navigator.userAgent --> </SCRIPT></HEAD><BODY></BODY></HTML> 例3-46 通过Navigator对象判断浏览器名称 (2)appCodeName属性。通过appCodeName属性可以获得浏览器代码名称,对于IE浏览器,它的代码名称为Mozilla。 (3)appVersion属性。通过appVersion属性可以获得浏览器的版本信息以及浏览器运行平台 的信息,例如,在Windows NT4.0下运行的IE5.0浏览器中,Navigator.appVersion返回值为4.0(compatible;MSIE5.0;Windows NT)。 (4)userAgent属性。在HTTP协议中,客户端向服务器端请求时,会发出一段USER-AGENT信息,Navigator对象的userAgent属性值就是USER-AGENT信息,可以获得浏览器及所在操作系统的信息,这个属性和其他属性比起来,获得的信息要全面得多。例如,Window NT 4.0下运行的IE5.0浏览器中,navtgator.appVersion的返回值为Mozilla/4.0(compatible;MSIE 5.0;Windows NT),其中可以看出,同时包含了浏览器信息、操作系统信息和浏览器代码名称。 3.6.6 Form对象 一个表单隶属于一个文档,对于表单对象的引用可以通过使用隶属文档的表单数组进行引用,即使在只有一个表单的文档中,表单也是一个数组的元素,其引用形式如下: Document.forms(0) 注意:表单数组引用是采用form的复数形式forms,数组的下标总是从0开始。 在对表单命名后,也可以简单地通过名称进行引用,比如,如果表单的名称是MyForm,则引用形式如下所示: Document.MyForm 如果在一个表单中有多个表单元素具有相同的名称,那么,VBScript会自动创建一个数组来存放这些元素,数组中的每个元素代表一个表单元素。例如,在一个表单中有一个文本框和一个文本区名称都是MyName,那么MyName(0)和MyName(l)分别代表文本框和文本区,数组的下标从0开始,表单元素的下标和它们在表单中出现的顺序是一致的。 1.表单对象的属性、方法与事件 表单对象的属性、方法与事件如表3-17所示,有关它们的具体解释我们随后马上展开。 表3-17 表单对象的属性、方法与事件 属性 方法 事件 action HandleEvent() OnReset elements() Reset() OnSubmit encoding Submit() length method name target 2.属性 (1)action action属性指明了通讯的HTTP服务器的ASP程序的URL地址。例如: Document.forms(0).action="http://127.0.0.1/MyWeb/test.asp" (2)method 一个表单的method取值可以是GET或者POST,method的值说明了访问HTTP服务器的访问方法。 (3)name name属性指明了表单的名称,可以通过name属性的值对表单进行引用。 (4)target target属性在Frame结构下发挥了重要的作用。在Frame结构下,有时会希望保留交互表单的Frame部分,而使用另外的Frame部分进行浏览。target属性指明了响应页面应该在Frame的哪一部分进行显示。target属性值可以是窗口名称或者Frame名称,分别代表用以显示反馈信息的窗口或者Frame。 例如,假设在Frame结构中,使用frameLeft进行交互查询,使用frameRight进行浏览,则可以对target属性进行设置: Document.forms(0).target="frameRight" 3.方法 方法共有2种情况。 (1)reset() reset()方法将表单中所有元素值重新设置为缺省状态,如果在表单中定义了Reset按钮,那么,reset()方法执行后的效果与单击Reset按钮的效果是相同的。 (2)submit() submit()方法将表单数据发送给服务器的ASP程序处理,如果在表单中定义了Submit按钮,则submit()方法执行后的效果与单击Submit按钮效果是相同的。 图3-12 用图片代替按钮示例 例如,在生动活泼的Web页面中,使用美观的图片代替Reset按钮和Submit按钮往往会取得更好的效果,在这里,就需要使用到reset()方法和submit()方法,如例3-47所示。 <HTML><HEAD><TITLE>注册</TITLE></HEAD><BODY> <FORM METHOD=POST ACTION="http://127.0.0.1/MyWeb/test.asp"> 请输入你的姓名 <INPUT TYPE="text" Name="RegisterName"><BR>性别 <INPUT TYPE="radio" Name="Gender" VALUE="male" CHECKED>先生 <INPUT TYPE="radio" Name="Gender" VALUE="female">女士<BR> </FORM> <IMG SRC="submit.jpg" onclick="Document.forms(0).submit()"> <IMG SRC="reset.jpg" onclick="Document.forms(0).reset()"> </BODY></HTML> 例3-47 使用reset()方法和submit()方法利用美观的图片代替Reset按钮和Submit按钮 3.6.7 文本框对象 文本框对象是表单中接收用户输入数据的主要媒介,由于文本框对象中输入文本的内容千变万化,往往需要对文本框中输入数据进行数据有效性验证,特别是对于整数和实数的输入也往往使用文本框,对于这一类型的输入,有效性验证则更为必要。 1.文本框对象的属性、方法和事件 文本框对象的属性、方法和事件如表3-18所示,后面我们会详细介绍它们。 表3-18文本框对象的属性、方法和事件 属性 方法 事件 DefaultValue Blur() OnBlur Form Focus() OnChange Name handleEvent() OnFocus Type select() onKeyDown Value OnKeyPress OnKeyUp OnSelect 2.属性 文本框对象的属性共有下述5种。 (1)defaultValue defaultValue的属性值是文本框中缺省的文本信息。 (2)form form属性反映了包含该文本框的表单。通过文本框的form属性可以对表单进行引用。 (3)name name属性即为文本框的名称。 (4)type type属性指明了表单元素的类型,文本框的type属性值是text。 (5)value value属性就是文本框的当前输入信息,即文本框中当前正在显示的文本。 例如,假设表单中有一个文本框,名称为Upper,在表单数据提交前要先将Upper中的文本全部转化为大写文本;那么,我们可以先定义ToUpper()函数,ToUpper ()函数将文本框中文本转换为大写文本。在提交之前先调用ToUpper()函数进行处理: <HTML><HEAD><TITLE>请输入非负数字</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- function ToUpper() Document.forms(0).Upper.value=UCase(Document.forms(0).Upper.value) '使用VBScript的UCASE函数将小写字母转换成大写字母。 End function --> </SCRIPT></HEAD><BODY> <FORM METHOD=POST ACTION="http://127.0.0.1/MyWeb/test.asp"> <INPUT TYPE="text" Name="Upper"> <INPUT TYPE="button" value="提交" OnClick="ToUpper()"> </FORM></BODY></HTML> 例3-48 将小写字母转换成大写字母 3.方法 (1)blur() blur()方法可以释放表单元素的输入焦点,对于文本框而言,blur()方法的执行会取消文本框内文本的选顶,并且在文本框中的文本插入指针也会离开文本框。 例如,表单中有一个文本框,名称为Modify,可以使用blur()方法使之失去输入焦点; Document.forms(0).Modify.blur() (2)focus() focus()方法和blur()方法相反,会使得表单元素获得输入焦点,对于文本框而言,focus() 方法的执行会使得文本插入指针处于文本框中。 在提交表单数据前需要进行数据有效性验证,而一旦数据有效性验证失败后,用户往往需要对输入有误的表单元素进行修改,这样,就有必要将输入焦点置于输入有误的表单元素上,使得用户能够直接进行修改,而不必先在表单中找到需要修改的表单元素,从而可以便于用户的操作,这对于长表单的输入是十分有意义的。 (3)select() select()方法使得文本框中文本被选中,即突出显示文本框中的文本。 在数据有效性验证失败后,先使用focus()方法将焦点置于输入有误的表单元素上,如果表单元素是文本框,则往往也需要将文本框中的文本选中,这样,用户可以按Delete键直接删除文本框中输入有误的数据,这样,也可以有效地简化用户的操作步骤。 我们用例3-49说明,在文本框中要求输入一个非负整数,如果有效性验证失败后则使文本框获得焦点,并且文本框中的输入数据被选中。 <HTML><HEAD><TITLE>请输入非负数字</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- function check() for i=1 to len(trim(Document.forms(0).number.value)) c=mid(trim(Document.forms(0).number.value),i,1) If(c<"0" or c>"9") then alert ("请输入非负数字") Document.forms(0).number.focus() Document.forms(0).number.select() exit for else Document.forms(0).submit End If next End function --> </SCRIPT></HEAD><BODY> <FORM METHOD=POST ACTION="http://127.0.0.1/MyWeb/test.asp" > 请输入非负的数字<INPUT TYPE="text" Name="number"> <INPUT TYPE="button" value="提交" onclick="check()"> </FORM></BODY></HTML> 例3-49 数据有效性验证失败后文本框获得焦点,其中输入数据被选中 4.事件 (1)OnBlur 在文本框失去焦点时,触发OnBlur事件。如果需要对某个文本框的输入数据进行严格的数据有效性验证,可以在OnBlur事件处理函数中检验,对例3-49中我们进行如下修改: <INPUT TYPE="text" Name="number" OnBlur="check()"> 这样,一旦当名称为number的文本框失去焦点后立刻进行校验,如果不是合法的整数,则将焦点重新设置到number文本框中,那么在该文本框中根本就不可能输入不合法的数据,否则文本框就不能失去焦点,当然也就不可能提交表单数据了。 (2)OnChange OnChange事件和OnBlur事件相似,都要在失去焦点之后触发,不同之处在于,只有当用户修改了文本框中的文本,然后失去焦点后才触发,如果用户没有修改文本,失去焦点 时是不会触发OnChange事件的,同样可以在OnChange事件处理函数中进行数据有效性验证,在例3-49可以进行如下修改: <INPUT TYPE="text" Name="number" OnChange="check()"> 和OnBlur不同,在OnChange事件处理函数中进行校验不会把焦点强制定于该文本框 中,如果在number文本框中输入了不合法的数据,出现警告对话框后会将焦点重新设置到number文本框中,此时如果不进行任何改动,可以将焦点移动到其他表单元素上而不再次触发OnChange事件处理函数。 建议不要使用OnBlur事件处理函数中进行数据有效性验证,而是使用OnChange事件处理函数中进行验证,然后在表单提交时再进行一次验证,这样可以给予用户较大的自由。 (3)OnFocus 当文本框得到焦点时,触发OnFocus事件。 (4)OnSelect 当文本框中文本被选定时,触发OnSelect事件。 (5)OnKeyDown 文本框在获得焦点的状态下,用户按下一个键时触发OnKeyDown事件。 (6)OnKeyUp 文本框在获得焦点的状态下,用户松开一个键时触发OnKeyup事件。 (7)OnKeyPress 文本框在获得焦点的状态下,用户按键动作完成之后出发OnKeyPress事件,所以在用户按键的过程中先触发OnKeyDown事件,然后触发OnKeyUp事件,在OnKeyDown事件和OnKeyUp事件匹配完成之后触发OnKeyPress事件。 这样,就可以修改例3-49,在例3-49中的校验方式是对于输入文本进行校验,这是一种被动的校验方式,其实可以考虑采用一种更加主动的校验方式,通过编写OnKeyPress事件处理函数后,可以保证在文本框中只能输入数字,而屏蔽了其他按键,这样同样保证了在number文本框中只能输入数字。如例3-50所示(该例使用了多个事件,建议读者将其分开一个一个测试)。 <HTML><HEAD><TITLE>请输入非负数字</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- function init() Document.forms(0).number.value="请输入非负数字" Document.forms(0).number.select() End function function clear() Document.forms(0).number.value="" End function function inputed() for i=1 to len(trim(Document.forms(0).number.value)) c=mid(trim(Document.forms(0).number.value),i,1) If(c<"0" or c>"9") then alert ("请输入非负数字") Document.forms(0).number.focus() Document.forms(0).number.select() exit for End If next End function function check() charstr=Document.forms(0).number.value If not isnumeric(charstr) then alert "请输入非负数字" else Document.forms(0).submit End If End function --> </SCRIPT></HEAD><BODY> <FORM METHOD=POST ACTION="http://127.0.0.1/MyWeb/test.asp" > 请输入非负的数字<INPUT TYPE="text" Name="number" onfocus="clear()" onblur="check()" onmouseover="init()" onkeypress="inputed()"> </FORM><
    展开阅读全文
    提示  咨信网温馨提示:
    1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
    2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,个别因单元格分列造成显示页码不一将协商解决,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
    3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
    4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前可先查看【教您几个在下载文档中可以更好的避免被坑】。
    5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
    6、文档遇到问题,请及时联系平台进行协调解决,联系【微信客服】、【QQ客服】,若有其他问题请点击或扫码反馈【服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【版权申诉】”,意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:0574-28810668;投诉电话:18658249818。

    开通VIP折扣优惠下载文档

    自信AI创作助手
    关于本文
    本文标题:VBS文档对象模型.doc
    链接地址:https://www.zixin.com.cn/doc/11890705.html
    页脚通栏广告

    Copyright ©2010-2026   All Rights Reserved  宁波自信网络信息技术有限公司 版权所有   |  客服电话:0574-28810668    微信客服:咨信网客服    投诉电话:18658249818   

    违法和不良信息举报邮箱:help@zixin.com.cn    文档合作和网站合作邮箱:fuwu@zixin.com.cn    意见反馈和侵权处理邮箱:1219186828@qq.com   | 证照中心

    12321jubao.png12321网络举报中心 电话:010-12321  jubao.png中国互联网举报中心 电话:12377   gongan.png浙公网安备33021202000488号  icp.png浙ICP备2021020529号-1 浙B2-20240490   


    关注我们 :微信公众号  抖音  微博  LOFTER               

    自信网络  |  ZixinNetwork