Page 115 - 6735
P. 115
'створити і установити атрибут Data
el.setAttribute "Data", "today" 'задати значення
атрибуту Data
s = el.getAttributeNode("Data").Value 'значення
атрибута Data
Debug.Print s
xmldoc.Save "e:\\my.xml" '*зберегти документ
End If
End Sub
<?xml version="1.0"?>
<doc title="my">
<el1 atr1="1">
<el2 atr1="hello" Data="today">
Hello world!
</el2>
</el1>
<el3 attr="10">hello!!!</el3>
hello
</doc>
Об'єкти Internet Explorer
Об’єктна модель браузера Internet Explorer дозволяє VBA-
програмі звертатись до його компонентів, зокрема документа HTML
[42]. Приклад створює об’єкт Internet Explorer, показує браузер та
створює в ньому HTML-документ із таблицею (рис. 3.10).
Dim IE As Object 'об'єкт програма Internet Explorer
Public Sub main()
Set IE = CreateObject("InternetExplorer.Application")
'створити об'єкт
IE.Navigate "About:Blank" 'початкова сторінка
IE.Toolbar = False 'відключити панель інструментів
IE.StatusBar = False 'відключити рядок стану
Do
115