|
dev
newsgroups
|
|||||||||||||||||||||||
|
|||||||||||||||||||||||
Update Dataset oleDBDim wwtID as integer Dim wwtEmailAddress as string Dim drEmailListWWT as System.Data.DataRowView Dim dvEmailListWWT as DataView Dim cnEmailListWWT as OleDbConnection Dim daEmailListWWT as OleDbDataAdapter = New OleDbDataAdapter Dim dsEmailListWWT as DataSet = New DataSet Dim SelectStatement as String SelectStatement = "Select * From EmailList" cnEmailListWWT = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Inetpub\wwwroot\WildWestTown\wwtdb\WWTEmailList.mdb") daEmailListWWT.UpdateCommand = New OleDbCommand(SelectStatement, cnEmailListWWT) daEmailListWWT.SelectCommand = New OleDbCommand(SelectStatement, cnEmailListWWT) daEmailListWWT.Fill(dsEmailListWWT, "EmailList") dvEmailListWWT = dsEmailListWWT.Tables("EmailList").DefaultView iLoop = 0 While dvEmailListWWT.count > iLoop drEmailListWWT=dvEmailListWWT.Item(iLoop) drEmailListWWT("wwtEmail") = Replace(drEmailListWWT("wwtEmail"), " ", "") iLoop += 1 End While daEmailListWWT.Update(dsEmailListWWT, "EmailList") Here is my error: Concurrency violation: the UpdateCommand affected 0 of the expected 1 records Please help. |
|||||||||||||||||||||||