中国教育和科研计算机网
EDU首页 |  中国教育 |   高校科技 |   教育信息化 |   CERNET
教育信息化

资讯 | 专题 会议 观点 专栏 访谈 企业 产品 CIO 技术 校园信息化 下一代互联网 IPv6视频课堂

中国教育网 > 教育信息化
您现在的位置: EDU首页 > 教育信息化 > 支撑平台 > 数据库
网络教育中远程数据库导入与导出机制
http://www.edu.cn   2008-06-01 作者:王凤蕊;王文宏

字体选择:【大】 【中】 【小】

  3.2远程数据导出

  客户端可以通过在HTML文件中嵌入超级链接激活一个ASP文件来实现,代码略。
  下面主要介绍ASP文件的实现:
  <%
  ‘指定欲建立的文件
  FullPath=Server.MapPath("/gdzcgl/ruanjiangl/backup/dwbak.txt")
  Set objFS=Server.CreateObject("Scripting.FileSystemObject")
  Set objWriteTS=objFS.CreateTextFile(FullPath,-1,0)
  Set  Conn=Server.CreateObject("ADODB.Connection")
  Conn.Open"Driver={SQL Server};Server=(Local);UID=sa;PWD=system;DATABASE=pubs;"
  ’用SQL语句查询欲导出的数据
  SQL1="select  *  from rdw"
  Set RS1=Conn.Execute(SQL1)
  ‘从RecordSet对象中逐条读取数据并写入文件
  For i=0  to  RS1.Fields.Count-1
  objWriteTS.Write(RS1(i).Name)
  objWriteTS.Write(" ")
  Next
  objWriteTS.WriteLine
  Do  While  Not  RS1.EOF 
  For i=0  to  RS1.Fields.Count-1
  objWriteTS.Write(RS1(i)) 
  objWriteTS.Write(" ")
  Next
  objWriteTS.WriteLine
  RS1.MoveNext
  Loop 
  objWriteTS.Close
  RS1.Close
  conn.Close
  ‘通过建立ASPSmartUpload组件的SmartUpload对象,并调用其DownLoadFile方法
  ‘把建立的文件下载到客户端
  Dim MyUpLoad
  Set MyUpload = Server.CreateObject("AspSmartUpLoad.SmartUpLoad")
  MyUpload.DownloadFile "/gdzcgl/ruanjiangl/backup/dwbak.txt","application/x-zip-compressed" %>
  上面的ASP文件的主要处理逻辑如下:
  在WEB服务器的指定路径下建立一个文件备写。
  连接需要的 SQL 数据库,从指定的表中查询到所需数据
  把上面查到的数据库记录逐条写入文件
  调用ASPSmartUpload组件的SmartUpload对象的DownloadFile 方法把指定文件下载到客户端

  4.总结

  上面的远程数据导入、导出技术已经在高校国有资产管理系统中得到很好的应用,现在写出来希望能为我们开发网络资源管理系统中所涉及的数据库问题提供一个解决方案。这种技术较其它方案如通过FTP或邮件等具有可集成性和易使用性,可直接移植到其他WEB应用中而无须重写代码。

  作者简介:
  华东师范大学教育信息技术学系2000研    上海    200062 wfrsh@163.net
  北京化工大学计算机系 102信箱     北京    100029  wenhongonline@263.net   

  参考文献
  [1]  廖信彦,编著.Active Server Page 3彻底研究.北京: 中国铁道出版社,2000年.
  [2]  汪晓平等  ASP网络开发技术   北京:人民邮电出版社

    

页面功能 【打印】 【关闭】 【我有话说

MOOC风暴来袭

版权所有:中国教育和科研计算机网网络中心 CERNIC,CERNET,京ICP备15006448号-16,京网文[2017]10376-1180号

关于假冒中国教育网的声明 | 有任何问题与建议请联络:Webmaster@staff.cernet.com