Changeset 444

Timestamp:

Feb 28, 2008, 11:36:39 PM (16 years ago)

Author:

dai

Message:

タグ属性用のテストコードを追加。

File:

• trunk/TestCase/SimpleTestCase/XmlTest.ab (modified) (1 diff)

trunk/TestCase/SimpleTestCase/XmlTest.ab

@@ -7 +7 @@
     doc.AppendChild( doc.CreateElement( "root" ) )
     doc.ChildNodes[1].AppendChild( doc.CreateElement( "test" ) )
+
+    Dim attr1 = doc.CreateAttribute( "attr1" )
+    attr1.Value = "123"
+    doc.ChildNodes[1].Attributes.Add( attr1 )
+    Dim attr2 = doc.CreateAttribute( "attr2" )
+    attr2.Value = "456"
+    doc.ChildNodes[1].Attributes.Add( attr2 )
+
     System.Diagnostics.Debug.WriteLine( doc.OuterXml() )
 End Sub