|
<%@ Page language="VB"%>
<script language="vb" runat="server">
Sub EmptyClick(sender As System.Object, e As System.EventArgs)
Session("BasketCount") = 0
End Sub
Sub AddClick(sender As System.Object, e As System.EventArgs)
Session("BasketCount") += 1
End Sub
</script>
<html>
<body>
<form id="BasketForm" method="post" runat="server">
<asp:Button id="Empty" OnClick="EmptyClick" runat="server" Text="Empty"/>
<br />
<asp:Button id="Add" OnClick="AddClick" runat="server" Text="Add"/>
<br />
Basket items : <%=Session("BasketCount")%>
<br />
</form>
</body>
</html>
|