is this update statement correct? I'm used to writing UPDATE statements using the SET command.
Code:Dim strConnection As OleDbConnection = New OleDbConnection("Provider=MSDAORA;Password=password;User ID=testuser;Data Source=WEBDDEVL") Dim sqlCmd As String = "Update PBSS.PBSS_BID(Bid_ID, Bid_Type_Code, Buyer_Name, Post_To_Internet, Display_Start_Date, Update_Date, Update_ID) Values(?,?,?,?,?,?,?) Where bid_id = 11111" 'Dim objConnection As New OleDbConnection(strConnection) Dim OleDbCmdObj As OleDbCommand = New OleDbCommand(sqlCmd, strConnection) OleDbCmdObj.Parameters.Add("@Bid_Id", System.Data.OleDb.OleDbType.VarChar, 5).Value = txtBidId.Text OleDbCmdObj.Parameters.Add("@Bid_Type_Code", System.Data.OleDb.OleDbType.Numeric, 2).Value = Bid_Type OleDbCmdObj.Parameters.Add("@Buyer_Name", System.Data.OleDb.OleDbType.VarChar, 45).Value = txtBuyerName OleDbCmdObj.Parameters.Add("@Post_to_Internet_ind", System.Data.OleDb.OleDbType.Numeric, 1).Value = Post_to_Int OleDbCmdObj.Parameters.Add("@Display_Start_Date", System.Data.OleDb.OleDbType.Numeric, 1).Value = txtIntDisStartDate OleDbCmdObj.Parameters.Add("@Update_Date", System.Data.OleDb.OleDbType.Numeric, 1).Value = Format(CDate(Now)) OleDbCmdObj.Parameters.Add("@Update_Id", System.Data.OleDb.OleDbType.Numeric, 1).Value = userid strConnection.Open() OleDbCmdObj.ExecuteNonQuery() strConnection.Close()




Reply With Quote