ASP simple génère un exemple de code de page d'accueil statique
<%
Dim objxmlhttp, binfiledata, objadostream
Définir objxmlhttp = server.createObject (Microsoft.xmlhttp)
objxmlhttp.open get, http: //&request.servervariables (http_host) & / index1.asp, false
objxmlhttp.send ()
binfiledata = objxmlhttp.Responsebody
Définir ObjadoStream = Server.CreateObject (Adodb.Stream)
objadostream.type = 1
objadostream.open ()
objadostream.write (binfiledata)
objadostream.savetofile server.mappath (../ index.html), 2
objadostream.close ()
définir objadostream = rien
définir objxmlhttp = rien
Response.Write <Script Language = JavaScript> alert («La génération de page d'accueil est terminée!»);
%>