I am on Windows 7.
Code: Select all
HTMLObj := ComObject("HTMLfile")
HTMLObj.write(HTML)
DOMObj := HTMLFileObj.getElementsByTagName("section") ;or "nav"
msgbox DOMObj[0].outerHTML
; returns "<section class=mysection>"
Code: Select all
HTMLObj := ComObject("HTMLfile")
HTMLObj.write(HTML)
DOMObj := HTMLFileObj.getElementsByTagName("section") ;or "nav"
msgbox DOMObj[0].outerHTML
; returns "<section class=mysection>"
Code: Select all
<meta http-equiv="X-UA-Compatible" content="IE=edge">
Code: Select all
HTML := '<!DOCTYPE html> <html> <head> <meta charset="UTF-8"> <title></title> <style> </style> <script> //mysecipt 1 </script> <noscript>no script 1</noscript> </head> <body> <script> //mysecipt 2 </script> <noscript>no script 2</noscript> <div>Hello World!</div></body> </html>'
htmlObj := ComObject("HTMLfile")
htmlObj.write(HTML)
domElement := htmlObj.getElementsByTagName("script")
msgbox domElement[0].outerHTML ; returns "<SCRIPT> //mysecipt 1 </SCRIPT>"
domElement := htmlObj.getElementsByTagName("noscript")
msgbox domElement[0].outerHTML ; returns "<NOSCRIPT></NOSCRIPT>"