《Visual Basic6.0程序设计 教学课件 ppt 作者 张险峰 第12章 互联网技术与VBScript》由会员分享，可在线阅读，更多相关《Visual Basic6.0程序设计 教学课件 ppt 作者 张险峰 第12章 互联网技术与VBScript（16页珍藏版）》请在金锄头文库上搜索。
1、,第12章 互联网技术与VBScript,本章要求：,1）了解HTML语言 2）了解VBScript概念 3）掌握文本文件数据写入和读出 4）掌握最简单留言板的制作,12.1.1 简单留言板介绍,WWW服务是Internet是一项基本服务，留言板是这项服务中一个具体应用。留言板旨在为网友之间提供一个便捷的沟通渠道，随时随地、看到网友发的消息，发表自己想说的话，本章将介绍简单留言板的制作。 Web页面的制作需要专门的语言或软件，例如VBScript、JavaScript，在使用这些语言或软件时还需要学习相关的知识。本章将学习使用VBScript来制作简单留言板，并学习把数据读写入文本文件的方法。
2、,12.1.2 HTML语言概述,HTML（Hypertext Markup Language）即超文本标记语言，是WWW的描述语言。设计HTML语言的目的是为了能把存放在一台电脑中的文本或图形与另一台电脑中的文本或图形方便地联系在一起，形成有机的整体。我们只需使用鼠标在某一文档中点取一个图标，Internet就会马上转到与此图标相关的内容上去，而这些信息可能存放在网络的另一台电脑中。 HTML文本是由HTML命令组成的描述性文本，HTML命令可以说明文字、图形、动画、声音、表格和链接等。HTML的结构包括头部（Head）和主体（Body）两大部分，其中头部描述浏览器所需的信息，而主体则包含所
3、要说明的具体内容。,12.1.2 HTML语言概述,【例12-1】 编写一段简单的网页HTML语言源代码: 这是标题栏 这是一个HTML网页 HTML页面以标签开始，以结束 。 和标签之间是代码头部 。 到之间是标题栏 。 和之间就是正文，也就是你所看到的网页文件。,12.1.3 VBSript基础,1.VBSript概述 Microsoft Visual BASIC Scripting Edition 是程序开发语言 Visual BASIC 家族的最新成员，它将灵活的 Script 应用于更广泛的领域，包括 Microsoft Internet Explorer 中的 Web 客户机 Sc
4、ript 和 Microsoft Internet Information Server 中的 Web 服务器Script。 （1）易学易用 （2）ActiveX Script （3）ActiveX Script,12.1.3 VBSript基础,2.在 HTML 页面中添加 VBScript 代码 SCRIPT 元素用于将 VBScript 代码添加到 HTML 页面中。VBScript代码写在成对的 标记之间。 订购 2 End Function ,12.1.4 文本文件数据的写入和读出,1. 数据的写入和读取 （1）用FileSystemObject对象创建一个TextStream实现对
5、文本文件的读写，创建指定文件并返回 TextStream 对象，该对象可用于读或写创建的文件。 语法： Object.CreateTextFile(filename,overwrite,unicode) CreateTextFile 方法的语法有以下部分： Object 必选项，应为 FileSystemObject 或 Folder 对象的名称。 filename 必选项，字符串表达式，指明要创建的文件。 overwrite 可选项，Boolean 值指明是否可以覆盖现有文件。如果可覆盖文件，该值为 True；如果不能覆盖文件，则该值为 False 。如果省略该值，则为False。 unic
6、ode 可选项，Boolean 值指明是否以 Unicode 或 ASCII 文件格式创建文件。如果以 Unicode 文件格式创建文件，则该值为 True；如果以 ASCII 文件格式创建文件，则该值为 False。如果省略此部分，则创建 ASCII 文件。,12.1.4 文本文件数据的写入和读出,【例12-3】 以下代码举例说明如何使用 CreateTextFile 方法创建并打开文本文件： Sub CreateAfile Dim fso，MyFile Set fso = CreateObject(“Scripting.FileSystemObject“) Set MyFile = fso
7、.CreateTextFile(“c:testfile.txt“,True) MyFile.WriteLine(“这是一个测试。“) MyFile.Close End Sub,12.1.4 文本文件数据的写入和读出,（2）打开指定的文件并返回一个 TextStream 对象，可以读取、写入此对象或将其追加到文件。 语法： Object.OpenTextFile(filename,iomode,create,format) OpenTextFile 方法的语法有以下部分： Object 必选项，应为 FileSystemObject 对象的名称。 filename 必选项，字符串表达式，指明要打
8、开的文件名称。 iomode 可选项，输入/输出模式，是下列三个常数之一：ForReading，ForWriting，或ForAppending。 create 可选项，Boolean 值，指出当指定的 filename 不存在时是否能够创建新文件。允许创建新文件时为 True，否则为 False。默认值为 False。 format 可选项，三个 Tristate 值之一，指出以何种格式打开文件。若忽略此参数，则文件以 ASCII 格式打开。,12.1.4 文本文件数据的写入和读出,设置： iomode 参数可为下列设置之一： ForReading 1 以只读模式打开文件。不能对此文件进行写
9、操作。 ForWriting 2 以只写方式打开文件。不能对此文件进行读操作。 ForAppending 8 打开文件并在文件末尾进行写操作。 format 参数可为下列设置之一： TristateUseDefault -2 以系统默认格式打开文件。 TristateTrue -1 以 Unicode 格式打开文件。 TristateFalse 0 以 ASCII 格式打开文件。,12.1.4 文本文件数据的写入和读出,【例12-4】 以下代码举例说明如何使用 OpenTextFile 方法打开读文件： Sub OpenTextFileTest Const ForReading=1，ForWr
10、iting=2，ForAppending=8 Dim fso,f,str Set fso=CreateObject(“Scripting.FileSystemObject“) Set f=fso.OpenTextFile(“c:testfile.txt“,ForReading,True) str=f.Readline MsgBox str f.Close End Sub,12.2.1留言板制作,(1) 留言页面 “ Then Set fso=CreateObject(“Scripting.FileSystemObject“) Set f=fso.openTextFile(“c:testfile
11、.txt“,ForAppending,True) f.write TheForm.Text1.Value+“+chr(13)+chr(10) f.close Else MsgBox “请输入留言内容！“ End If End Sub ,12.2.1留言板制作,（2） 浏览页面 ,12.3.1 本章要点,1.HTML语言 HTML的结构包括头部（Head）、主体（Body）两大部分，其中头部描述浏览器所需的信息，而主体则包含所要说明的具体内容。 2.VBScript在网页中的使用 VBScript是制作动态网页的一种脚本语言，代码写在成对的标记之间。 3.文本文件数据写入和读出 （1）数据写入，
12、如： Set fso=CreateObject(“Scripting.FileSystemObject“) set f=fso.openTextFile(“c:testfile.txt“,ForAppending,True) f.write “你好！“ （2）数据读出，如： Set fso=CreateObject(“Scripting.FileSystemObject“) set f=fso.openTextFile(“c:testfile.txt“,ForReading,True) str=f.readall,12.3.1 本章要点,12.3.2 使用技巧 在窗体中嵌入 Script 代码
13、以响应窗体中按钮的单击事件： 测试按钮事件 MsgBox “按钮被单击！“ 大多数 Script 代码在 Sub 或 Function 过程中，仅在其他代码要调用它时执行。然而，也可以将 VBScript 代码放在过程之外、SCRIPT 块之中。这类代码仅在 HTML 页面加载时执行一次。这样就可以在加载 Web 页面时初始化数据或动态地改变页面的外观。,12.3.1 本章要点,12.3.3 补充说明 HTML语言最初是由Tim Berners-Lee在CERN（欧洲核研究组织，European Organization for Nuclear Research）期间开发，并且得益于（国家超级
14、计算机应用中心，National Center for Suupercomputing Applicatuons）的Mosaic浏览器的流行得到推广。20世纪90年代所谓“网络爆炸”年代令HTML语言一跃成为制作网页的标准语言。 HTML版本经历了2.0和3.0之后，1997年推出的HTML3.2已经极大丰富了HTML的功能。1997年12月的HTML4.0将HTML语言推向一个新的高度，该版本倡导了两个新的理念： （1）将文本结构和显示样式分离； （2）更广泛的稳当兼容性。 由于同期CSS层叠样式表的配套推出，更使得HTML和CSS对于网页制作的能力达到前所未有的高度。 HTML4.0发表两年之后，W3C网络标准化组织于1999年12推出改进版的HTML4.01，对HTML4.0的一些功能作了进一步的完善，该版本一直沿用至今。,
