navardi
شنبه 17 دی 1390, 11:33 صبح
با سلام خدمت شما دوستان و اساتيد
من تازه كار با vb.net را شروع كردم و در گام اول خواهان اضافه نمودن داده به بانكم هستم كه اين بانك در سرور ديگري قرار دارد بنام help ولي error زير ميگيرد و داده را نمي ريزد كدها را همراه با error آن ميگذارم در صورت امكان راهنمائي بفرمائيد
با تشكر
Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click
Dim objConnection As New SqlConnection("server=\\help;database=db8sql;user id=alavi;password=alavi;")
Dim objCommand As New SqlCommand()
objCommand.Connection = objConnection
objCommand.CommandText = "insert into T_PRODUCT " & _
"([COD_PRODUCT],NAME,[TYPE_ASLI],[TYPE_FAREI])" & _
" values(@cp,@n,@ta,@tf)"
objCommand.Parameters.AddWithValue("@cp", TextBox1.Text)
objCommand.Parameters.AddWithValue("@n", TextBox2.Text)
objCommand.Parameters.AddWithValue("@ta", TextBox3.Text)
objCommand.Parameters.AddWithValue("@tf", TextBox4.Text)
objConnection.Open()
objCommand.ExecuteNonQuery()
objConnection.Close()
End Sub
80317
من تازه كار با vb.net را شروع كردم و در گام اول خواهان اضافه نمودن داده به بانكم هستم كه اين بانك در سرور ديگري قرار دارد بنام help ولي error زير ميگيرد و داده را نمي ريزد كدها را همراه با error آن ميگذارم در صورت امكان راهنمائي بفرمائيد
با تشكر
Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click
Dim objConnection As New SqlConnection("server=\\help;database=db8sql;user id=alavi;password=alavi;")
Dim objCommand As New SqlCommand()
objCommand.Connection = objConnection
objCommand.CommandText = "insert into T_PRODUCT " & _
"([COD_PRODUCT],NAME,[TYPE_ASLI],[TYPE_FAREI])" & _
" values(@cp,@n,@ta,@tf)"
objCommand.Parameters.AddWithValue("@cp", TextBox1.Text)
objCommand.Parameters.AddWithValue("@n", TextBox2.Text)
objCommand.Parameters.AddWithValue("@ta", TextBox3.Text)
objCommand.Parameters.AddWithValue("@tf", TextBox4.Text)
objConnection.Open()
objCommand.ExecuteNonQuery()
objConnection.Close()
End Sub
80317