摘  要：随着Internet的兴起与迅猛发展，怎样有效开展网络远程教育正成为当今教育的一个热点问题，网络教育中的资源信息集成正在转向以Intranet技术为主导。该文主要解决开发WWW网络教育应用软件时经常会遇到的问题：远程数据导入导出，并提出了解决方案和实现方法。

　　关键词：Web应用；ASP；文件上传；导入；导出

　　随着Internet 应用在全球的迅速普及,网络教育日趋广泛， 越来越多的教育机构和企业采用Internet/Intranet/Extranet  技术组建自己的教育信息组织与管理平台, 基于WWW和TCP/IP 的B/S模式正逐步取代传统的C/S模式成为信息集成的主流。 在网络资源管理系统开发中经常要提供从客户端对远程服务器端数据库的数据导入与导出功能，本文就这种机制的实现进行探讨。

    　1 系统总体框架

　　目前较好的B/S 解决方案是采用ASP+ADO 的方法, 利用三层结构构造WEB应用程序。ASP(Active Server Page)是Microsoft 公司开发的服务器端脚本编写环境，ASP页是包括HTML标记、文本和脚本命令(用VBScript，JScript脚本语言)的文件。同时ASP可调用Java Applet 和ActiveX组件来开发动态的、交互的、高性能的WEB服务器应用程序。ADO提供了在ASP Web 页面内访问数据的功能。它提供了数据库连接、查询结果集等对象，利用ASP环境可以对这些对象进行编程，完成对各种ODBC数据源的操作。系统的体系结构如下:

　　WEB 浏 览 器

　　WEB 浏 览 器

　　WEB服务器(IIS)

　　Active Serve Page(ASP文件)

　　ActiveX脚本

　　VBscript

　　ADO组件

　　File Access

　　组件

　　数据库

　　激活组件(COM)

　　ODBC/OLE DB 连接                  

　　图1  ASP+ADO 总体框架

　　客户端浏览器通过表单访问WEB服务器上的ASP页面，服务器执行ASP文件可以激活ADO组件，利用ODBC/OLE DB 连接访问数据库服务器。文件系统的访问可以利用File Access  组件实现。

　　WEB应用软件的使用者，由于学习需要经常要在客户端进行远程数据库的导入或导出操作。为达到导出数据的目的，WEB应用程序中可以先把数据库转为文件再通过WWW机制下载文件来实现。同样数据导入可以先通过WWW机制把数据以文件形式上载到WEB服务器，再通过读文件把数据插入数据库来实现。文件的上载和下载可以通过调用第三方组件来实现，我们这里使用一种常用且功能完备的组件ASPSmartUpload。

　　2技术细节

　　2.1通过ADO ODBC DSN---less连接数据库，这种方式不需要建立ODBC 系统DSN

　　以连接SQL数据库为列：

　　Set adocon=Server.CreateObject(“ADODB.Connection”) 

　　Adocon.Open”Drive={SQL Server};Server=(Local);UID=xxx;PWD=yyy;database=zzz;”

　　其中的UID是登录SQL SERVER的“帐号名称”(本列是xxx)，PWD则是“密码”(yyy)，database属性是欲连接的“数据库名称”(zzz)

　　2.2利用ADO Connection 与Recordset 对象进行数据库查询

　　strSQL=“Select * From  tablename Where condition”

　　建立SQL查询语句

　　Set  RS=adocon.Execute(strSQL)

　　利用Connection 对象的Execute方法执行SQL查询语句，返回Recordset对象

　　2.3 File Access 组件的FileSystemObject与TextStream对象的文件处理功能

　　Set objFS=Server.CreateObject(“Scripting.FileSystemObject”)

　　建立FileSystemObject对象实例objFS

　　Set objReadTS=objFS.OpenTextFile(filename[，iomode[，create[，format]]])

　　调用FileSystemObject 对象的OpenTextFile方法打开文件以备读，同时返回TextStream对象objReadTS。

　　Set  objWriteTS=objFS.CreateTextFile(filename[,overwrite[,Unicode]])

　　调用FileSystemObject 对象的CreateTextFile方法建立文件以备写，同时返回TextStream对象objWriteTS。

　　2.4用ASPSmartUpload组件上载和下载文件

　　dirUpload = "/gdzcgl/ruanjiangl/backup"

　　指定文件上载后的存储路径

　　Set  objUpload=Server.CreateObject("AspSmartUpLoad.SmartUpLoad")

　　objUpload.UpLoad

　　建立SmartUpload对象，调用其上载方法

　　intNo = objUpload.Save(dirUpload)

　　将上载后的文件存储到dirUpload 指定的路径