繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 将HTML表单数据存储为XML格式(2)
- ASP
- 利用ASP将HTML格式数据传输给Excel 的技巧
- 用ASP CSS实现随机背景
- 用ASP实现在线文章翻译的功能
- 动态网页爱好者来看：Asp过滤HTML的函数
- 自动去除字符中含有html代码的几个ASP函数
- 用ASP对网页进行简单的保护
- ASP网页开发过程中的几个小技巧
- ASP动态网页制作中使用SQL语句的方法
- ASP开发中存储过程应用全接触
- 入门：初学ASP动态网页制作常用错误处理
- ASP动态网页下UTF-8页面乱码的解决方法
- 小技巧：解决ASP脚本运行超时的方法
- 动态网页制作技术ASP开发中的常见问题
- 动态网页技术ASP日期和时间函数示例
- ASP程序实现保存参数值的分页功能
- 用ASP寻找到真实IP地址的方法
- ASP中文显示解决技巧及创建对象方法
- ASP实例：Asp 防止网页频繁刷新一法
- 将ASP动态网页转换成HTM静态页面的方法
- 技巧：得到刚刚插入的记录的自动编号值一例
ASP 中的 将HTML表单数据存储为XML格式(2)
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 27 ::
收藏到网摘: n/a
MyXMLDoc.xml:
<?xml version="1.0"?>
<rootElement>
<childElement1 />
<childElement2 />
</rootElement>
在"MyXMLDoc.xml"文档中，childElement1 和 childElement2 会以空的elements形式出现。如果它们被赋值，那么每个值都将由标记符括起来。
现在，让我们来思考一下如何将HTML数据写到XML文档中去。我们已经知道该如何创建和存储XML文档。将一个表单数据写到XML文档中去的过程，现在已演变成为Request Object"s Form Collection以及将每一个表单域的value书定到XML element value 中去的步骤重复。以上可以通过ASP来完成。
例：将数据输送到XML
现在，我们举一个普通的HTML表单的例子来说明。此Form有用户名，地址，电话，以及E-MAIL等几个域。并将这些信息写入XML文件中并保存。
EnterContact.html:
<html>
<head>
<title>
Contact Information
</title>
</head>
<body>
<form action="processForm.asp" method="post">
<h3>请输入你的联系方式</h3>
First Name: <input type="text" id="firstName" name="firstName"><br>
Last Name: <input type="text" id="lastName" name="lastName"><br>
Address #1: <input type="text" id="address1" name="address1"><br>
Address #2: <input type="text" id="address2" name="address2"><br>
Phone Number: <input type="text" id="phone" name="phone"><br>
E-Mail: <input type="text" id="email" name="email"><br>
<input type="submit" id="btnSub" name="btnSub" value="Submit"><br>
</form>
</body>
</html>
将Form 中数据发送到processForm.asp.。这是一个ASP页面，在这个ASP中将反复调用同一个函数将form数据写入XML文件。
processForm.asp:
<%
"--------------------------------------------------------------------
"The "ConvertFormtoXML" Function accepts to parameters.
"strXMLFilePath - The physical path where the XML file will be saved.
"strFileName - The name of the XML file that will be saved.
"--------------------------------------------------------------------
Function ConvertFormtoXML(strXMLFilePath, strFileName)
"Declare local variables.
Dim objDom
Dim objRoot
Dim objField
Dim objFieldValue
Dim objattID
Dim objattTabOrder
Dim objPI
Dim x
"Instantiate the Microsoft XMLDOM.
Set objDom = server.CreateObject("Microsoft.XMLDOM")
objDom.preserveWhiteSpace = True
"Create your root element and append it to the XML document.
Set objRoot = objDom.createElement("contact")
objDom.appendChild objRoot
"Iterate through the Form Collection of the Request Object.
For x = 1 To Request.Form.Count
"Check to see if "btn" is in the name of the form element.
"If it is, then it is a button and we do not want to add it
"to the XML document.
If instr(1,Request.Form.Key(x),"btn") = 0 Then
"Create an element, "field".
Set objField = objDom.createElement("field")
&
评论 (0) All
