网络教育中的远程数据库导入与导出机制

时间:2018-08-28 15:46:17 文章来源:郑州大学远程教育学院 浏览:0
随着互联网应用在世界范围内的迅速普及,网络教育日益普及。越来越多的教育机构和企业利用Internet/Intranet/Extranet技术建立自己的教育信息组织和管理平台。基于WWW和TCP/IP的B/S模式正逐渐取代传统的C/S模式成为信息集成的主流,在网络资源管理系统的开发中,经常需要提供从客户端到远程服务器数据库的数据导入和导出功能。本文讨论了这一机制的实现。

目前,较好的B/S解决方案是采用ASP+ADO方法,构造三层结构的WEB应用程序,ASP(Active Server Page)是微软开发的服务器端脚本环境。ASP页面是包含HTML标签、文本和脚本命令的文件(使用VBScript、JScript脚本语言),同时ASP调用Java Applet和ActiveX组件开发动态的、交互式的、高性能的Web服务器应用程序。ADO提供访问数据的功能。在ASP网页中,提供数据库连接、查询结果集等对象,利用ASP环境进行编程,完成各种ODBC数据源的操作。

WEB浏览器WEB服务器(IIS)活动服务页(ASP文件)活动X脚本VBscript ADO组件文件访问组件数据库激活组件(COM)ODBC/OLE DB连接

图1 ASP+ADO总体框架

客户端浏览器通过表单访问WEB服务器上的ASP页面,服务器执行ASP文件激活ADO组件,使用ODBCOLE DB连接访问数据库服务器,使用文件访问组件可以实现对文件系统的访问。

Web应用程序的用户通常需要通过学习从客户端导入或导出远程数据库。为了导出数据,Web应用程序可以首先将数据库转换成文件,然后通过WWW机制下载文件。同样,可以通过上行来实现数据导入。通过WWW机制将数据以文件的形式加载到Web服务器上,然后通过读取文件将数据插入到数据库中,通过调用第三方组件来实现文件上传和下载,这里使用的是一个通用的、全功能的组件ASP智能上载。

连接到SQL数据库作为一个列:设置ADOCON=服务器。创建对象(ADODB)。连接)AdoCon。OpenDrive={SQL Server};Server=(Local);UID=xxx;PWD=yyy;database=zzz;其中UID是登录到SQL SERVER(本专栏中的xxx)中的帐户的名称,PWD是密码(yy),数据库属性是要连接到的数据库名称(zzz)。

TrSQL=从TabLeNAMEY选择SELECT,条件创建SQL查询集RS= ADOCON。执行(STRSQL)使用连接对象的执行方法执行SQL查询并返回记录集对象

文件访问组件和文件处理功能的2.3文件对象设置Objfs=服务器。CreateObject(脚本)。FielSistMeObject创建FraseStEngObject对象实例ObjsStutObjists= ObjFS。OpenTextFile(文件名{,iomode{,创建{,格式})调用OpenTextFileSystemObject对象的OpenTextFileFilesquare该方法打开文件进行读取并返回TextStream对象objReadTS.Set objWriteTS=objFS.CreateTextFile(文件名{,覆盖{,Unicode}})调用FileSystemObject对象的CreateTextFile方法来创建用于写入的文件,并返回TextStream对象objWriteTS。

DIRUPLADAD= /GDZCGL/RuangJiLBuffe指定文件上传后的存储路径设置ObjtApp=服务器。CreateObject(ApStudioTopad。智能图集ObjPosiple。上传建立StudioPad对象并调用上传方法InNO.ObjPosid。保存(DILUPROAD)将上传的文件存储到DILUPROAD指定的路径上

下面是客户端界面网页的设计,使用HTML语言和VBScript脚本实现使用HTML FORM标签嵌入多个文件类型INPUT标签实现多个文件的单次上传,使用VBScript脚本部分检查用户是否指定了文件e上传。

HTML标题/标题/头型方法HOD=POST名称=上载动作= IdDATA。系统数据INPUT TYPE=中心输入=复位值All rewritename=b2 输入类型=提交value=提交name=b1 窗体/Obj/html

上面的HTML文件处理要上传到IdDATA的文件。ASP文件通过表单。首先,通过ASP智能上载组件将文件上传到Web服务器的指定路径。然后,在客户端上显示成功上传的文件信息。然后,连接所需的数据库,并通过读取文件将数据逐个插入到数据中。

HTMLHealthEDATA DATABORION/THEMETHORION/WITH,FieldRuPuald= /GDZCGL/RuangJiLBuffel指定路径设置ObjtApp=服务器。CreateObject(ApStudioTopad。智能图集ObjPosiple。上传上传文件iNo.ObjPosid。保存(DILU)PLAAD)保存文件FultPosith=服务器。MapPath()/GDZCGLRuangJiangBuffe/DWBAK。TXT)设置Objfs=服务器。CreateObject(剧本)。文件系统对象设置ObjtReist= ObjFS。OpenTestFrfile(FultPoad,1,-1, 0)打开已打开的文件,读取数据对象。ReNNUM=4'建立数据库连接集CONN= SELILLYN= SEJFS RVER。CreateObject(AdodB)。连接CON.OPEN驱动程序= {SQLServer };服务器=(本地);UID= SA;PWD=系统;数据库= PUBS; '清除原始表数据SQL1= 删除RDW设置RS1= CON.COUNTION(SQL1)读取文件,并将数据插入到数据库表中,当ObjeDebug时。CStr(StrufLINE)=SARFINE=SRIFE(StrufLINE,)SqL2=插入到RDW值()中,i=0到LINENU-2SqL2=SqL2''Ayn(i)'NeX-SqL2= SqL2''Ayn(LINENOT-1)

  • 联系我们
  • 联系人:张老师13603712410
  • 办公室:0371-56792306
  • QQ/微信:67769600或13603712410
  • 郑州市二七区大学路郑大老校区内
  • (现场咨询或报名需提前一天预约)
515