Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Работа с данными

Страница: 1 |

 

  Вопрос: Знающие LINQ to XML помогите с запросом Добавлено: 17.09.09 09:38  

Автор вопроса:  scowl
есть следующий xml элемент:

        Dim contacts As XElement = _
<contacts>
    <people1>
        <contact>
            <name>Ivanov</name>
            <homephone>no</homephone>
            <mobile>no</mobile>
        </contact>
        <contact>
            <name>Petrov</name>
            <homephone>no</homephone>
            <mobile>yes</mobile>
        </contact>
        <contact>
            <name>Sidorov</name>
            <homephone>yes</homephone>
            <mobile>no</mobile>
        </contact>
    </people1>
    <people2>
        <contact>
            <name>Ivanenko</name>
            <homephone>no</homephone>
            <mobile>no</mobile>
        </contact>
        <contact>
            <name>Petrenko</name>
            <homephone>no</homephone>
            <mobile>yes</mobile>
        </contact>
        <contact>
            <name>Sidorenko</name>
            <homephone>yes</homephone>
            <mobile>no</mobile>
        </contact>
    </people2>
</contacts>


я пытаюсь получить в узле <people2> те фамилии (<name>), у которых <homephone>="no". получается не очень. задача вроде простая, но никак не могу понять как это сделать.

когда пишу

Dim items3 As IEnumerable(Of XElement) = _
        From el In contacts.<people2> _
        Where _
            (From nm In el.<contact> _
             Where nm.<homephone> = "no" _
            Select nm).Any _
        Select el

        For Each cname As XElement In items3
            TextBox3.Text = TextBox3.Text & cname.Value & ControlChars.NewLine
        Next


ругается на nm.<homephone> = "no"

если пишу

Dim items3 As IEnumerable(Of XElement) = _
        From el In contacts.<people2> _
        Where _
            (From nm In el.<contact> _
            Select nm).Any _
        Select el

        For Each cname As XElement In items3
            TextBox3.Text = TextBox3.Text & cname.Value & ControlChars.NewLine
        Next


выводит
IvanenkononoPetrenkonoyesSidorenkoyesno


Подскажите пожалуйста правильный запрос для моего случая

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
 Web-сайт: iSkywalker.ru
 Профиль | | #1
Добавлено: 17.09.09 11:12
  1. Dim items = From el In contacts.<people2>.<contact> Where el.<homephone>.Value = "no" Select el.<name>.Value

Ответить

Номер ответа: 2
Автор ответа:
 scowl



Вопросов: 1
Ответов: 1
 Профиль | | #2 Добавлено: 17.09.09 13:30
Skywalker, большое спасибо

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам