Fejl 70
Kan I se hvad det er som jeg gør galt i denne kode?<%@ Page Language="VB" %>
<script runat="server">
Sub Page_Load
lblSHow.Visible = False
If IsPostBack Then
Dim datDateIn as Date
Dim hashConcerts as new Hashtable
hashConcerts(#1/3/2005#) = "Bridgemen"
hashConcerts(#1/4/2005#) = "Vanguard"
hashConcerts(#1/2/2005#) = "Blue Devils"
hashConcerts(#1/1/2005#) = "Belevederes"
datDateIn = cDate(txtDateIn.text)
lblShow.text = "On this date enjoy the: "
lblShow.text += hashConcerts(datDateIn)
lblShow.visible = TRUE
End If
End Sub
</script>
<html>
<head>
<title>HashTable Example</title>
</head>
<body>
<form runat="server">
<h3>2005 Drum and Bugle Corps Concert</h3>
Please enter a date between 1/1/2005 and 1/4/2005
<asp:TextBox id="txtDateIn" runat="server"></asp:TextBox>
<br />
<asp:Button id="Button1" runat="server" Text="Look up"></asp:Button>
<br />
<asp:Label id="lblSHow" runat="server"></asp:Label>
</form>
</body>
</html>
