Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / XML, XSL, XPath, XQuery [игнор отключен] [закрыт для гостей] / Как открыть XML таблицу Excel-ем или Access-ом / 5 сообщений из 5, страница 1 из 1
15.03.2006, 08:55
    #33601158
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как открыть XML таблицу Excel-ем или Access-ом
Как открыть XML таблицу Excel-ем или Access-ом, или писать код на VB6?

Дали задание, обработать XML таблицу. Поменять значение. Подсуммировать строки и так далее. А я понятия не имею как работать с этим форматом XML.
...
Рейтинг: 0 / 0
15.03.2006, 10:32
    #33601416
M0us
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как открыть XML таблицу Excel-ем или Access-ом
использовать библиотеки MSXML
...
Рейтинг: 0 / 0
15.03.2006, 11:17
    #33601595
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как открыть XML таблицу Excel-ем или Access-ом
M0usиспользовать библиотеки MSXML
Благодарю! Оказывается у меня на компьютере есть Microsoft XML 3.0
...
Рейтинг: 0 / 0
15.03.2006, 14:39
    #33602479
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как открыть XML таблицу Excel-ем или Access-ом
Друзья! Поделитесь пожалуйста кодом на VBA или VB6 по чтению и изменению XML файла
Например:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub Open_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

   ' а как дальше

End Sub
...
Рейтинг: 0 / 0
16.03.2006, 10:39
    #33604369
M0us
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как открыть XML таблицу Excel-ем или Access-ом
Example
The following Microsoft® Visual Basic® example creates a DOMDocument object, and then uses its loadXML method to load the specified XML before displaying it.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Dim xmlDoc As New Msxml2.DOMDocument40
xmlDoc.async = False
xmlDoc.resolveExternals = False
xmlDoc.loadXML ("<customer><first_name>Joe</first_name><last_name>Smith</last_name></customer>")
If (xmlDoc.parseError.errorCode <>  0 ) Then
   Dim myErr
   Set myErr = xmlDoc.parseError
   MsgBox("You have error " & myErr.reason)
Else
   MsgBox xmlDoc.xml
End If

Рекомендую установить MSXML 4.0 и скачать SDK MSXML 4.0. Там дается множество примеров, в том числе и на VB.
...
Рейтинг: 0 / 0
Форумы / XML, XSL, XPath, XQuery [игнор отключен] [закрыт для гостей] / Как открыть XML таблицу Excel-ем или Access-ом / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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