Código estático del sitio web ASP HTML, puede probar las características específicas.
Función htmll (mulu, htmlmulu, nombre de archivo, fileFrom, htmla, htmlb, htmlc, htmld)
Si mulu = entonces mulu =/
Si htmlmulu = entonces htmlmulu =/
Mulu = reemplazar (sysrootdir & mulu, //, /)
htmlmulu = reemplazar (sysrootdir & htmlmulu, //, /)
Filepath = server.mappath (mulu) &/& filename
Do_url = http: //
Do_url = do_url & request.ServerVariAbles (server_name) y htmlmulu & fileFrom
Do_url = do_url &? & Htmla & htmlb &&& d htmlc & htmld
strurl = do_url
Establecer objxmlhttp = server.createObject (microsoft.xmlhttp)
objxmlhttp.open get, strurl, falso
objxmlhttp.send ()
binfiledata = objxmlhttp.ResponseBody
Establecer objxmlhttp = nada
Establecer objadostream = server.createObject (ADODB. & Stream)
objadostream.type = 1
objadostream.open ()
objadostream.write (binfiledata)
objadostream.savetofile filepath, 2
objadostream.close ()
establecer objadostream = nada
Función final