[RESOLVED] [2008] ASP.NET VB - Must Declare Scalar Variable "@EmployeeNo"

Hi All,

Below is the code that I have tried to implement but it always returns "Must Declare the scalar variable "@EmployeeNo". I have gone through the code countless times but I can't figure out what is wrong.
vb Code:
<%@ Page Language="vb" %>
<%@ Import Namespace="System"  %>
<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<%@ Import Namespace="System.Web.UI.WebControls" %>
<%@ Import Namespace="System.Configuration" %>
<%@ Import Namespace="System.Threading" %>
<%@ Import Namespace="System.Globalization" %>
<%@ Import Namespace="System.IO" %>
 
<HTML>
 
<HEAD>
 
<title>Add Employee To Database</title>
 
<script runat=server>
 
                        Public Sub AddPerson(sender As Object, e As EventArgs)
 
 
 
                                    Dim intImageSize As Int64
 
                                    Dim strImageType As String
                                    Dim ImageStream As Stream
 
 
 
                                    ' Gets the Size of the Image
 
                                    intImageSize = PersonImage.PostedFile.ContentLength
 
                                   
 
                                    ' Gets the Image Type
 
                                    strImageType = PersonImage.PostedFile.ContentType
 
                                   
 
                                    ' Reads the Image
 
                                    ImageStream = PersonImage.PostedFile.InputStream
 
 
 
                                    Dim ImageContent(intImageSize) As Byte
 
                                    Dim intStatus As Integer
 
                                    intStatus = ImageStream.Read(ImageContent, 0, intImageSize)
 
 
 
                                    ' Create Instance of Connection and Command Object
 
 
                                    Dim connStr As String = "Provider=SQLOLEDB;Data Source=WIN2K3R2EE\SQLEXPRESS;Initial Catalog=EmployeeDB;User id=;Password="
                                    Dim SQLInsert As String = "INSERT INTO STAFF (EmployeeNo, GivenName, Surname, Telephone, Email, Picture, WrkGrp, SectionID, Gender) VALUES (@EmployeeNo, @GivenName, @Surname, @Telephone, @Email, @Picture, @WrkGrp, @SectionID, @Gender)"
 
 
 
                    Dim myCommand As New OleDbCommand(SQLInsert, New OleDbConnection(connStr))
 
                                    myCommand.Connection.Open()
 
                                    Try
 
                                    With myCommand.Parameters
 
                                          myCommand.Parameters.Add("@EmployeeNo", OleDbType.VarChar).Value = txtEmployeeNo.Text
                                  myCommand.Parameters.Add("@GivenName", OleDbType.VarChar).Value = txtGivenName.Text
                                  myCommand.Parameters.Add("@Surname", OleDbType.VarChar).Value = txtSurname.Text
                                          myCommand.Parameters.Add("@Telephone", OleDbType.VarChar).Value = txtTelephone.Text
                                          myCommand.Parameters.Add("@Email", OleDbType.VarChar).Value = txtEmail.Text
                                          myCommand.Parameters.Add("@Picture", OleDbType.Binary).Value = ImageContent
                                          myCommand.Parameters.Add("@WrkGrp", OleDbType.VarChar).Value = txtWorkGroup.Text
                                          myCommand.Parameters.Add("@SectionID", OleDbType.VarChar).Value = txtSection.Text
 
                                          Dim prmSex As String = ""
 
                                          If sexMale.Checked Then
 
                                                
 
                                                prmSex = "M"
 
                                          Else
 
                                                prmSex = "F"
 
                                          End If
                                          
                                          myCommand.Parameters.AddWithValue("@Gender", OleDbType.VarChar).Value = prmSex
 
                                     End With
 
 
                           If CInt(myCommand.ExecuteNonQuery()) = 0 Then
 
                                      Response.Write("Insert Failed")
 
                           Else
                                      Response.Write("New person successfully added!")
                           End If
 
                                                myCommand.Connection.Close()
 
                                                
 
                                    Catch ex As Exception
 
                                             Response.Write(ex.Message())  
 
                                    End Try
 
                        End Sub   
 
   
 
    </script>
 
   
 
  </HEAD>
 
  <body style="font: 10pt verdana">
 
 
 
    <form enctype="multipart/form-data" runat="server">
 
            <asp:Table Runat=server Width=50% BorderWidth=1 BackColor=Beige>
 
                        <asp:TableRow>
 
                                    <asp:TableCell ColumnSpan=2 BackColor="#ff0000">
 
                                    <asp:Label Font-Name="verdana" Font-size="12px" ForeColor="#ffffff" font-bold="True" Runat=server Text="Add New Person" />
 
                                    </asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Employee No" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id=txtEmployeeNo Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Given Name" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id=txtGivenName Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Surname" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id=txtSurname Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Telephone" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id=txtTelephone Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Email" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id="txtEmail" Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Image" /></asp:TableCell>
 
                                    <asp:TableCell><input type="file" id="PersonImage" runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="WorkGroup" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id="txtWorkGroup" Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Section" /></asp:TableCell>
 
                                    <asp:TableCell><asp:TextBox id="txtSection" Runat=server /></asp:TableCell>
 
                        </asp:TableRow>
 
 
                        <asp:TableRow>
 
                                    <asp:TableCell HorizontalAlign="Right"><asp:Label Font-Name="verdana" Font-size="12px"  Runat=server Text="Sex" /></asp:TableCell>
 
                                    <asp:TableCell>
 
                                                <asp:RadioButton GroupName="sex" Font-Name="Verdana" Font-Size="12px" Text="Male" ID="sexMale" Runat=server />
 
                                                <asp:RadioButton GroupName="sex" Font-Name="Verdana" Font-Size="12px" Text="FeMale" ID="sexFeMale" Runat=server />
 
                                    </asp:TableCell>
 
                        </asp:TableRow>
                        
 
                        <asp:TableRow>
 
                                    <asp:TableCell ColumnSpan=2 HorizontalAlign=Center>
 
                                    <asp:Button Text="Add Person" OnClick="AddPerson" Runat=server />
 
                                    </asp:TableCell>
 
                        </asp:TableRow>
 
            </asp:Table>
 
    </form>
 
 
 
  </body>
 
</HTML>