Книга: Программирование мобильных устройств на платформе .NET Compact Framework

Листинг 10.2. Вызов кода, предназначенного для сохранения и загрузки XML-документа

Листинг 10.2. Вызов кода, предназначенного для сохранения и загрузки XML-документа

Private Sub Button1_Click(ByVal sender As System.Object, _
 ByVal e As System.EventArgs) Handles Button1.Click
 Const FILENAME As String = "TestFileName.XML"
 'Сохранить, используя XML DOM
 SaveAndLoadXML_UseDOM.XML_SaveUserInfo(FILENAME, 14, "Ivo", _
  "Salmre")
 'Сохранить, используя объект однонаправленной записи XMLWriter
 'SaveAndLoadXML_UseReaderWriter.XML_SaveUserInfo(FILENAME, _
 ' 18, "Ivo", "Salmre")
 Dim userID As Integer
 Dim firstName As String
 Dim lastName As String
 'Загрузить, используя XML DOM
 SaveAndLoadXML_UseDOM.XML_LoadUserInfo(FILENAME, userID, _
  firstName, lastName)
 'Загрузить, используя объект однонаправленного чтения XMLReader
 'SaveAndLoadXML_UseReaderWriter.XML_LoadUserInfo(FILENAME, _
 ' userID, firstName, lastName)
 MsgBox("Готово! " + _
  userID.ToString() + ", " + lastName + ", " + firstName)
End Sub

Оглавление книги


Генерация: 0.047. Запросов К БД/Cache: 0 / 0
поделиться
Вверх Вниз