Разбор xml в F #, когда файл имеет атрибут xmlns - PullRequest
Новая
       3

Разбор xml в F #, когда файл имеет атрибут xmlns

4 голосов
/ 03 мая 2011

Поэтому я попытался использовать F # XML-сообщение для разбора на следующем xml (из uclassify API): 

<?xml version="1.0" encoding="UTF-8" ?> 
<uclassify xmlns="http://api.uclassify.com/1/ResponseSchema" version="1.01"> 
    <status success="true" statusCode="2000"/> 
    <readCalls> 
    <classify id="cls1"> 
        <classification textCoverage="1"> 
            <class className="happy" p="0.912929"/> 
            <class className="upset" p="0.0870707"/> 
        </classification> 
    </classify> 
    </readCalls> 
</uclassify>

Код выглядит примерно так: 

let doc  = 
    Xdocument.Load file
doc.Element(xn "uclassify")
   .Element(xn "readCalls")
   .Element(xn "classify")
   .Element(xn "classification")
   .Element(xn "class").Attribute(xn "p")

Это не работает !!!Кажется, это не может сделать разбор.Однако удаление атрибута xmlns="http://api.uclassify.com/1/ResponseSchema" version="1.01" делает его работоспособным: 

let doc  = 
    Xdocument.Load file
    let test = IO.File.ReadAllText(file).Replace("xmlns=\"http://api.uclassify.com/1/ResponseSchema\" version=\"1.01\"","")
    XDocument.Parse(test)

doc.Element(xn "uclassify")
   .Element(xn "readCalls")
   .Element(xn "classify")
   .Element(xn "classification")
   .Element(xn "class").Attribute(xn "p")

Обратите внимание, что эта проблема связана с Почему я должен удалить атрибут xmlns ... .Итак, вопрос в том, почему я должен удалить атрибут xmlns?Что я должен использовать для разбора xml с атрибутом xmlns?

Спасибо

Ответы [ 2 ]

3 голосов
/ 04 мая 2011

@ версия dahlbyk работает, но когда у вас есть объект XNamespace, вы можете добавить в него строку в F # так же, как в C #. В результате я предпочел бы этот синтаксис, так как он немного ближе к тому, как это обычно делается в C #: 

let xn = XName.Get
let xmlns = XNamespace.Get

let ns = xmlns "http://api.uclassify.com/1/ResponseSchema"

doc.Element(ns + "uclassify")
   .Element(ns + "readCalls")
   .Element(ns + "classify")
   .Element(ns + "classification")
   .Element(ns + "class")
   .Attribute(xn "p")
2 голосов
/ 03 мая 2011

Вам нужно сослаться на элементы с их пространством имен: 

let xn (tag:string) = XName.Get(tag)
let xnuc (tag:string) = XName.Get(tag, "http://api.uclassify.com/1/ResponseSchema")

doc.Element(xnuc "uclassify")
   .Element(xnuc "readCalls")
   .Element(xnuc "classify")
   .Element(xnuc "classification")
   .Element(xnuc "class")
   .Attribute(xn "p")
...