ASP.NET SQL insert fejl

Jeg har endelig besluttet mig for at konvertere fra ASP Classic til .net og det er jo noget af en omvæltning. Så forvent en del spørgsmål fra mig og jeg siger selvfølgelig påhånd tak for hjælpen :)

Nå, til selve spørgsmålet. Jeg er igang med at lære at lave SQL insert, update og delete. Jeg har fundet ud af at ligge min SQL connection i web.config.

Igår fik jeg endelig hul på det med SQL insert og det virkede perfekt, men her til morgen virker det sjovt nok ikke.

Koden:
Imports System.Data.SqlClient
Imports System.Configuration
Imports System.Net.Mail
Imports System.Data

Partial Class _Default
    Inherits System.Web.UI.Page

    Dim con As SqlConnection
    Dim sSQL As String
    Dim cmd As New SqlCommand(sSQL, con)
    Dim randomKey As String = Replace(System.Guid.NewGuid().ToString(), "-", "")

Protected Sub CreateUser_Click(sender As Object, e As System.EventArgs) Handles CreateUser.Click
        con = New SqlConnection(ConfigurationManager.ConnectionStrings("dbConnection").ConnectionString)
        con.Open()

        sSQL = "INSERT INTO UserTBL (Name,Email,Username,Password,Gender,Country,Bday,Enable,Authed,AuthKey)" & _
            " VALUES (@Name,@Email,@Username,@Password,@Gender,@Country,@Bday,@Enable,@Authed,@AuthKey)"

        cmd.Parameters.Add(New SqlParameter("@Name", Name.Text))
        cmd.Parameters.Add(New SqlParameter("@Email", Email.Text))
        cmd.Parameters.Add(New SqlParameter("@Username", Username.Text))
        cmd.Parameters.Add(New SqlParameter("@Password", Password.Text))
        cmd.Parameters.Add(New SqlParameter("@Gender", Gender.Text))
        cmd.Parameters.Add(New SqlParameter("@Country", Country.Text))
        cmd.Parameters.Add(New SqlParameter("@Bday", Bday.Text & "-" & Bmonth.Text & "-" & Byear.Text))
        cmd.Parameters.Add(New SqlParameter("@Enable", "0"))
        cmd.Parameters.Add(New SqlParameter("@Authed", "0"))
        cmd.Parameters.Add(New SqlParameter("@AuthKey", randomKey))

        cmd.ExecuteNonQuery()
        con.Close()
End Sub
End Class


Fejl:
Server Error in '/' Application.
ExecuteNonQuery: Connection property has not been initialized.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.InvalidOperationException: ExecuteNonQuery: Connection property has not been initialized.

Source Error:

Line 54:        cmd.Parameters.Add(New SqlParameter("@AuthKey", randomKey))
Line 55:
Line 56:        cmd.ExecuteNonQuery()
Line 57:        con.Close()
Line 58:


Source File: C:\Data\dev.urbanswapping.com\Default.aspx.vb    Line: 56