注冊 | 登陸
您的位置:阿里西西 > 編程技術 > ASP教程 > 詳細內容

ASP處理XML數據的常用函數,讀取,轉換

  稿源:互聯網   2019-03-05   點擊:   撤稿糾錯
一組常用的ASP處理XML的常用函數分享,代碼直接貼出運行時的輸出效果,直接保存為文件運行即可。
阿里西西小編給您推薦這個ASP處理XML數據的常用函數,讀取,轉換,這里還有關于XML 讀取 轉換 的教程,希望您能夠喜歡并學到東西提升自己的知識與技能,下面是內容詳細閱讀:

開發時用到的一組ASP處理XML數據的常用函數。將XML轉換為 請求參數格式,讀取XML節點名的值,還有一個函數是將  【請求參數】 轉換為 XML

  程序代碼(For Alixixi.com)如下:
<%
dim str,arrstr,jsons,xmlstr,para

str = "<xml><mch_id><![CDATA[3423342353]]></mch_id><nonce_str><![CDATA[ibuaiVcKdpRxk43hJA]]></nonce_str><sign><![CDATA[F766FB383C5BCAB169E566DF43DFG]]></sign></xml>"
para = "mch_id=alixixi"


arrstr = XMLToArr(str)
response.write arrstr(0) &"<br />"
response.write GetParaValue(arrstr,"sign") &"<br />"
response.write server.HTMLEncode(paraToXML(para)) &"<br />"

'讀取XML節點名的值
private function GetParaValue(byval paraArr, byval paraName)
    dim i
    GetParaValue = ""
    for i = 0 to Ubound(paraArr)
        if left(paraArr(i), len(paraName) + 1) = paraName & "=" then
            GetParaValue = mid(paraArr(i), len(paraName) + 2)
            exit function
        end if
    next
end function

'將XML轉換為 請求參數格式
'格式:mch_id=1527172451,nonce_str=ibuaiVcKdpRxkhJA
private function XMLToArr(byval xmlDoc)
    dim paraArr(),objXml,objParent,i
    Set objXml = Server.CreateObject("MSXML2.DOMDocument")
    objXml.resolveExternals = false
    objXml.loadxml xmlDoc
    set objParent = objXml.SelectNodes("//xml")
    if objParent.length > 0 then
        redim paraArr(objParent(0).childNodes.length - 1)
        for i = 0 to objParent(0).childNodes.length - 1
            paraArr(i) = objParent(0).childNodes(i).nodeName & "=" & objParent(0).childNodes(i).text
        next
    end if
    XMLToArr = paraArr
end function

'將  【請求參數】 轉換為 XML
private function paraToXML(byval paraItem)
    dim nodeName,nodeValue
    if instr(paraItem, "=") > 0 then
        nodeName = mid(paraItem, 1, instr(paraItem, "=") - 1)
        nodeValue = mid(paraItem, instr(paraItem, "=") + 1)
        paraToXML = "<" & nodeName & "><![CDATA[" & nodeValue & "]]></" & nodeName & ">"
    else
        paraToXML = ""
    end if
end function

%>

教程內容到此結束,歡迎您再次訪問http://www.hmtlio.tw,我們致力于提供豐富的web開發教程及資源。

更多關于 XML 讀取 轉換 的文章
相關閱讀

相關排行總榜

ASP教程

PHP教程

.NET教程

ASP采集功能WinHttp.WinHttpRequest.5.1的
AspJpeg圖片處理組件屬性的詳細中文使用說
通過ASP生成html純靜態頁面的簡單示例
ASP開發中一個把GB2312轉UTF-8編碼的函數
推薦幾個ASP開發中常用的fso操作文件圖片
ASP讀取操作生成excel文件的實例代碼教程
使用ASP進行網站開發防范ASP木馬的10條建
通過ASP調用MSSQL數據庫視圖和存儲過程的
通過aspupload上傳組件實現的ASP實現遠程
ASP調用MSSQL存儲過程進行分頁的兩種方式
PHP解決HTTP和HTTPS跨域共享session的方法
php程序判斷來訪客戶端是手機端還是電腦P
用PHP來獲取當前頁面所有url參數信息的教
配置好環境后,進行php代碼調試的方法總結
教您使用php代碼實現上傳圖片或文件到服務
PHP開發中推薦十款最出色的安全開發工具庫
PHP基礎學習之數組介紹
淺談JSP與ASP.PHP的各種平臺應用比較
php制作一個萬年歷查詢的實例代碼教程
制作簡單安全的php驗證碼類代碼實例
ASP.NET環境配置中幾種身份驗證方式及權限
記錄一次對ASP.NET網站漏洞的入侵和防范教
Asp.net在mvc環境下實現上傳頭像加剪裁功
對 ASP.NET 異步編程的一點理解與分析
ASP.NET讀取與操作Session的代碼案例教程
ASP.NET將大文件數據分成較小的部分進行分
講解.Net組件程序設計之異步調用
AS腳本與Asp.net通過UrlRequest進行前端交
一組常用的.NET命名空間中文解釋
asp.net解決url地址欄傳遞中文參數出現亂
彩票25选5开奖结果