2009年6月4日 星期四

Vb.net cmd.Parameters.AddWithValue(Insert資料庫)

Imports System.Data.SqlClient
Try
Using conn As New SqlConnection(strConn)
Using cmd As New SqlCommand("Insert into product(productName,)Values(@123,)", conn)
conn.Open()
cmd.Parameters.AddWithValue("@123", Me.TextBox1.Text)
cmd.ExecuteNonQuery()
End Using
End Using
Catch ex As Exception
MsgBox(ex.Message)
End Try