如何在yahoo上做网站,产品定制网站,邢台建设网,开天猫旗舰店网站建设ASPupload组件使用帮助 使用ASP实现文件上载到WEB服务器ASPupload 2.0版#xff0c;相关源文件如下#xff08;uploadTest.htm#xff09;#xff1a; nameUPloadForm 其中客户端文件要注意两点#xff1a;* 文件上载提交表单(Form)的enctype必须指定为“…ASPupload组件使用帮助 使用ASP实现文件上载到WEB服务器ASPupload 2.0版相关源文件如下uploadTest.htm nameUPloadForm 其中客户端文件要注意两点* 文件上载提交表单(Form)的enctype必须指定为“multipart/form-data”* 语句表示上载文件域用户可以在该域中输入或选定文件。 服务器端源文件如下uploadTest1.asp%response.buffertrue%%Set UploadServer.createobject(Persits.Upload.1) 创建文件上载组件CountUpload.Save(e:/aspupload) 将客户端文件保存到WEB服务器端的本地硬盘上% 上载了%Count%个文件 File has been uploaded.其中脚本Set UploadServer.createobject(Persits.Upload.1)创建了文件上载组件该组件通过调用Save方法将浏览器端的文件内容保存到指定路径。将文件存在数据库中将文件保存在数据库中主要用了ASPUpLoad组件中文件对象的ToDatabase方法。源文件如下客户端源文件uploadToDB.htm nameFormUpload 读取数据库中文件服务器端源文件uploadToDB.asp%Set UploadServer.createobject(Persits.Upload.1)CountUpload.Save(e:/aspupload)on error resume nextset FileObjUpload.Files(FileUpload)SQLinsert into upLoadFile (Title,FileName,Content) values (FileObj.Path,FileObj.Path,?)response.write SQLFileObj.ToDatabase DSNFileUpload;UIDsa;,SQLif Err0 thenResponse.write Error Saving the file:Err.DescriptionelseFileObj.deleteresponse.write Success!end if%从数据库中读取文件内容并发送给客户端浏览器从数据库中读取内容在发送给浏览器之前首先必须让浏览器知道内容的数据类型这通过向客户端发送ContentType描述实现。为简单起见这里假设发送的内容是Word文档并且显示最新插入的记录。源文件如下 客户端源文件为uploadToDB.htm同上一部分的客户端文件。服务器端源文件readFile.asp %Response.Expires 0response.buffertrue%%response.clearResponse.ContentType application/mswordset connserver.createobject(adodb.connection)conn.open DSNFileUpload;UIDsa;set rs1conn.execute(select maxidmax(id) from uploadFile)SQLselect * from uploadFile where idrs1(maxid)set rsconn.execute(SQL)Response.BinaryWrite rs(Content)rs.closers1.closeconn.close Response.End%其中Web Server向客户端发送Content-Typeapplication/msword,使客户端认为这是Word文档然后服务器从数据库中读取文件内容为简单起见假定是数据库中最后一条记录然后以二进制流的方式向客户端发送调用ASP内置对象Response的BinaryWrite方法。当客户端接收到这些内容后便自动启动Word OLE服务使Word控件嵌在浏览器IE中将收到的内容格式化显示。
