domenica 25 gennaio 2009

Esempio inserimento dati in MS-SQL con parametro

Imports System.Data.Sql

Dim cn As SqlClient.SqlConnection
Dim cmd As SqlClient.SqlCommand
Try
cn = New SqlClient.SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename= " & Chr(34) & "C:\Program Files\Microsoft SQL Server\MSSQL10.SQLEXPRESS\MSSQL\DATA\vb.mdf" & Chr(34) & ";Integrated Security=True;Connect Timeout=30;User Instance=True")
cn.Open()
cmd = New SqlClient.SqlCommand("insert into table1 (a,b) values('ii',@b) ", cn)
cmd.Parameters.Add("@b", SqlDbType.Char).Value = TextBox3.Text
cmd.ExecuteNonQuery()

Catch
End Try

cn.Close()
Me.Table1TableAdapter.Fill(Me.VbDataSet.Table1)

Note.
Si differenzia rispetto all'insert dei dati in access (che richiede il ?).

Nessun commento: