C# と VB.NET の質問掲示板

ASP.NET (VB)　で新規登録画面を作ってます。

データベースはSQL Severを使っているのですが、データを追加することができません。

このプログラムのどこが間違っているのか特定できません。ご助力お願いします。


　 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

　 Dim strSQL As String
   Dim cnn As SqlConnection = New SqlConnection("Initial Catalog=Data; Data Source=NOTO; Integrated Security=SSPI;")
   cnn.Open()


        Dim execmd As New SqlCommand
        Dim tran As SqlTransaction
        tran = cnn.BeginTransaction()
        execmd.Connection = cnn
        execmd.Transaction = tran

        Try
            strSQL = "INSERT INTO データ(会員コード, 氏名,かな氏名,メールアドレス, パスワード, 生年月日) " & _
                                 "VALUES (" & "'" & yuzaID.Text.Trim & "'," & _
                                              "'" & nameID.Text.Trim & "'," & _
                                              "'" & kanaID.Text.Trim & "'," & _
                                              "'" & mailID.Text.Trim & "'," & _
                                              "'" & passID.Text.Trim & "'," & _
                                              "'" & bornID.Text.Trim & "');"


            execmd.CommandText = strSQL
            execmd.ExecuteNonQuery()
            tran.Commit()
            cnn.Close()

        Catch ex As Exception
            tran.Rollback()
            cnn.Close()
            Exit Sub
        End Try