function.asp

网站源码

<% Function back(word)
Response.Write("<script>")
Response.Write("alert('"&word&"');")
Response.Write("history.back();")
Response.Write("</script>")
end Function

Function to_url(word,url)
Response.Write("<script>")
Response.Write("alert('"&word&"');")
Response.Write("self.location='"&url&"';")
Response.Write("</script>")
end Function 




%>