亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 學院 > 開發設計 > 正文

把HTML表單提交的數據轉化成XML文件

2019-11-18 20:31:28
字體:
來源:轉載
供稿:網友
    通常,在asp中進行的form表單提交的數據都被寫進數據庫管理系統中去,如果你想要你的數據是方便攜帶的數據,你可以把它寫進一個xml文件中去。這種方法是跨平臺的,因此你所收集的信息不需要進行轉換。
為了實現上面的想法,你必須先利用Microsoft XMLDOM建立一個XML文件,Microsoft XMLDOM對象有一個擴展對象庫,它可以創建組成XML文件所需要的元素、屬性、屬性值。
    當XMLDOM對象實例化以后,必須對各個元素進行引用來建立XML的結構,下面的例子就是先建立根元素,并把她追加到XML文件中;然后創建各個子元素,并追加元素的屬性值。最后保存為XML文件。

實例化 Microsoft XMLDOM Object: <%
Dim objDom
Dim objRoot
Dim objChild1
Dim objChild2
Dim objPI
Set objDom = Server.CreateObject("Microsoft.XMLDOM")
Set objRoot = objDom.createElement("rootElement")

objDom.appendChild objRoot
Set objChild1 = objDom.createElement("childElement1")

objRoot.appendChild objChild1
Set objChild2 = objDom.createElement("childElement2")

objRoot.appendChild objChild2

Set objPI = objDom.createobjDom.insertBefore objPI, objDom.childNodes(0)
objDom.Save "c:/MyXMLDoc.xml"
%>




    一旦你保存了文件,用IE5+打開后,樣式如下[當然,屬性還沒有被賦值]:
   MyXMLDoc.xml: <?xml version="1.0"?>
<rootElement>
<childElement1 />
<childElement2 />
</rootElement>




 

下面我們來看看怎樣利用這個對象來存儲用戶的輸入信息。

首先建立輸入表單的頁面。
EnterContact.html: <html>
<head>
<title>
通訊信息
</title>
</head>
<body>
<form action="processForm.asp" method="post">
  <h3>請輸入您的通訊信息:</h3>
  姓  名: <input type="text" id="Name" name="姓名"><br>
  性  別: <input type="text" id="sexName" name="性別"><br>
  地  址: <input type="text" id="address" name="地址"><br>
  工作單位: <input type="text" id="company" name="工作單位"><br>
  電  話: <input type="text" id="phone" name="電話"><br>
  電子郵件: <input type="text" id="email" name="電子郵件"><br>
  <input type="submit" id="btnSub" name="btnSub" value="提交"><br>
</form>
</body>
</html>



然后編寫ASP代碼,遍歷表單元素,并把輸入的信息寫進XML文件。
processForm.asp: <%
'--------------------------------------------------------------------
'函數 "ConvertFormtoXML"接收傳遞的參數。
'strXMLFilePath - XML存放的物理地址。
'strFileName - 要保存的XML文件的名字。
'--------------------------------------------------------------------
Function ConvertFormtoXML(strXMLFilePath, strFileName)
'定義本地變量.
Dim objDom
Dim objRoot
Dim objField
Dim objFieldValue
Dim objattID
Dim objattTabOrder
Dim objPI
Dim x

'實例化Microsoft XMLDOM對象.
Set objDom = server.CreateObject("Microsoft.XMLDOM")
objDom.preserveWhiteSpace = True

'創建XML文檔的根元素contact,并追加到XML文檔中。
Set objRoot = objDom.createElement("通訊錄")
objDom.appendChild objRoot

'遍歷Request對象Form元素的集合。
For x = 1 To Request.Form.Count

If instr(1,Request.Form.Key(x),"btn") = 0 Then

'創建元素 "field".
Set objField = objDom.createElement("field")

'創建屬性 "id".
Set objattID = objDom.createAttribute("id")

'設定id屬性的值等于Form中各元素的值。
objattID.Text = Request.Form.Key(x)

'setAttributeNode 方法把id屬性值追加到field元素。
objField.setAttributeNode objattID

'創建屬性taborder。
Set objattTabOrder = objDom.createAttribute("taborder")

'設定taborder的屬性值
objattTabOrder.Text = x

'把taborder的屬性值追加到field元素中去。
objField.setAttributeNode objattTabOrder

'創建一個新的元素field_value.
Set objFieldValue = objDom.createElement("field_value")

'賦值
objFieldValue.Text = Request.Form(x)

'追加field元素為根元素的子元素。
objRoot.appendChild objField

'追加field_value做為子元素的內容
objField.appendChild objFieldValue
End If
Next


'創建xml聲明
Set objPI = objDom.createProcessingInstruction("xml", "version='1.0' encoding='gb2312'")

'把xml生命追加到xml文檔
objDom.insertBefore objPI, objDom.childNodes(0)

'保存xml文件
objDom.save strXMLFilePath & "/" & strFileName

'釋放所有對象所引用的值
Set objDom = Nothing
Set objRoot = Nothing
Set objField = Nothing
Set objFieldValue = Nothing
Set objattID = Nothing
Set objattTabOrder = Nothing
Set objPI = Nothing
End Function


'發生錯誤時繼續執行
On Error Resume Next

'調用函數ConvertFormtoXML把文件存放到指定的文件目錄和文件名。
ConvertFormtoXML "D:/aspexam","Contact.xml"

'如果發生錯誤,提示用戶,否則報告成功。
If err.number <> 0 then
Response.write("保存form值出現錯誤?。?!")
Else
Response.write("提交成功??!")
End If
%>



用IE5+打開Contact.xml文件.


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
亚洲免费视频网站| 欧美性感美女h网站在线观看免费| 九九九久久久久久| 成人网址在线观看| 国内精品中文字幕| 欧美日韩一区二区在线播放| 亚洲成人免费网站| 久久久人成影片一区二区三区观看| 日韩成人av在线播放| 久久九九热免费视频| 日韩成人中文字幕在线观看| 亚洲精选一区二区| 国产亚洲精品久久久久久777| 日韩成人xxxx| 精品在线观看国产| 中文国产亚洲喷潮| 亚洲自拍偷拍第一页| 色偷偷偷亚洲综合网另类| 国产91色在线|免| 成人免费激情视频| 国产精品成久久久久三级| 国产精品大陆在线观看| 欧美成人激情视频免费观看| 国产成人精品一区二区| 国产极品精品在线观看| 国产福利精品在线| 国内精品国产三级国产在线专| 在线观看精品国产视频| 国产女人精品视频| 日韩精品在线观看一区二区| 色偷偷91综合久久噜噜| 欧美有码在线视频| 91在线观看免费高清完整版在线观看| 亚洲精品狠狠操| 免费99精品国产自在在线| 久久久久久国产免费| 色综合视频一区中文字幕| 久久6免费高清热精品| www日韩中文字幕在线看| 亚洲国产精品小视频| 久久色精品视频| 久久久久久美女| 欧美另类在线播放| 美女黄色丝袜一区| 精品视频久久久久久久| 5278欧美一区二区三区| 在线视频精品一| 九九热在线精品视频| 欧美性xxxxx极品娇小| 欧美成人久久久| 国产视频精品va久久久久久| 91精品国产91久久久久久最新| 日本一区二区在线免费播放| 欧美日韩亚洲天堂| 欧美一级片在线播放| 亚洲夜晚福利在线观看| 欧美国产欧美亚洲国产日韩mv天天看完整| 成人精品网站在线观看| 欧美国产日韩中文字幕在线| 中文字幕自拍vr一区二区三区| 黄色一区二区在线| 91伊人影院在线播放| 欧美日韩精品中文字幕| 久久久久久免费精品| 中国china体内裑精亚洲片| 久久在线免费视频| 欧美激情国产日韩精品一区18| 欧美日韩成人在线视频| 国产精品欧美一区二区| 性色av一区二区三区免费| 亚洲色图35p| 国产99久久精品一区二区| 欧美老肥婆性猛交视频| 这里只有精品丝袜| 色妞色视频一区二区三区四区| 亚洲精品久久视频| 亚洲毛茸茸少妇高潮呻吟| 亚洲天堂男人天堂女人天堂| 欧美精品激情视频| 亚洲国产精品专区久久| 91九色国产视频| 亚洲国产精品电影在线观看| 亚洲二区在线播放视频| 亚洲三级 欧美三级| 日韩精品亚洲视频| 精品日本高清在线播放| 毛片精品免费在线观看| 97在线精品视频| 国精产品一区一区三区有限在线| 91中文字幕在线观看| 992tv在线成人免费观看| 欧美激情在线有限公司| 国产不卡av在线免费观看| 欧美国产日韩一区| 91精品啪在线观看麻豆免费| 日韩一区二区三区在线播放| 亚洲第一男人天堂| 欧美亚洲成人xxx| 日韩精品免费综合视频在线播放| 久久久久久亚洲精品| 久久激情五月丁香伊人| 国产精品极品在线| 欧美综合在线第二页| 中文字幕精品久久久久| 97视频色精品| 欧美激情极品视频| 国产在线视频不卡| 久久久成人精品| 色777狠狠综合秋免鲁丝| 久久成人人人人精品欧| 九色成人免费视频| 26uuu日韩精品一区二区| 日本精品性网站在线观看| 欧美在线www| 亚洲少妇激情视频| 亚洲免费视频网站| 欧美激情国产高清| 日韩欧美国产激情| 91麻豆国产语对白在线观看| 92看片淫黄大片欧美看国产片| 国产精品久久久久久久久久久久久久| 亚洲精品av在线| 热久久免费国产视频| 久久久久久久久久久免费精品| 2019中文字幕在线免费观看| 中文字幕亚洲二区| 久久精品美女视频网站| 国产欧美精品一区二区| 国精产品一区一区三区有限在线| 亚洲男人第一网站| 亚洲第一区中文字幕| 久久久最新网址| 欧美在线视频观看免费网站| 日韩av在线最新| 91中文字幕一区| 国产精品99久久久久久久久| 欧美成aaa人片免费看| 午夜精品99久久免费| 亚洲激情中文字幕| 日韩视频免费观看| 国产一区红桃视频| 欧美日韩免费看| 欧美成年人视频| 亚洲男人的天堂网站| 精品久久久久久久大神国产| 日韩av在线资源| 最好看的2019的中文字幕视频| 色噜噜亚洲精品中文字幕| 日韩在线观看高清| 色婷婷亚洲mv天堂mv在影片| 国产亚洲一区精品| 亚洲视频免费一区| 中文字幕亚洲精品| www.久久久久久.com| 91精品视频观看| 欧美成人一区二区三区电影| 91久久在线观看| 国产亚洲一级高清| 中日韩美女免费视频网址在线观看| 国产精品18久久久久久麻辣| 欧美高清视频一区二区| 国产精品mp4| 亚洲欧美国产另类| 日韩高清av一区二区三区|