The idea behind this code is to standardize all my webpages in an
application to look the same by inheriting the pages from a userdefined
class. But it gives me problems regarding sessionstate...
Try creating a new asp.net web application in Visual Studio .NET 2003 on
Framework 1.1 using VB language
Call the project testform
add a new webform called "atest.aspx "
insert this code into atest.aspx:
--------------------------------
<%@ Page Language="vb" AutoEventWireup ="false" Codebehind="ate st.aspx.vb"
Inherits="testf orm.atest"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>atest</title>
<meta name="GENERATOR " content="Micros oft Visual Studio .NET 7.1">
<meta name="CODE_LANG UAGE" content="Visual Basic .NET 7.1">
<meta name="vs_defaul tClientScript" content="JavaSc ript">
<meta name="vs_target Schema"
content="http://schemas.microso ft.com/intellisense/ie5">
</HEAD>
<body>
<form id="Form1" method="post" runat="server">
<P><asp:DropDow nList id="DropDownLis t1"
runat="server"> </asp:DropDownLis t></P>
<P><asp:TextB ox id="TextBox1" runat="server"> </asp:TextBox></P>
<P><asp:Butto n id="Send" runat="server" Text="Button"></asp:Button></P>
</form>
</body>
</HTML>
--------------------------------
and insert this code into atest.aspx.vb
--------------------------------
Public Class atest
Inherits System.Web.UI.P age
'Inherits MyPage
Protected WithEvents DropDownList1 As
System.Web.UI.W ebControls.Drop DownList
Protected WithEvents Send As System.Web.UI.W ebControls.Butt on
Protected WithEvents TextBox1 As System.Web.UI.W ebControls.Text Box
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
If IsPostBack Then
Else
With DropDownList1
.Items.Add("Ite m1")
.Items.Add("Ite m2")
.Items.Add("Ite m3")
.Items.Add("Ite m4")
End With
End If
End Sub
End Class
Public Class MyPage
Inherits System.Web.UI.P age
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
Dim theform As Control = Page.FindContro l("Form1")
Dim cntrl As Label = New Label : cntrl.Text = "My header<hr>"
theform.Control s.AddAt(0, cntrl)
cntrl = New Label : cntrl.Text = "<hr>My footer"
theform.Control s.AddAt(theform .Controls.Count , cntrl)
End Sub
End Class
--------------------------------
compile and run it.
Try selecting item number 3 and put some text into the textbox - click send.
OK - the page reloads and keeps the sessionstate (item3 is still selected
and the textbox is unchanged)
Then try moving the ' in line 3 of atest.aspx.vb so the two lines says:
'Inherits System.Web.UI.P age
Inherits MyPage
Compile and run it and do the above test again...
Now the dropdown loses its sessionstate but the textbox seems to survive!!
What am I doing wrong!!
