Aracılığıyla paylaş


Nasıl yapılır: XML Değişmez Değerlerini Değiştirme (Visual Basic)

Visual Basic, XML değişmez değerlerini değiştirmek için kullanışlı yollar sağlar. Öğeleri ve öznitelikleri ekleyebilir veya silebilir ve var olan bir öğeyi yeni bir XML öğesiyle de değiştirebilirsiniz. Bu konu, var olan bir XML değişmez değerinin nasıl değiştirileceğine yönelik çeşitli örnekler sağlar.

Bir XML değişmezin değerini değiştirmek için

  1. XML değişmez değerini değiştirmek için, XML değişmez değerine bir başvuru alın ve Value özelliğini istenen değere ayarlayın.

    Aşağıdaki kod örneği bir XML belgesindeki <Price> tüm öğelerin değerini güncelleştirir.

    For Each book In From element In catalog.<Catalog>.<Book>
      book.<Price>.Value = (book.<Price>.Value * 1.05).ToString("#.00")
    Next
    

    Aşağıda, bu kod örneğinden örnek kaynak XML ve değiştirilmiş XML gösterilmektedir.

    Kaynak XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
      </Book>
    </Catalog>
    

    Değiştirilen XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>47.20</Price>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>48.25</Price>
      </Book>
    </Catalog>
    

    Uyarı

    özelliği, Value bir koleksiyondaki ilk XML öğesine başvurur. Bir koleksiyonda aynı ada sahip birden fazla öğe varsa, özelliğini ayarlamak Value yalnızca koleksiyondaki ilk öğeyi etkiler.

XML literaline öznitelik eklemek için

  1. XML sabitine bir öznitelik eklemek için önce XML sabitine erişin. Daha sonra yeni bir XML öznitelik ekseni özelliği ekleyerek bir öznitelik ekleyebilirsiniz. XAttribute yöntemini kullanarak XML değişmez değerine yeni bir Add nesne de ekleyebilirsiniz. Aşağıdaki örnekte her iki seçenek de gösterilmektedir.

    Dim newAttribute = "editorEmail"
    Dim editorID = "someone@example.com"
    For Each book In From element In catalog.<Catalog>.<Book>
      ' Add an attribute by using an XML attribute axis property.
      book.@genre = "Computer"
    
      ' Add an attribute to the Attributes collection.
      book.Add(New XAttribute(newAttribute, editorID))
    Next
    

    Aşağıda, bu kod örneğinden örnek kaynak XML ve değiştirilmiş XML gösterilmektedir.

    Kaynak XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101" >
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
      </Book>
    </Catalog>
    

    Değiştirilen XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101" genre="Computer" editorEmail="someone@example.com">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk331" genre="Computer" editorEmail="someone@example.com">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
      </Book>
    </Catalog>
    

    XML öznitelik ekseni özellikleri hakkında daha fazla bilgi için bkz. XML Öznitelik Ekseni Özelliği.

XML literaline bir öğe eklemek için

  1. XML değişmez değerine öğe eklemek için önce XML değişmez değerine bir referans edinin. Ardından XElement yöntemini kullanarak Add yeni bir nesneyi XElement öğesinin son alt öğesi olarak ekleyebilirsiniz. yöntemini kullanarak XElement ilk alt öğe olarak yeni AddFirst bir nesne ekleyebilirsiniz.

    Diğer alt öğelere göre belirli bir konuma yeni bir öğe eklemek için, önce bitişik bir alt öğeye başvuru alın. Yeni XElement nesneyi bitişik alt öğeden önce eklemek için AddBeforeSelf yöntemini kullanabilirsiniz. Yöntemini kullanarak yeni XElement nesneyi bitişik alt öğeden AddAfterSelf sonra da ekleyebilirsiniz.

    Aşağıdaki örnekte bu tekniklerin her birine ait örnekler gösterilmektedir.

    Dim vbBook = From book In catalog.<Catalog>.<Book> 
                 Where book.<Title>.Value = 
                   "Developing Applications with Visual Basic .NET"
    
    vbBook(0).AddFirst(<Publisher>Microsoft Press</Publisher>)
    
    vbBook(0).Add(<PublishDate>2005-2-14</PublishDate>)
    
    vbBook(0).AddAfterSelf(<Book id="bk999"></Book>)
    
    vbBook(0).AddBeforeSelf(<Book id="bk000"></Book>)
    

    Aşağıda, bu kod örneğinden örnek kaynak XML ve değiştirilmiş XML gösterilmektedir.

    Kaynak XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101" >
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
      </Book>
    </Catalog>
    

    Değiştirilen XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101" >
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk000"></Book>
      <Book id="bk331">
        <Publisher>Microsoft Press</Publisher>
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
        <PublishDate>2005-2-14</PublishDate>
      </Book>
      <Book id="bk999"></Book>
    </Catalog>
    

Bir XML değişmez öğesinden veya özniteliğinden bir unsuru kaldırmak için

  1. XML literali içerisinden bir elementi veya bir özniteliği silmek için, elemana veya özniteliğe bir referans alın ve aşağıdaki örnekte gösterildiği gibi Remove yöntemini çağırın.

    For Each book In From element In catalog.<Catalog>.<Book>
      book.Attributes("genre").Remove()
    Next
    
    For Each book In From element In catalog.<Catalog>.<Book> 
                     Where element.@id = "bk999"
      book.Remove()
    Next
    

    Aşağıda, bu kod örneğinden örnek kaynak XML ve değiştirilmiş XML gösterilmektedir.

    Kaynak XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101" genre="Computer" editorEmail="someone@example.com">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk000"></Book>
      <Book id="bk331" genre="Computer" editorEmail="someone@example.com">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
      </Book>
      <Book id="bk999"></Book>
    </Catalog>
    

    Değiştirilen XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101" editorEmail="someone@example.com">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
      </Book>
      <Book id="bk000"></Book>
      <Book id="bk331" editorEmail="someone@example.com">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
      </Book></Catalog>
    

    XML değişmez değerindeki tüm öğeleri veya öznitelikleri kaldırmak için, XML değişmez değerine bir başvuru alın ve RemoveAll yöntemini çağırın.

XML değişmezi değiştirmek için

  1. XML öğesinin adını değiştirmek için, önce öğeye bir referans edinin. Daha sonra yeni bir ada sahip yeni bir XElement nesne oluşturabilir ve yeni XElement nesneyi mevcut ReplaceWith nesnenin XElement yöntemine geçirebilirsiniz.

    Değiştirdiğiniz öğenin korunması gereken alt öğeleri varsa, yeni XElement nesnenin değerini mevcut öğenin özelliğine Nodes ayarlayın. Bu, yeni öğenin değerini var olan öğenin iç XML'sine ayarlar. Aksi takdirde, yeni öğenin değerini mevcut öğenin özelliğine Value ayarlayabilirsiniz.

    Aşağıdaki kod örneği tüm <Description> öğeleri bir <Abstract> öğeyle değiştirir. <Description> öğesinin içeriği, <Description>XElement nesnesinin Nodes özelliği kullanılarak yeni <Abstract> öğesinde korunur.

    For Each desc In From element In catalog.<Catalog>.<Book>.<Description>
      ' Replace and preserve inner XML.
      desc.ReplaceWith(<Abstract><%= desc.Nodes %></Abstract>)
    Next
    
    For Each price In From element In catalog.<Catalog>.<Book>.<Price>
      ' Replace with text value.
      price.ReplaceWith(<MSRP><%= price.Value %></MSRP>)
    Next
    

    Aşağıda, bu kod örneğinden örnek kaynak XML ve değiştirilmiş XML gösterilmektedir.

    Kaynak XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
        <Description>
          An in-depth look at creating applications
          with <technology>XML</technology>. For
          <audience>beginners</audience> or
          <audience>advanced</audience> developers.
        </Description>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
        <Description>
          Get the expert insights, practical code samples, and best
          practices you need to advance your expertise with
          <technology>Visual Basic .NET</technology>.
          Learn how to create faster, more reliable applications
          based on professional, pragmatic guidance by today's top
          <audience>developers</audience>.
        </Description>
      </Book>
    </Catalog>
    

    Değiştirilen XML:

    <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <MSRP>44.95</MSRP>    <Abstract>
          An in-depth look at creating applications
          with <technology>XML</technology>. For
          <audience>beginners</audience> or
          <audience>advanced</audience> developers.
        </Abstract>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <MSRP>45.95</MSRP>    <Abstract>
          Get the expert insights, practical code samples, and best
          practices you need to advance your expertise with
          <technology>Visual Basic .NET</technology>.
          Learn how to create faster, more reliable applications
          based on professional, pragmatic guidance by today's top
          <audience>developers</audience>.
        </Abstract>
      </Book>
    </Catalog>
    

Ayrıca bakınız