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
   110   111   112   113   114   115   116   117   118   119   120