发送电子邮件.pptVIP

7.2.3 任务三：上传文件 随着网络的发展，网站提供的内容也越来越丰富，网站的上传资源不是在网站建立时就已经很齐全了，而是管理员与用户共同维护的结果，用户通过文件上传可以让网站的资源变的更多，资料变的更齐全。在本任务中将介绍如何设计一个上传文件页面的方法。 现在实现上传文件页面的方法很多，但是总的来说可以分为两类，一类是无组件上传文件，另一类是通过组件上传文件。所谓组件上传，就像在邮件系统中用到的JMail一样，需要网页设计人员去下载一个组件文件，并将其在服务器系统中注册。这种方法的缺点是，当把网站移植到另一台服务器上时，需要重新注册组件。无组件上传的方法就不存在这个问题。在本章中将采用粱无惧先生编写的“无惧无组件上传类”来实现上传文件页面的设计。 在本网页中采用的是无惧上传类V2.2版本，它实际上是一个将代码模块化的asp文件，在设计上传网页的时候，只要将upfile_class.asp文件包含在其中，就可以使用它设计的上传函数或过程来完成上传。 无惧上传类的属性及方法如下所示。 1. 上传类的介绍 （1）Upfile_Class类公共属性 File：文件域的集合，它是一个Dictionary对象，返回值为一个FileInfo_Class；类，可以进行续写操作。 Form：表单域的集合，它是一个Dictionary对象，返回值为对应表单域的值，可以进行续写操作。 isErr：返回错误的值。1表示没有上传文件，2表示上传超过限制大小，-1表示无错。此属性只读。 Version：返回此类的版本信息。此属性只读。 AllowExt：允许上传的文件类型的名单，可以在此类的文件中预设可上传的文件类型，它以文件的后缀名来判断，不区分大小写，后缀名之间用“；”来隔开。此属性是可续写的。 NoAllowExt：不允许上传的文件类型的名单，其属性与AllowExt相似。 ErrMessage：显示错误的字符串信息，其属性只读。 （2）公共方法 GetData(MaxSize As Int64)：分析上传的数据。MaxSize为限制上传的最大字节数，高为-1表示不限制大小。这是一个过程，没有返回值，调用后可以通过isErr来检查是否大于0。 SaveToFile(Item As String, Path As String)：保存到文件，自动覆盖已经存在的同名文件，其中参数Item为表单名，Path为保存的绝对路径，返回值为保存的文件名。 AutoSave(Item As String, Path As String)：保存到文件，自动穿件文件名以避免重复，其中参数Item为表单名，Path为保存的绝对路径（可以包含文件名），返回值为保存的文件名。 FileData(Item As String)：取得文件数据。其中参数Item为表单名。 GetFilePath(FullPath As String)：返回文件路径。 GetFileName(FullPath As String)：返回文件名。 GetFileExt(FullPath As String)：返回文件的后缀名。 GetNewFileName（）：返回一个时间种子的不重复数值，可以用做文件名。 isAllowExt(Ext As String)：返回一个真值假值是指Ext是否为可以上传的类型。 （3）受保护的方法 SaveToFileEx(Item As String,Path As String,Over As bool)：保存到文件。其中Over指示如果文件存在是否覆盖，如果Over为真时，文件按PATHL来保存，如果Over为假，则自动调用GetNewFileName（）生成一个新的不重复的文件名，以上传时的后缀名保存。 （4）FileInfo_Class类 文件信息类，用来存贮上传的文件信息。 （5）FileInfo_Class公共属性 FileName：返回上传的文件名。 FilePath：返回上传时文件在客户端的路径。 FileExt：返回文件扩展名。 FileMIME：返回文件MIME类别。 FileSize：返回文件大小（以字节为单位）。 上面介绍了上传类的公共属性和方法，这样在设计时，只需要调用这些公共属性与方法就可以实现上传网页的设计。 2. 上传照片和作业 上传照片和文件共包含index.html，UploadPic.asp，SaveToFile.asp，UploadSoft.asp，addupload.asp和SavePicToFile.asp六个页面。将实现分别将照片和文件上传到服务器的UploadSoftPic文件夹和UploadSoft文件夹中，并将相关信息写入数据库。 （1）数据库设计 打开ACCES