怎么使用纯HTML的通用数据管理和服务

　　介绍

这篇文章将为大家详细讲解有关怎么使用纯HTML的通用数据管理和服务,小编觉得挺实用的,因此分享给大家做个参考,希望大家阅读完这篇文章后可以有所收获。

使用纯HTML的通用数据管理和服务。然而,为了收集数据,你需要一个数据储存库。要避免使用数据库服务器带来的很多问题,你可以在xml中收集这些数据。下面是我们的项目的基本结构:

& lt; user> 　　,,,& lt; first_name/比; 　　,,,& lt; last_name/比; 　　,,,& lt; mi/比; 　　& lt;/user>

我最初将数据限制为姓,姓和中间。这个页面之后的基本思想是用户信息在这个页面中获得。在用户信息需求得到满足以后,流程必须被转到下一个逻辑收集步骤。为了使事情变得简单,我将把用户功能包装到一个asp类中。

Function 合并(vVar, vAlt) 　　,,,If  vVal =,““,或是VarType (vVal),=, 1,趁机VarType (vVal),=0,那么 　　,,,,,,,Coalesce =vAlt 　　,,, 　　,,,,,,,Coalesce =vVal 　　,才能最终获得;如果 　　最终获得函数 　　Class 最有用处 　　PRivate  m_SQL m_DOM 　　Public  Property  Get  DOM () 　　,,,Set  DOM =m_DOM 　　最终获得产权 　　Public  Sub  saveUser () 　　,,,m_SQL.save “save_user", m_DOM 　　最终获得子 　　Public  Function  validate () 　　,,,m_DOM.loadXML “& lt; root>“,,, m_SQL.validateUser (m_DOM),,,“& lt;/root>“ 　　,,,If  Not  m_DOM.selectSingleNode (“//error"), Is  Nothing 然后 　　,,,,,,,validate =False 　　,,, 　　,,,,,,,validate =,真的 　　,才能最终获得;如果 　　最终获得函数 　　Private  Sub  collectData (dom, oCollection) 　　,,,Dim  nItem,,节点,parent_node,, n, sKey 　　,,,For  nItem =, 1,用oCollection.Count 　　,,,,,,,sKey =, oCollection.Key (nItem) 　　,,,,,,,Set  parent_node =, dom.selectSingleNode (“//,,,, sKey ,,“s") 　　,,,,,,,If  Not  parent_node  Is  Nothing 然后 　　,,,,,,,,,,,For  n =, 1,用oCollection .Count (sKey) 　　,,,,,,,,,,,,,,,Set  node =, parent_node.selectSingleNode (sKey , _ 　　,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,“[string ()=& # 39;,,, 　　oCollection (sKey) (n),,,“& # 39;]“) 　　,,,,,,,,,,,,,,,If  node  Is  Nothing 然后 　　,,,,,,,,,,,,,,,,,,,Set  node =, dom.createNode (1, sKey,,,,) 　　,,,,,,,,,,,,,,,,,,,Set  node =, parent_node.appendChild(节点) 　　,,,,,,,,,,,,,,最终获得;如果 　　,,,,,,,,,,,,,,,node.text =,合并(oCollection (sKey) (n),,,,) 　　,,,,,,,,,,,下一个 　　,,,,,,, 　　,,,,,,,,,,,Set  node =, dom.selectSingleNode (“//,,,, sKey) 　　,,,,,,,,,,,If  Not  node  Is  Nothing  Then  _ 　　,,,,,,,,,,,,,,,node.text =,合并(oCollection (sKey),,,,) 　　,,,,,,最终获得;如果 　　接下来,,, 　　最终获得子 　　Private  Sub  Class_Initialize () 　　,,,Set  m_SQL =New  CSQL 　　,,,Set  m_DOM =, Server.CreateObject (“MSXML2.DOMDocument") 　　,,,m_DOM.async =False 　　,,,If  VarType (Request  (“txtUserXML")),=, 0,趁机Request  (“txtUserXML"),=,,,, 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null 　　null

怎么使用纯HTML的通用数据管理和服务