Проблема вставки запроса

---

Я пытаюсь вставить запись в таблицу sql server Record insert но ее нет
запись об ошибке не будет засеяна в таблице
проверьте мой код

Что я уже пробовал:

Dim sqlConnection As New System.Data.SqlClient.SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Softlinks.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")
        Dim cmd As New System.Data.SqlClient.SqlCommand
        cmd.CommandType = System.Data.CommandType.Text
        cmd.CommandText = "INSERT into Productitem (Productcode,Productname,Productprice)  values (12345,'Keyboard',1245)"

        cmd.Connection = sqlConnection

        sqlConnection.Open()
        cmd.ExecuteNonQuery()
        sqlConnection.Close()

---