Response对象3
2016-01-29 19:07
Response对象3,Response对象3
功用所在。我们创建了一个代码文件script formjump.asp来演示这种方法
<html<head
<TITLEFormJump.asp</TITLE
</head<body bgcolor="#FFFFFF"
<form action="FormJumpRespond.asp" method="get"
<SELECT NAME="wheretogo"
<OPTION SELECTED VALUE="fun"Fun</OPTION
<OPTION value="news"Daily News</OPTION
<OPTION value="docs"ASP IIS3 Roadmap/Docs</OPTION
<OPTION value="main"MainPage of ActiveServerPages.com</OPTION
<OPTION value="sample"IIS 3 Sample ASP scripts</OPTION
</SELECT
<input type=submit value="Choose Destination"
</form
</body</html
表单的反馈如下：
<%response.buffer=true%
<html<head
<titleformjumprespond.asp</title&
<body bgcolor="#FFFFFF"
<%
' My ASP program that redirects to URL
thisURL="http://www.activeserverpages.com"
where=Request.QueryString("Wheretogo")
Select Case where
case "main"
response.redirect thisURL & "/"
case "samples"
response.redirect thisURL & "/aspsamp/samples/samples.htm"
case "docs"
response.redirect thisURL & "/iasdocs/aspdocs/roadmap.asp"
case "news"
response.redirect "http://www.cnn.com"
case "fun"
response.redirect "http://www.dilbert.com"
End Select
response.write "All dressed up and I don't know where to go<br"
response.write "I recommend -- " & "<br"
response.write server.htmlencode(thisURL & "/learn/test/res2.asp?
where=fun") & "<br"
response.write "for a good laugh!" & "<P"
%
</body</html
