4-9.aspx

来自「程序源代码分成两个部分: &#61557 一部分是用记事本或EditPlus」· ASPX 代码 · 共 26 行

ASPX
26
字号
<%@ Page language="VB" %>
<HTML>
<TITLE>[例4-9]使用Redirect方法重定向到另外的URL</TITLE>
<%
	Dim num As Integer = Request.Form("tNumber")
	Select Case num
		case 1
			Response.Redirect("4-1.aspx")
		case 2
			Response.Redirect("4-2.aspx")
		case 3
			Response.Redirect("4-3.aspx")
		Case Else
			Response.Write("<FONT SIZE=6 COLOR=BLUE>暂时只提供3个实例,以后还会提供更多的实例</FONT>")
	End Select
   	
%>
<BODY>
<form runat="server">
 请输入实例号,以显示该实例运行结果。 
 <asp:textbox id="tNumber" runat=server/>
 <asp:button id="bSubmit" Text="确认" runat=server/><p>
</form>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?