스칼라 값을 선언해야합니다. @ Tx1

Question

Imports System.Data 
Imports System.Data.SqlClient 


Public Class Form1 

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


     Dim con As New SqlConnection 
     Dim cmd As New SqlCommand 
     Dim Tx1 As String 

     Tx1 = TextBox1.Text 

     con.ConnectionString = "Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\DBTestX.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True" 

     con.Open() 

     cmd.Connection = con 
     cmd.CommandText = "INSERT INTO TestTable(Test) VALUES(@Tx1)" 
     cmd.ExecuteNonQuery() 

     con.Close() 


    End Sub 
End Class 

이 코드에서 볼 수 있고 시각화 할 수있는 것처럼 하나의 양식, 1 개의 텍스트 상자 및 1 개의 버튼 만 있습니다.

VB Express 2010과 SQL Server 2008을 사용하여 Project > Add New Item > Service-Based Database 등을 클릭하여 SQL 데이터베이스와 테이블을 만들었습니다. 원하는 작업은 textbox1에있는 새 데이터를 테이블의 유일한 열에 삽입하는 것입니다. . 그러나, 나는 그렇게 할 수 없다.

문제의 원인을 지적 해 주시겠습니까? 다른 제안?

Answer 1

거의 다 왔어. 당신은 매개 변수를 추가 할 때 길이를 제공해야합니다

cmd.Connection = con 
cmd.CommandText = "INSERT INTO TestTable(Test) VALUES(@Tx1)" 
cmd.Parameters.Add("@Tx1", SqlDbType.VarChar, <length of your column>).Value = Tx1 
cmd.ExecuteNonQuery() 

: 당신은 @Tx1 매개 변수를 추가하고 값을 설정해야합니다.

또한 VB.NET을 자주 사용하지 않으므로 예제와 함께 C#으로 빠져 들었을 수 있습니다. 죄송합니다. 사전에 사과드립니다. :)