Ben aşağıdaki kodlarla deneme yapıyorum ama istediğim görüntü oluşmadı.
Kullanılan kod;
Kod:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim xtw As New XmlTextWriter("yeni.xml", System.Text.Encoding.GetEncoding("iSO-8859-9"))
xtw.Formatting = Formatting.Indented
xtw.WriteStartDocument() 'XML belgesine versiyon bilgisi yazılıyor.
xtw.WriteStartElement("AYLIKBILDIRGELER") 'ana root
xtw.WriteStartElement("ISYERI ISYERISICIL") '1 =======
xtw.WriteAttributeString("", "144563245879512365485")
xtw.WriteAttributeString("KONTROLNO", "16")
xtw.WriteStartElement("BORDRO DONEMAY") '2 =======
xtw.WriteAttributeString("", "5")
xtw.WriteAttributeString("DONEMYIL", "2013")
xtw.WriteAttributeString("BELGEMAHIYET", "A")
xtw.WriteStartElement("BILDIRGELER") '3 =======
xtw.WriteAttributeString("BELGETURU", "13")
xtw.WriteAttributeString("DONEMYIL", "2013")
xtw.WriteAttributeString("KANUN", "00000")
xtw.WriteEndElement() 'KAPAT
xtw.WriteStartElement("SIGORTALILAR") 'ana root
xtw.WriteAttributeString("SIRA", "1")
xtw.WriteAttributeString("SIGORTALISICIL", "480119971050")
xtw.WriteAttributeString("TCKNO", "49996666666")
xtw.WriteEndElement() 'KAPAT
xtw.WriteEndDocument()
xtw.Close()
End SubYukarıdaki kodlar ile Xml görüntüsü şu şekilde oluşuyor
Kod:
<?xml version="1.0" encoding="iso-8859-9"?>
<AYLIKBILDIRGELER>
<ISYERI ISYERISICIL ="144563245879512365485" KONTROLNO="16">
<BORDRO DONEMAY ="5" DONEMYIL="2013" BELGEMAHIYET="A">
<BILDIRGELER BELGETURU="13" DONEMYIL="2013" KANUN="00000" />
<SIGORTALILAR SIRA="1" SIGORTALISICIL="480119971050" TCKNO="49996666666" />
</BORDRO DONEMAY>
</ISYERI ISYERISICIL>
</AYLIKBILDIRGELER>Kod:
<?xml version="1.0" encoding="iSO-8859-9"?>
<AYLIKBILDIRGELER>
<ISYERI ISYERISICIL="144563245879512365485" KONTROLNO="16"/>
<BORDRO DONEMAY="5" DONEMYIL="2013" BELGEMAHIYET="A"/>
<BILDIRGELER BELGETURU="13" KANUN="00000">
<SIGORTALILAR>
<SIGORTALI SIRA="1" SIGORTALISICIL="4801199710503" TCKNO="49996666666" AD="ALİYE" SOYAD="SAFİ" PEK="1942.74" GUN="30" />
<SIGORTALI SIRA="2" SIGORTALISICIL="4801199710503" TCKNO="49999999999" AD="ARZU" SOYAD="CAN " PEK="1942.74" GUN="30" />
<SIGORTALI SIRA="3" SIGORTALISICIL="4801199710503" TCKNO="49999999999" AD="ASLI" SOYAD="YAVUZ" PEK="1942.74" GUN="30" />
</SIGORTALILAR>
</BILDIRGELER>
</AYLIKBILDIRGELER>