利用VB通过xmlhttp进行数据库远程管理.doc

南 昌 高 专 学 报2009 年第 3 期（总第 82 期） 2009 年 6 月出版 156 Journal of Nanchang CollegeNo.3 (Sum 82)Jun.2009利用VB 通过 xmlhttp 进行数据库远程管理张晖（鞍山师范学院高等职业技术学院 辽宁 鞍山 114016）摘 要：数据库远程监控是互联网现代应用中的一个重要环节。 本文阐述了数据库远程管理的流程和如何使用 xmlhttp 进行数据库远程管理。关键词：xmlhttp； 数据库； 客户端；中图分类号：TP311.132.2文献标识码：A文章编号：1008-7354（2009）030156-030 引言基于互联网的广域网现代应用中的一个重要环节是 数据库远程监控。 随着网络技术的不断发展，互联网上的 数据库远程管理技术经历了早期通过编写 CGI-BIN 程序 模块进行数据库远程管理（但 CGI-BIN 的运行速度慢，维 护很不方便，现在已经基本被弃用）。 到前几年使用组件 对 象模 型(Component Object Model, COM) 的 应 用 非 常 多 ， 效果也很好（但如果使用的是第三方服务器，服务器方往 往 因 为 保 密 或 其 它 商 业 原 因 不 允 许 用 户 注 册 自 己 的 组 件）。 一直到近年来由微软公司推出的.NET 平台和 SUN 公司的 J2EE 平台都是 非常 高 档 的数 据 库 远程 管 理 与服 务平台。 其中，.NET 的简单对象访问协议 (Simple Object Access Protocol, SOAP) 使 用 超 文 本 传 输 协 议 (Hypertext Transfer Protocol, HTTP) 和 扩 展 标 记 语 言 (Extensible Markup Language, XML)技术实现跨系 统(例 如 Windows - Linux)的通讯服务方式已经广为开发商接受和使用。 许多（2） 服务 端 接受 并 执 行有 关 指 令并 向 客 户 端 返 回 结果。（3）客户端接受并显示服务端返回的指令执行结果。实现数据库远程管理的两个主要关键环节是：（1） 客户 端 与服 务 端 之间 的 指 令上 传 和 结 果 下 传 的 数据通道，由 XMLHTTP 协议实现。（2） 服务 端 前沿 与 数 据库 之 间 的指 令 传 送 和 结 果 返 回，由起着中间层作用的 ADO/ADOX 接口完成。2 xmlhttp 的使用顾 名 思 义 ，XMLHTTP 是 个 传 送 XML 格 式 数 据 的 超 文本传输协议。 它是一组 API 函 数 集 ， 可被 JavaScript、 JScript、VBScript 以及其它 web 浏览器内嵌的脚本语言调 用，通过 HTTP 在浏览器和 web 服务器之间收发 XML 或 其它数据。 XMLHTTP 最大的好处在于可以动态地更新网 页，它无需重新从服务器读取整个网页，也不需要安装额 外的插件。 该技术被许多网站使用，以实现快速响应的动 态网页应用2。客户端调用 XMLHTTP 的过程很简单， 只有 5 个 步 骤：(1)创建 XMLHTTP 对象 （需 MSXML4.0 支持）。首先在工程菜单中选择引用菜单项 ， 选择 Microsoft V4.0,单击 OK,一切完成后就可以在 VB 应用程 序中 添 加 XML 对象了。(2)打开与服务端的连接，同时定义指令发送方式，服 务网页(URL)和请求权限等。客户 端 通过 Open 命 令 打开 与 服 务端 的 服 务网 页 的 连接。 与普通 HTTP 指令传送一样，可以用“GET”方法或 POST方法指向服务端的服务网页。(3)发送指令。(4)等待并接收服务端返回的处理结果。大 型 应 用 ， 例 如 企 业 资 源 计 划(Enterprise resourceplanning, ERP)等都建立在这样的大型平台之上1。但对于中小型应用，比如一个网站的建设和维护，这 种大型应用平台就显得有些尾大不掉，开销也过于庞大。 微软公司推出的 XML 解析器(MSXML)中的 XMLHTTP 协 议是一个非常方便实用的客户/服务通讯管道。 综合运用 XMLHTTP 以及 ActiveX 数 据对 象 (ActiveX Data Objects, ADO/ADOX)可以简单方便地实现数据库远程管理。本 文 介 绍 如 何 运 用 XMLHTTP 进 行 远 程 数 据 库 管理。1 数据库远程管理体系数据库远程管理的任务流程是：（1） 客户 端 向服 务 端 发出 数 据 库结 构 和 数 据 的 查 询 或修改指令。收稿日期：20090323作者简介：张晖（1974-），女，辽宁鞍山人，硕士，讲师，主要研究方向：计算机应用。(5)释放 XMLHTTP 对象。具体源程序如下：xml 结构： 文 件 以 二 进 制 方 式 存 在 这 里下面开始Private Sub CreateAndTranXML()Dim ado_stream As New ADODB.StreamGetUpFile.asp(Server 端的) %DimDim Dim Setado_streamoXmlDom xml_file1,m_szpathoXMLDoc = Server.CreateObject (Microsoft.XMLDOM)szPath=server.mappath(getupfile.asp) nPos=instrRev(szPath ? ,) m_szPath=left(szPath,nPos) response.write szPathoXMLDoc.load requestszNow=year(now() & month(now() &Dimxml_ocument 30Dim strA As ?StringdomAsNewMSXML2.DOMDAs String,szFileAs String, m_szUpFileday (now () &m_szUpFile = /getupFile.asp端的 ASP 接受程序serverhour(now() & minute(now() & second(now()szpath=m_szPath & upfile.xml oXMLDoc.save szPath 创建 Stream 对象Set ado_stream = Server.CreateObject (ADODB. Stream) 读出包含二进制数据的节点Set xml_file1 = oXMLDoc.selectSingleNode (/root/file1) 打开 Stream 对象，把数据存入其中 ado_stream.Type = 1 1=adTypeBinary ado_stream.openado_stream.Write xml_file1.nodeTypedValue 文件存盘szFile = App.Path ?& temp.jpg 要 传 送 的 jpg 文件或任何文档strA = xml_dom.loadXML ? (strA) ?Chr (34) & 1.0 &xml_dom.documentElement.setAttributexmlns:dt, urn:schemas-microsoft-com:datatypes Dim ? l_node1 建Set l_node1 = xml_dom.createElement (file1)立一个节点l_node1.dataType = bin.base64ado_streamT. ype=11=adTypeBinaryado_streamo. pen ado_stream.LoadFromFile (szFile) l_node1.nodeTypedValue = ado_stream.Read(-1)adReadAll ado_stream.Closexml_domd. ocumentElemena.tppendChildl(_node1)szPath=m_szpath ? &images & szNow & .jpg储文件ado_stream.SaveToFile szpath,22=adSaveCreateOverWrite response.write ?szpath ado_stream.Close 销毁对象Set ado_stream = NothingSet xmlDoc = ? Nothing% 存-1=xml_dom.save App.Path ? & result.xml存一个备份 本 地 保 可以创建多个二进制节点，一次上传多个文件 把 XML 文档发送到 Web 服务器Dim xmlHttp As New MSXML2.XMLHTTP30 xmlHttp.open POST, m_szUpFile, False数据格式选用如上所述，XMLHTTP 协议的指令上传和结果下达的 数据格式可以是 XML 数据，也可以是字符串，流，或者是 一个无符号整数数组。 其中应用最多的是 XML 数据和字 符串。选用什么样的数据格式，取决于应用程序的需要。对于远程数据库访问的应用，因为要处理大量数据， 可能要求服务端增加/删除/修改纪录，要求在客户端对数 据进行适当的筛选/排序，所以应该使用 XML 数据格式， 并在服务端和客户端分别使用 DOM 对象进行处理3。 关 于 XML 数据的生成、解析，以及 DOM 的应用等请参考关 文章，本文不赘述。3xmlHttp.setRequestHeadertext/xmlxmlHttp.send xml_dom 显示服务器返回的信息CONTENT -TYPE,Debug.Print xmlHttp.responseTextIf xmlHttp.Status = 200MsgBox (上传成功！ ) End IfSet xmlHttp = NothingSet xml_dom = NothingEnd SubThen 158 南昌高专学报2009 年本 文 示 例 中 通 过 XMLHTTP 管 道 的 数 据 量 不 是 很大，但是指令的品种繁多。 因此采用带参数的 URL 上传 指令，用字符串下传结果。 这样作的好处是：(1)易于编写网页程序，与普通 ASP 程序类似(服务端 完全一样，客户端增加几条 XMLHTTP 的指令)。(2)实现数据库在线管理。(3)不用重载网页即可刷新网页数据。因为采用字符串返回结果， 服务端只要用 Response. Write 指 令 就 能 将 执 行 结 果 通 过 XMLHTTP 返 回 给 客 户 端。服务端的处理过程与普通 ASP 网页完全一样。服务端 处 理 完 毕 之 后 ， 等 待 结 果 的 客 户 端 就 用 xmlHttp. responseText 指令取出结果并显示到当前网页。不过，因为采用指令异步执行方式，鼠标在按下指令按钮后会有一段时间的滞后，等待服务器返回结果。 使用 XML 数 据 、DOM 对 象 和 同 步 执 行 方 式 能 够 避 免 这 种 情 况。参考文献1 刘 明. 基 于 XML 和 中 间 件 的 异 构 数 据 库 集 成 D. 贵 州：贵州大学，2006.2 陆璐，刘发贵. 基于 Web 的远程监控系统M. 北京：清 华大学出版社，2008.3 赵晓君. 基于 JMS 和 XML 的异构数据库集成研究D.武汉：武汉理工大学，2005.Abstract:The database long -distance monitoring iselaborated database long -distance management flow and management.Key words:xmlhttp；database；client；in a Internet modern application important link. This articlehow to use xmlhttp to carry on the database long -distance（上接第 152 页）4、师生关系平等性的原则建立新型的师生关系，教师应真情对待学生，关心爱 护每一个学生，公平 地 对 待学 生 ， 不 能厚 此 薄 彼， 尤 其 是 对于学习成绩不 理 想的 学 生 ， 教师 要 多 鼓励 、 多 关 怀， 相 信他们的潜力，切实帮助他们，使自己成为学生的促进者 和服务者。 新课程要求教师从知识技能的传授者转变成 学生发展的促进者， 由居高临下的指挥者转变成合作型 的良师益友， 使教学过程转变为师生共同开发课程标准 的过程。 例如，在上一年级立定跳远课时，笔者改变了以 往惯用的教师讲解、 示范学生模仿练习纠正错误动 作，这一传统的“格式化”的教学方式，采用了让学生在师 生共同创设的虚拟的动物王国运动会中， 学习模仿各种 动物的双脚起跳、双脚落地（立定跳）的方法。 学生通过实 践思考创造发现学习等步骤， 在老师的鼓励和 师生共同探讨、实践下掌握了动作技能。 整个学习过程教 师只是学生学习的引导者和服务者， 在与学生平等的交 往中帮助学生掌握学习方法，学生始终是学习的主人，教 师在一旁起着鼓励、促进作用，如此合作教学较以往事半 功倍。5、教学评价开放性的原则对体育教学的评价必须全面地从学生、教师、环境三 方面着眼，从定量和定性着手，要考虑到学生的知识 、技 能、意志、情感、兴趣等非智力因素；要考虑教师的指导思 想、教法手段、内容态度，学校的校风、学风等因素和学生 的个体条件，注意教学结果的终结性评价；更要注意形成 性评价并使两者结合起来。 其中考试作为一种主要评价 方式，应避免过去的 过 分 军事 化 特 性 、 尽 可 能 减少 限 制 ， 鼓励学生在教师所教内容的基础上努力创新， 充分发挥自己的灵感及 特 长 ， 体 现 自 己的 个 性 ， 因此 ， 外 界 条件 有时可以根据大多数学生