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