powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / файл *.xml. с чем его едят ?
3 сообщений из 3, страница 1 из 1
файл *.xml. с чем его едят ?
    #33493259
крошка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
впервые встретилась с файлом *.xml . Как он формируется,какими средствами?
...
Рейтинг: 0 / 0
файл *.xml. с чем его едят ?
    #33493329
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Поиск по форуму или в интернете
...
Рейтинг: 0 / 0
файл *.xml. с чем его едят ?
    #33493443
1. Использовать XML DOM.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
Private Const strFilePath As String = "D:\2\Test.xml"

Public Sub CreateXML()
    ' Для работы подключи библиотеку
    ' "Microsoft XML".
    
    Dim objDoc As MSXML2.DOMDocument
    Dim objNode As MSXML2.IXMLDOMNode
    Dim objRoot As MSXML2.IXMLDOMElement
    Dim objCar As MSXML2.IXMLDOMElement
    
    Set objDoc = New DOMDocument
    objDoc.resolveExternals = True
    
    Set objNode = objDoc.createProcessingInstruction( _
      "xml", "version='1.0' encoding='UTF-8'")
    Set objNode = objDoc.insertBefore(objNode, _
      objDoc.childNodes.Item( 0 ))
    
    Set objRoot = objDoc.createElement("dataroot")
    Set objDoc.documentElement = objRoot
    objRoot.setAttribute "xmlns:od", _
      "urn:schemas-microsoft-com:officedata"
    
    Set objCar = objDoc.createElement("Car")
    objRoot.appendChild objCar
    
    Set objNode = objDoc.createElement("Make")
    objNode.Text = "Mini Cooper"
    objCar.appendChild objNode
    
    Set objNode = objDoc.createElement("Model")
    objNode.Text = "S"
    objCar.appendChild objNode

    Set objNode = objDoc.createElement("Price")
    objNode.Text = "20,000"
    objCar.appendChild objNode
    
    objDoc.Save strFilePath
End Sub

2. Править как тесктовый файл.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / файл *.xml. с чем его едят ?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]