UpdateCommand problem

[stuart_dent]

I have a SQL Server table with in Indetity column (value auto
generated).

I have tried to write my own updatecommand code.

I can't get it to work.
An error says that says Sku and rid are invalid column names. I don't
know why.

I even modified the Updatecommand the a bare bones
"UPDATE dbo.test1 SET sku = @SKU"
At least this gave me a different error!
The error says error in Prepared statement
"@SKU(20) Update dbo.test1 SET sku = @SKU"

Can anyone help?

Thanks,
Stu

Public da As Data.SqlClient. SqlDataAdapter, ds As DataSet, conn As
Data.SqlClient. SqlConnection

Private Sub Button1_Click(B yVal sender As System.Object, ByVal e As
System.EventArg s) Handles Button1.Click
da.Update(ds, "CustSKUDateSet tings")
End Sub

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'TODO: This line of code loads data into the
'Viaware_arc_te stDataSet1.Cust SKUDateSettings ' table. You can move, or
remove it, as needed.
Dim conn As New Data.SqlClient. SqlConnection
conn.Connection String = "..."
ds = New DataSet
da = New Data.SqlClient. SqlDataAdapter
da.SelectComman d = New Data.SqlClient. SqlCommand
da.SelectComman d.Connection = conn
da.InsertComman d = New Data.SqlClient. SqlCommand
da.InsertComman d.Connection = conn
da.UpdateComman d = New Data.SqlClient. SqlCommand
da.UpdateComman d.Connection = conn

da.SelectComman d.CommandText = "Select rid, custnum, sku,
search_date_typ e, date_range, date_sort_order , days_to_start,
days_to_end from CustSKUDateSett ings"
da.Fill(ds, "CustSKUDateSet tings")
DataGridView1.D ataSource = ds.Tables("Cust SKUDateSettings ")
da.UpdateComman d.CommandText = " UPDATE dbo.test1 " & _
"SET sku = @SKU, " & _
"WHERE rid = @rid " & _
"CustNum = @CustNum, " &
_
"search_date_ty pe =
@search_date_ty pe," & _
"date_range =
@date_range," & _
"date_sort_orde r =
@date_sort_orde r," & _
"days_to_st art =
@days_to_start, " & _
"days_to_en d =
@days_to_end " & _
da.UpdateComman d.CommandType = System.Data.Com mandType.Text
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@rid", System.Data.Sql DbType.Int, 4,
"rid"))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@SKU", System.Data.Sql DbType.Char,
20, "dbo.test1.sku" ))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@CustNum" ,
System.Data.Sql DbType.[Char], 15, "CustNum"))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@search_d ate_type",
System.Data.Sql DbType.[Char], 1, "search_date_ty pe"))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@date_ran ge",
System.Data.Sql DbType.[Char], 1, "date_range "))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@date_sor t_order",
System.Data.Sql DbType.[Char], 1, "date_sort_orde r"))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@days_to_ start",
System.Data.Sql DbType.Int, 4, "days_to_start" ))
da.UpdateComman d.Parameters.Ad d(New
System.Data.Sql Client.SqlParam eter("@days_to_ end",
System.Data.Sql DbType.Int, 4, "days_to_en d"))

*** Sent via Developersdex http://www.developersdex.com ***