%Function getHTML(sourceFile) Response.Buffer = True Dim objXMLHTTP, xml Set xml = Server.CreateObject("Microsoft.XMLHTTP") xml.Open "GET", sourceFile, False xml.Send Response.Write xml.responseText Set xml = Nothing End Function%>
![]() |
|
|
|
|||||||||
|
Contents of this web site are intended to be used for the enhancement of
instruction only. |