<%@ page language="vb" %>
<script runat="server">
sub btn1_click(sender as object,e as eventargs)
response.redirect("b.aspx?q=hello,world")
end sub
</script>
<html>
<form runat="server">
<asp:button text="response B.aspx" id="btn1" runat="server" onclick="btn1_click" />
</form>
</html>
_________________
b.aspx
_________________
<%@ page language="vb" %>
<script runat="server">
sub page_load(sender as object,e as eventargs)
if not ispostback then
response.write(request.querystring("q"))
viewstate("q")=request.querystring("q")
else
response.write("回发后<br>")
if not ctype(viewstate("q"),string) is nothing then
response.write("仍然存在" & ctype(viewstate("q"),string))
else
response.write("的确不在了")
end if
end if
end sub
</script>
<html>
<form runat="server" action="b.aspx">
<asp:button id="prev" runat="server" text="上一步" />
<asp:button id="next" runat="server" text="下一步" />
</form>
</html>
_________________
sub page_load(sender as object,e as eventargs)
if not ispostback then
if request.querystring("str")<>"" then
viewstate("str")=request.querystring("str")
end if
end if
end sub