06-10-12, 07:59 PM
تكلمنا عن انشاء الملف وعن خصائصه وتكوين العناصر
لكن حتى الان لم نسند قيم للعناصر
الأمر سهل جدا
كل ما فى الأمر أنه بعد انشاء العنصر - ترسل له قيمة فقط
لكن حتى الان لم نسند قيم للعناصر
الأمر سهل جدا
كل ما فى الأمر أنه بعد انشاء العنصر - ترسل له قيمة فقط
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim st As New System.Xml.XmlWriterSettings
st.Encoding = System.Text.Encoding.UTF8
st.Indent = True
st.IndentChars = ControlChars.Tab
Dim writer As System.Xml.XmlWriter = System.Xml.XmlWriter.Create("C:\BADRMEDIA.xml", st)
writer.WriteStartElement("AddressList")
writer.WriteStartElement("ZIP_CODE")
writer.WriteValue("123-5555")
writer.WriteEndElement()
writer.Close()
Catch ex As Exception
MsgBox("" & ex.Message & "", MsgBoxStyle.Exclamation + MsgBoxStyle.MsgBoxRtlReading + MsgBoxStyle.MsgBoxRight, "BADRMEDIA SoftWare ")
End Try
End Sub