Jo - min .aspx ser sådan ud:
<%@ Page Language="VB" %>
<%@ import Namespace="System.Web.UI.WebControls" %>
<script runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
If not Page.IsPostback then
Session("Side") = "PWTjek"
Session("Sprog") = ""
Session("Info") = ""
Session("Kode") = ""
End If
lblInfo.Text = Session("Info")
Kode.Text = Session("Kode")
Select Case Session("Side")
Case "PWTjek":
PHMain.controls.add(LoadControl("PWTjek.ascx"))
Case "PWTjekFejl":
PHMain.controls.add(LoadControl("xx.ascx"))
Case "Ordliste":
PHMain.controls.add(LoadControl("Ordliste.ascx"))
Case Else
lblInfo.Text = Session("Info")
End Select
End Sub
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p>
<asp:Image id="Image1" runat="server" ImageUrl="Logo.jpg"></asp:Image>
</p>
<p>
<asp:PlaceHolder id="PHMain" runat="server"></asp:PlaceHolder>
</p>
<p>
<asp:Label id="Label1" runat="server" font-names="Arial" font-size="XX-Small" text="Tilegnet Sprogbroens engelskelever på kursus E 429"></asp:Label>
</p>
<p>
<asp:Label id="lblInfo" runat="server" font-names="Arial" font-bold="True" forecolor="Red"></asp:Label>
</p>
<p>
<asp:TextBox id="Kode" runat="server" Height="2px" Width="477px"></asp:TextBox>
</p>
<!-- Insert content here -->
</form>
</body>
</html>
og den kalder .ascx:
<%@ Control Language="VB" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.Oledb" %>
<script runat="server">
' Insert user control code here
'
Sub Page_Load(sender As Object, e As EventArgs)
Dim objConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("/data/A-Nees.mdb") & ";")
objConn.Open()
objConn.Close
End Sub
Sub btnNext_Click(sender As Object, e As EventArgs)
If DDLBruger.SelectedItem.Value = txtPW.Text Then
Session("Side") = "Ordliste"
Else
Session("Side") = ""
Session("Info") = "Bruger/password findes ikke"
End If
End Sub
</script>
<p>
<asp:Label id="Label1" runat="server" text="Indtast brugernavn og password:" font-size="X-Small" font-names="Arial" font-bold="True"></asp:Label>
</p>
<p>
<asp:DropDownList id="DDLBruger" runat="server" Font-Names="Arial" Font-Size="X-Small">
<asp:ListItem Value="IngenValgt" Selected="True">Vælg</asp:ListItem>
<asp:ListItem Value="KimN">Kim</asp:ListItem>
<asp:ListItem Value="DoEs">Dorthe</asp:ListItem>
</asp:DropDownList>
</p>
<p>
<asp:TextBox id="txtPW" runat="server" Font-Names="Arial" Font-Size="X-Small" TextMode="Password"></asp:TextBox>
</p>
<p>
<asp:Label id="Label2" runat="server" text="Vælg sprog:" font-size="X-Small" font-names="Arial" font-bold="True"></asp:Label>
</p>
<p>
<asp:DropDownList id="DDLSprog" runat="server" Font-Names="Arial" Font-Size="X-Small">
<asp:ListItem Value="IntetValgt" Selected="True">Vælg</asp:ListItem>
<asp:ListItem Value="GB">English</asp:ListItem>
</asp:DropDownList>
</p>
<p>
<asp:Button id="btnNext" onclick="btnNext_Click" runat="server" Text="Næste"></asp:Button>
</p>
